ASPMail - Format email in HTML which has ATTACHMENT

[yash777]

hello all,

how can we send an html formatted email which has word ATTACHMENT ???

(is it possible)

[DrBunchman]

Hi Yash,

Use the following code snippet to help you:

 
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="[e-mail]"
myMail.To="[e-mail]"
myMail.CreateMHTMLBody "http://www.w3schools.com/asp/" 
myMail.AddAttachment "C:\AttachmentFile.txt"
myMail.Send
set myMail=nothing
 

Hope this helps,

Dr B

[yash777]

hello DR.B,

Actually i m requesting entries from a form and then sending those form elements in formated html (within same page)

following is sample of my code:

jobcode=TRIM(Request.Form("jobcode"))
jobcategory=TRIM(Request.Form("jobid"))
name=TRIM(Request.Form("f_name"))&" "&TRIM(Request.Form("m_name"))&" "&TRIM(Request.Form("l_name"))
sex=TRIM(Request.Form("gender"))
M_status=TRIM(Request.Form("optMarital"))
 
strbody = "<font face='verdana' size=2>"
strbody = strbody & "<BR><B>Job Code</B> : "&jobcode&" <br>"
strbody = strbody & "<BR><B>Job Category</B> : "&jobcategory&" <br>"
strbody = strbody & "<BR><B>Name</B> : "&name&" <br>"
strbody = strbody & "<BR><B>Gender</B> : "&sex&" <br>"

sending the above strBody as body

Mailer.BodyText = strBody
Mailer.AddAttachment(...........)

and i m using SMTPsvg mailer.

can it be done within the same page.

[DrBunchman]

I don't see why not. You could probably do something like

 Mailer.ContentType = "text/html" 
Mailer.BodyText = strBody
Mailer.AddAttachment "AttachmentFile.txt"
 

Give it a try and let me know how it goes,

Dr B

[yash777]

hello dr.B,

yes i did the same but when i check the mail it just write that HTML code also,

i read somewere that Mailer.ContentType="text/html" gets omitted when u use attachment.

[DrBunchman]

I've just had a quick google and that seems to be the case, certainly with some versions of ASPMail. There is a possible fix here which might help you.

Otherwise have you considered using CDOSYS instead?

Let me know if that link helps you,

Dr B

[yash777]

NO, it's not helpful.

Any other way to do this????

don't have any idea about CDOSYS............

How can we do this using CDOSYS ??

[DrBunchman]

CDOSYS is a mail object just like ASPMail.

Try the code below and let me know if it works.

 Set myMail=CreateObject("CDO.Message") 
myMail.Subject="Sending email with CDO"
myMail.From=[e-mail]
myMail.To=[e-mail]
myMail.HTMLBody = strBody
myMail.AddAttachment "C:\AttachmentFile.txt"
myMail.Send
set myMail=nothing
 

Dr B

[yash777]

thank u for ur reply,

actually i dont know all properties of CDOSYS like

Mailer.FromName = 
Mailer.FromAddress = 
Mailer.RemoteHost =  
Mailer.ReturnReceipt = true
Mailer.ConfirmRead = false
Mailer.Priority = 0
Mailer.Subject = subject
Mailer.ContentType = "text/html"
Mailer.BodyText = strBody
Mailer.ClearRecipients        
Mailer.AddRecipient 
Mailer.AddRecipient 
Mailer.AddAttachment
Mailer.SendMail

i will google it a bit and then let u know whether it is working or not.

and also my office timing is over.

SO.. thanx for ur support, hope will clear this tomorrow.

thanx again.

[DrBunchman]

No problem, check out w3Schools for some of the properties but there are loads of resources out there.

Dr B

[yash777]

hello DR.B,

thanx a lot for ur support.

i did it with CDOSYS, it's working fine for me.

thanx again..

keep replying.

[DrBunchman]

Excellent Yash! Glad you got it sorted out.

Dr B