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> </P>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?