Xbase++

Get a Mail-Merge Replace Pattern

Demonstrates the Chilkat Email.GetReplacePattern method, which returns a replacement pattern — the search string — previously defined for mail-merge operations with SetReplacePattern. The index is zero-based. This example defines two patterns and enumerates them.

Background: In Chilkat's mail-merge, each entry is a pattern (a placeholder token such as FIRST_NAME) paired with a replacement string. GetReplacePattern retrieves the search side of the pair at a given index; GetReplaceString retrieves the matching replacement. Reading them back is useful for inspecting or logging exactly which substitutions will be applied when the message is sent.

Chilkat Xbase++ Downloads

Download Chilkat for Xbase++

Xbase++

LOCAL oEmail
LOCAL n
LOCAL i

//  Demonstrates the GetReplacePattern method, which returns a replacement pattern (the
//  search string) previously defined for mail-merge operations with SetReplacePattern.
//  The index is zero-based.

oEmail := CreateObject("Chilkat.Email")
oEmail:Subject := "Hello FIRST_NAME"
oEmail:Body := "Dear FIRST_NAME, welcome to CITY."

oEmail:SetReplacePattern("FIRST_NAME", "John")
oEmail:SetReplacePattern("CITY", "Denver")

n := oEmail:NumReplacePatterns

FOR i := 0 TO n - 1
    ? "Pattern " + Str(i) + ": " + oEmail:GetReplacePattern(i)
NEXT

oEmail:destroy()