PDA

View Full Version : ارسال ایمیل به همراه فایل



ghaum
شنبه 15 آذر 1382, 14:21 عصر
سلام
من وقتی که از این کد استفاده میکنم جهت ارسال ایمیل،به جای اینکه فایلم را به صورت تفسیر شده نشان دهد ،سورس فایلم را نشان می دهد
شما دلیلش را می دانید؟


<%

FileName="C:\index1.asp"

Set objNewMail = Server.CreateObject("CDONTS.NewMail")
objNewMail.From = "Zahra"
objNewMail.To="ghaum@yahoo.com"
objNewMail.Subject = "Test"
objNewMail.Body="Salam.<br>khobi?"
objNewMail.MailFormat = 0
objNewMail.BodyFormat = 0
objNewMail.AttachFile FileName
objNewMail.Send
Set objNewMail = Nothing


%>