Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Scan for Emails with Attachments and Save Attachments to FilesScan for emails with attachments and save attachments. require 'chilkat' imap = Chilkat::CkImap.new() # Anything unlocks the component and begins a fully-functional 30-day trial. success = imap.UnlockComponent("Anything for 30-day trial") if (success != true) print imap.lastErrorText() + "\n" exit end # Connect to an IMAP server. success = imap.Connect("mail.chilkatsoft.com") if (success != true) print imap.lastErrorText() + "\n" exit end # Login success = imap.Login("admin@chilkatsoft.com","*myPassword5*") if (success != true) print imap.lastErrorText() + "\n" exit end # Select an IMAP mailbox success = imap.SelectMailbox("Inbox") if (success != true) print imap.lastErrorText() + "\n" exit end # We can choose to fetch UIDs or sequence numbers. fetchUids = true # Get the message IDs of all the emails in the mailbox messageSet = imap.Search("ALL",fetchUids) if (messageSet == nil ) print imap.lastErrorText() + "\n" exit end # Fetch the email headers into a bundle object: bundle = imap.FetchHeaders(messageSet) if (bundle == nil ) print imap.lastErrorText() + "\n" exit end # Scan for emails with attachments, and save the attachments # to a sub-directory. for i in 0 .. bundle.get_MessageCount() - 1 email = bundle.GetEmail(i) # Does this email have attachments? # Use GetMailNumAttach because the attachments # are not actually in the email object because # we only downloaded headers. # (Had we downloaded the full emails by # calling mailman.FetchBundle, we could look # at the email object's NumAttachments property.) numAttach = imap.GetMailNumAttach(email) if (numAttach > 0) # Download the entire email and save the # attachments. (Remember, we # need to download the entire email because # only the headers were previously downloaded. # If the entire emails were downloaded by # calling FetchBundle instead of FetchHeaders, # this would not be necessary. # The ckx-imap-uid header field is added when # headers are downloaded. This makes it possible # to get the UID from the email object. uidStr = email.getHeaderField("ckx-imap-uid") uid = uidStr.to_i() fullEmail = imap.FetchSingle(uid,true) if (!(fullEmail == nil )) fullEmail.SaveAllAttachments("attachmentsDir") end for j in 0 .. numAttach - 1 filename = imap.getMailAttachFilename(email,j) print filename + "\n"; end end end # Disconnect from the IMAP server. imap.Disconnect() |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2007 Chilkat Software, Inc. All Rights Reserved.