MIME CurrentDateTime Property

See more MIME Examples

Demonstrates the read-only CurrentDateTime property, which returns the current local date and time formatted as an Internet message date including the numeric UTC offset. The example uses it to populate a Date header field.

Dim success As Boolean = False

Dim mime As ChilkatMime
mime.Initialize
success = mime.SetBodyFromPlainText("Message with a Date header.")
If success = False Then
    Log(mime.LastErrorText)
    Return
End If


'  CurrentDateTime returns the current local date and time formatted as an Internet message date,
'  including the numeric UTC offset, for example: Fri, 21 Nov 1997 09:55:06 -0600
Dim now As String = mime.CurrentDateTime
Log("Current date/time: " & now)

'  It can be used to populate a Date header field.
mime.SetHeaderField("Date", now)

Dim head As String = mime.GetEntireHead
If mime.LastMethodSuccess = False Then
    Log(mime.LastErrorText)
    Return
End If

Log(head)