email_reg.asp

来自「能进行网上购物的需求」· ASP 代码 · 共 32 行

ASP
32 行
字号 
<%Dim sendname,msg,SendMail
sendname= jmail_sendname
Set msg = Server.Createobject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = jmail_sendmail 
msg.MailServerPassword = jmail_sendpass   
msg.From = jmail_frommail        
if sendname<>"" then
msg.FromName = sendname    
end if
msg.AddRecipient  Request.Form("user_mail")
msg.Subject="您在"&sitename&"的注册信息！"
msg.Body = "邮件标题"        
msg.HTMLBody ="<html><title>您的注册信息</title><body><TABLE border=0 width='95%' align=center><TR><TD valign=middle align=top>"&trim(request.form("user_name"))& " 您好：<br>欢迎您注册为 ["&sitename&"] 的会员，您的注册信息如下：<br>用户名："&trim(request.form("user_id"))&"<br>密　码："&trim(request.form("ps2"))& "<br><br>您在购物中有什么问题请随时与我们联系，我们的联系方式是：<br>QQ："&sys_oicq&"<br>email："&mail&"<br>电话："&sys_tel&"<br>本站地址：<a href='"&web&"' target='_blank'>"&web&"</a></TD></TR></TABLE></body></html>"
msg.ReturnReceipt=true
msg.Send (jmail_smtp)          
set msg = nothing
if err then 
    SendMail=err.description
   err.clear
else
    SendMail="OK"
end if
if SendMail="OK" then
response.write"<li>注册信息已成功发送到您的邮件中。"
else
response.write"<li>由于系统错误，邮件未能成功发送。"
end if
%>

email_reg.asp - 源码说明

本页面展示了「能进行网上购物的需求」中的 email_reg.asp 源码文件，采用 ASP 编程语言编写，共 32 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与网上购物相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?