mail2.asp

来自「数据结构课程设计之最小生成数的K算法的实现 简短 简洁」· ASP 代码 · 共 34 行

ASP
34
字号
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 1</title>
</head>

<body>
<%
dim objectcdo
set objectcdo=createobject("cdo.message")
objectcdo.to=request.form("recipient")
objectcdo.from=request.form("sender")
objectcdo.cc=request.form("cc")
objectcdo.subject=request.form("subject")
objectcdo.textbody=date & "" &  time & chr(10) & request.form("textbody")
objectcdo.send
response.write"邮件正本:" & request.form("recipient") & "<br>"
response.write"邮件副本:" & request.form("cc") & "<br>"
response.write"发送日期:" & date & "<br>"
response.write"发送时间:" & time & "<br>"
response.write"主旨:" & request.form("subject") & "<br>"
response.write"邮件内容: <br>"
response.write string(20,"=") & "<br>"
response.write request.form("subject") & "<br>"
response.write string(20,"=") & "<br>邮件已经为您发出!"
set objectcdo=nothing
%>
</body>

</html>

⌨️ 快捷键说明

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