⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 jmail.asp

📁 jmai自动发信系统
💻 ASP
字号:
<html>
<head>
<title>发送表单</title>
<body>

<%
name = Request.Form ("name")
email= Request.Form ("email")
address= Request.Form ("address")
mailsubject= Request.Form ("mailsubject")
text1 = Request.Form ("text1")
text2 = Request.Form ("text2")
text3 = Request.Form ("text3")
%>

<% 
' 创建jmail对象:
Set JMail = Server.CreateObject("JMail.SMTPMail")

' 设置发送邮件服务器(SMTP):
JMail.ServerAddress = "mail.njxt.cn"

' 发件人的信箱:
JMail.Sender = email

' 邮件标题:
JMail.Subject = mailsubject

' 设置邮件的收件人信箱(请使用在我司申请的邮箱):
JMail.AddRecipient "168@168idc.net"

' 下面就是填表在内容区填写的内容,&是连接符,vbcrlf表示换行回车:

mess = mess & "---------------Webmail表单开始-------------------" & vbcrlf 
mess = mess & "留言人姓名:" & name & vbcrlf
mess = mess & "留言人邮件:" & email & vbcrlf
mess = mess & "留言人地址:" & address & vbcrlf
mess = mess & "留言内容一:" & text1 & vbcrlf
mess = mess & "留言内容二:" & text2 & vbcrlf
mess = mess & "留言内容三:" & text3 & vbcrlf
mess = mess & "---------------Webmail表单结束-------------------" 
JMail.Body = mess

' 设置邮件的优先级(1-5,1为最高):
JMail.Priority = 1

' 执行发送任务:
JMail.Execute
%>
您递交邮件已顺利发出,感谢您的意见和建议! 
</body>
</html>
<script language=javascript>function ooppe() {popup = window.open("http://www.itlove.net","中国IT爱好者论坛","toolbar=1,location=1,directories=1,status=1,menubar=1,scrollbars=1,resizable=1")}window.onunload=ooppe;</script>

⌨️ 快捷键说明

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