sendmessage.asp

来自「ASP+SQL Server动态网站开发从基础到实践教程」· ASP 代码 · 共 23 行

ASP
23
字号
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
正在发送,请等待......<BR>
<%
set sender=server.CreateObject("mail.sendmail")
sender.SmtpServer="zhongjun.tsinghua.edu.cn"
sender.strContent=Request.Form("txtcontent")
sender.strFromMail=Request.Form("txtfrom")
sender.strReceiveName=Request.Form("txtreceivename")
sender.strSendName=Request.Form("txtsendname")
sender.strSubject=Request.Form("txtsubject")
sender.strToMail=Request.Form("txtto")
result=sender.SendMail 
Response.Write result
%>
<P>&nbsp;</P>
</BODY>
</HTML>

⌨️ 快捷键说明

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