VBScript
VBScript
Get an Attachment's Bytes into a BinData
See more Email Object Examples
Demonstrates the Chilkat Email.GetAttachmentBd method, which copies an attachment's binary data into a BinData object. The first attachment is at index 0. This example adds an attachment and copies its bytes into a BinData, printing the byte count.
Background: This is the safe, binary way to extract an attachment — the counterpart to the text-oriented
GetAttachmentString. Because attachments are often binary (PDFs, images, archives), copying the raw bytes into a BinData preserves them exactly, ready to write to a file, hash, or pass to another API without any charset conversion that could corrupt the data.Chilkat VBScript Downloads
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
success = 0
' Demonstrates the GetAttachmentBd method, which copies an attachment's binary data into a
' BinData object. The first attachment is at index 0.
set email = CreateObject("Chilkat.Email")
email.Subject = "GetAttachmentBd example"
success = email.AddStringAttachment("notes.txt","Some notes stored in the attachment.")
' Copy the first attachment's binary data into a BinData object.
set bd = CreateObject("Chilkat.BinData")
success = email.GetAttachmentBd(0,bd)
If (success = 0) Then
outFile.WriteLine(email.LastErrorText)
WScript.Quit
End If
outFile.WriteLine("Attachment size (bytes) = " & bd.NumBytes)
outFile.Close