مشاهده نسخه کامل
: batman2008
10-08-2008, 09:04
سلام به همه دوستان و اساتید محترم
میخوام با فلش وبا استفاده از asp یک ایمیل بفرستم من از کد زیر استفاده کردم ولی جواب نداد
از شما راهنمایی میخوام[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]
<.asp>
<head>
<title>Emailer ASP</title>
<meta [ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]"Content-Type" content="text.asp; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
Dim strFrom, strTo, strSubject, strBody
strFrom = Request.Querystring("emailfrom")
strTo = Request.Querystring("emailto")
strSubject = Request.Querystring("emailsubject")
strBody = Request.Querystring("emailbody")
Dim MyMail
Set MyMail = Server.CreateObject("CDONTS.NewMail")
MyMail.From = strFro
MyMail.To = strTo
MyMail.Subject = strSubject
MyMail.BodyFormat = 1
MyMail.MailFormat = 0
MyMail.Importance = 2
MyMail.Body = strBody
MyMail.Send
Set MyMail = Nothing
%>
Your email has been sent.
</body>
<.asp>
میخوام با فلش وبا استفاده از asp یک ایمیل بفرستم من از کد زیر استفاده کردم ولی جواب نداد
از شما راهنمایی میخوام[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]
<.asp>
<head>
<title>Emailer ASP</title>
<meta [ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]"Content-Type" content="text.asp; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
Dim strFrom, strTo, strSubject, strBody
strFrom = Request.Querystring("emailfrom")
strTo = Request.Querystring("emailto")
strSubject = Request.Querystring("emailsubject")
strBody = Request.Querystring("emailbody")
Dim MyMail
Set MyMail = Server.CreateObject("CDONTS.NewMail")
MyMail.From = strFro
MyMail.To = strTo
MyMail.Subject = strSubject
MyMail.BodyFormat = 1
MyMail.MailFormat = 0
MyMail.Importance = 2
MyMail.Body = strBody
MyMail.Send
Set MyMail = Nothing
%>
Your email has been sent.
</body>
<.asp>