Sample code for 30+ languages & platforms
Tcl

Set the X-Priority Header of an Email

Demonstrates how to set the X-Priority header field of an email.

Chilkat Tcl Downloads

Tcl

load ./chilkat.dll

# The AddHeaderField can be called to add any header field.
# If the header field already exists, AddHeaderField replaces it.
set email [new_CkEmail]

CkEmail_AddHeaderField $email "X-Priority" "3 (Normal)"

CkEmail_AddHeaderField $email "X-Priority" "1 (High)"

CkEmail_AddHeaderField $email "X-Priority" "5 (Low)"

# The X-Priority value ranges from 1 to 5, with 1 being 
# high priority, 3 is normal, and 5 is low.
# You may set X-Priority to the number alone:

CkEmail_AddHeaderField $email "X-Priority" "1"

# Including extra text, such as (High), should not 
# affect how the header is interpreted.
CkEmail_AddHeaderField $email "X-Priority" "1 (High)"

delete_CkEmail $email