?? mail.asp
字號(hào):
<%
set cai_jmail=conn.execute("select cai_mail,cai_smtp,cai_username,cai_password from cai_const ")
on error resume next
body=" "&content&" "&vbCrlf&""&vbCrlf&""&vbCrlf&"-----------------------------------------------------------------"&vbCrlf&"在線發(fā)送郵件系統(tǒng),設(shè)計(jì)制作：時(shí)代設(shè)計(jì)，Http://www.1ni.cn"
Set JMail=Server.CreateObject("JMail.Message")
JMail.Charset="gb2312"
JMail.AddRecipient Mailaddress
JMail.Subject = title
JMail.Body = body
JMail.From = cai_jmail(0)
JMail.MailServerUserName = cai_jmail(2)
JMail.MailServerPassword = cai_jmail(3)
JMail.Send cai_jmail(1)
Set JMail=nothing
If Err Then Response.Write ""&Mailaddress&"郵件發(fā)送失敗！錯(cuò)誤原因：" & Err.Description & "<br>"
On Error GoTo 0
%>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -