Upload email with original date

I’m uploading emails via the Chilkat plugin to an IMAP account.

[code]'load the email
Dim email As New Chilkat.Email
if not email.SetFromMimeText(theData) then Return

'do the upload
dim UploadTask as Chilkat.Task = CkoImap.AppendMailAsync(“Inbox”, email)
call UploadTask.Run[/code]

The upload itself works fine. However, both in Mail and in Outlook the mails show up with the current date instead of the original mail date. How do I upload the mail so that the mail client shows the original date?