ASP Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++DelphiFoxProJavaPerlPythonRubySQL ServerVBScript

ASP Examples

ASP String
ASP Byte Array
Bounced Mail
Character Encoding
Digital Certificates
Digital Signatures
Email
FTP
HTML-to-XML
HTTP
IMAP
Encryption
MHT / HTML Email
S/MIME
Socket
Spider
RSA Encryption
Tar
Upload
XML
XMP
Zip Compression

More Examples...
Email Object
POP3
SMTP
RSS
Atom
Self-Extractor

Unreleased...
Service
PPMD
Deflate
Bzip2
LZW
Bz2
DH Key Exchange
DSA
Icon

 

 

 

 

 

 

Save an Email Attachment using a Specific Filename

Demonstrates how to save an email attachment using a specific filename, regardless of the filename in the email.

Download Chilkat Email ActiveX for POP3 / SMTP

Download Chilkat IMAP ActiveX

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
'  Create a MailMan or Imap object first for the purpose
'  of unlocking the component. (Only one is necessary)
set mailman = Server.CreateObject("Chilkat.MailMan2")
mailman.UnlockComponent "anything for 30-day trial"
set imap = Server.CreateObject("Chilkat.Imap")
imap.UnlockComponent "anything for 30-day trial"

set email = Server.CreateObject("Chilkat.Email2")

'  Load an email object containing attachments.
'  This .eml can be downloaded from:
'  http://www.example-code.com/testData/HtmlEmail.eml

success = email.LoadEml("HtmlEmail.eml")
If (success <> 1) Then
    Response.Write Server.HtmlEncode(email.LastErrorText) & "<br>"

End If

'  List the attachment filenames:
'  This email has two attachments: logo.jpg and faxCover.doc

For i = 0 To email.NumAttachments - 1
    Response.Write Server.HtmlEncode(email.GetAttachmentFilename(i)) & "<br>"
Next

'  Let's say we want to save the 1st attachment as "pic.jpg",
'  and the 2nd attachment as "cover.doc".
'  Call SetAttachmentFilename for both:
email.SetAttachmentFilename 0,"pic.jpg"
email.SetAttachmentFilename 1,"cover.doc"

'  The SaveAttachedFile method allows you to specify the directory
'  where the attachment is saved.  To save to the current working
'  directory, pass a "." for the directory path.  This code
'  saves each attachment to the current working directory:
email.SaveAttachedFile 0,"."
email.SaveAttachedFile 1,"."

'  Alternatively, we could save all the attachments in a single
'  call.  The argument to SaveAllAttachments is the directory
'  path.  In this case, the filenames set by SetAttachmentFilename
'  are used:
email.SaveAllAttachments "myAttachments"

Response.Write Server.HtmlEncode("Finished!") & "<br>"

%>
</body>
</html>

 

Need a specific example? Send a request to support@chilkatsoft.com

© 2000-2008 Chilkat Software, Inc. All Rights Reserved.