sendmail.asp

来自「100个经典的ASP程序」· ASP 代码 · 共 25 行

ASP
25
字号
<html>
<head>
<title>
发送电子邮件
</title>
</head>
<body>
<%
towho=trim(request.form("towho")
subject=trim(request.form("subject")
content=trim(request.form("content")
if towho<>"" then
    set myMail=server.createObject("CDONTS.Newmail")
    myMail.from="fang@abc.com"
    myMail.to=towho
    myMail.subject=subject
    myMail.body=content
    myMail.send
    set myMail=nothing 
    Response.Write "你的邮件已经发往" & towho
else
    Response.Write "你请输入你所要发往的邮箱地址"
end if
</body>
</html>

⌨️ 快捷键说明

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