📄 sendmail.asp

📁 由网络搜集供大家学习使用如果侵占请自行删除

💻 ASP

字号:

<%
password="www.qbtrade.com"				'不要改密码，否则无法发送

dim mailFrom,mailTo,mailSubject,mailbody

'====以下内容可以改成你自己的脚本，例如从数据库中取数据等====
success_url=request("backto")			'发送成功后转到,这里改成你
mailFrom =request("from")				'发件人
mailTo = request("to")					'收件人
mailSubject =request("subject")			'主题
mailBody = request("body")				'信体

'=================以下不用修改了==================

sendmail mailFrom,mailTo,mailSubject,mailBody,success_url,password

function sendmail(from,toxxx,subject,body,success_url,pass)

dim mail_prog,password
mail_prog="http://netfansky.uhome.net/cgi-bin/sendmail.cgi" '发信的cgi程序

if from="" or toxxx="" then
	response.write "错误！发件人和收件人必须填写！点击<a href=javascript:history.go(-1)>这里返回</a>重写"
	exit function
else
	if subject="" then subject="（空）"
	if body="" then body="没有内容"
	response.cookies("qbtrade_news")("email")=mailFrom
end if

%>
<html>
<head>
<title>正在发送...</title></head>
<body bgcolor="#FFFFFF">
正在发送,请稍侯...<br>
Sending,please wait...
<form name="form1" method="post" action="<%=mail_prog%>">
  <input type="hidden" name="from" value="<%=from%>">
  <input type="hidden" name="to" value="<%=toxxx%>">
  <input type="hidden" name="subject" value="<%=subject%>">
  <input type="hidden" name="body" value="<%=body%>">
  <input type="hidden" name="success_url" value="<%=success_url%>">
  <input type="hidden" name="password" value="<%=pass%>">
</form>
<script>form1.submit()</script>
</body>
</html>
<%
end function
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -