Visual FoxPro

Load a MessageSet from a Compact String

Demonstrates the Chilkat MessageSet.FromCompactString method, which clears the set and loads message identifiers from compact IMAP message-set syntax. The only argument is the compact string: a colon specifies an inclusive ascending range, and commas separate values or ranges. This example loads 1:5,8:10 and prints the result as a comma-separated list.

Background: Compact message-set syntax is how IMAP itself expresses groups of messages — 1:5,8:10 is far more concise than listing every id. FromCompactString is the inverse of ToCompactString: it parses that text into a set you can pass to Imap methods. Duplicates are removed, identifiers are sorted ascending, and the existing HasUids setting is preserved. Note the string carries only the numbers — it does not record whether they are UIDs or sequence numbers.

Chilkat Visual FoxPro Downloads

Download Chilkat for Visual FoxPro

Visual FoxPro

LOCAL lnSuccess
LOCAL loMsgSet
LOCAL lcCsv

lnSuccess = 0

*  Demonstrates the MessageSet.FromCompactString method, which loads a set of message
*  identifiers from compact IMAP message-set syntax.  The only argument is the compact string.
*  A colon specifies an inclusive range, and commas separate values or ranges.

loMsgSet = CreateObject('Chilkat.MessageSet')

*  Load a compact message set.  "1:5,8:10" expands to 1,2,3,4,5,8,9,10.
lnSuccess = loMsgSet.FromCompactString("1:5,8:10")
IF (lnSuccess = 0) THEN
    ? loMsgSet.LastErrorText
    RELEASE loMsgSet
    CANCEL
ENDIF

? "Count: " + STR(loMsgSet.Count)

*  Show the loaded identifiers in comma-separated form.
lcCsv = loMsgSet.ToCommaSeparatedStr()
? lcCsv

RELEASE loMsgSet