Sample code for 30+ languages & platforms
Tcl

Get a Mail-Merge Replacement String by Pattern

See more Email Object Examples

Demonstrates the Chilkat Email.GetReplaceString2 method, which returns the replacement string for a previously-defined pattern/replacement pair, looked up by the pattern itself (a mail-merge feature). This example defines two pairs and looks up the replacement for one pattern by name.

Background: Where GetReplaceString fetches a replacement by its numeric position, GetReplaceString2 fetches it by the pattern — convenient when you already know the token (say FIRST_NAME) and just want its configured substitution without scanning the whole list.

Chilkat Tcl Downloads

Tcl

load ./chilkat.dll

#  Demonstrates the GetReplaceString2 method, which returns the replacement string for a
#  previously-defined pattern/replacement pair, looked up by the pattern itself (a
#  mail-merge feature).

set email [new_CkEmail]

CkEmail_put_Subject $email "Hello FIRST_NAME"
CkEmail_put_Body $email "Dear FIRST_NAME, welcome to CITY."

CkEmail_SetReplacePattern $email "FIRST_NAME" "John"
CkEmail_SetReplacePattern $email "CITY" "Denver"

#  Look up the replacement for a specific pattern.
set repl [CkEmail_getReplaceString2 $email "FIRST_NAME"]
puts "FIRST_NAME -> $repl"

delete_CkEmail $email