sendmail.asp

来自「集合了学习asp的100个实例」· 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 + -
显示快捷键?