Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,028

HOME > ASP > ASP Forum > mail ครับถ้ารับค่าจากฟอร์มแล้วเป็น???????????????????

mail ครับถ้ารับค่าจากฟอร์มแล้วเป็น???????????????????

เริ่มหัวข้อใหม่

Guest

ทำอย่างไงดีครับ
<%@codepage='874'%>
<%
Dim strTo,strSubject,strBody,strName,strCostID
strTo=Request.form("emil_to")
strSubject=Request.form("subject")
strName=Request.form("name")

On error resume next
Dim mySmartMail

strName=Request.form("name")
Set mySmartMail = Server.CreateObject("aspSmartMail.SmartMail")

mySmartMail.Server = "ip mailserver"

' From
' ****
mySmartMail.SenderName = "MyName"
mySmartMail.SenderAddress = "[email protected]"

' To
' **

'mySmartMail.Recipients.Add Request("email_to"),Request("Name")
'mySmartMail.ConfirmRead = true

' Message
' *******
mySmartMail.Subject = strSubject
mySmartMail.Charset = "window-874"
mySmartMail.Body =Request.form("body")

' Send the message
' ****************
mySmartMail.ContentType = "text/html"
mySmartMail.Encoding = "base64"

mySmartMail.SendMail

Response.write("<meta http-equiv='refresh' content='4; URL=javascript:window.close()'>")

if Err.Number<>0 then

Response.write "Error: " & Err.description

else

'Response.write "An e-mail has just been sent to " & mySmartMail.Recipients.Item(1).Name & "."

end if

%>

Tag : - - - -

Date : 7 มิ.ย. 2548 09:44:53

By : กรรมกรบริษัท

View : 2598

Reply : 1

No. 1

TC Admin

โพสกระทู้ ( 74,058 )
บทความ ( 838 )

ดูในส่วน Header ของ Web Page ให้เป็น

<meta http-equiv="Content-Type" content="text/html; charset=windows-874">

ด้วยนะครับ

Date : 7 มิ.ย. 2548 19:52:39