附件：sendmail.asp

<!–
    this sample script uses the cdo for nts library to
    send email to a specific user.
    leon braginski & matt powell (c)
    note: "to" is a reserved word, so we added an underscore to it.
–>

<%@ language = "vbscript" %>

<%
if (request.servervariables ("request_method") = "post") then
    from = request.form("from")
    to_ = request.form("to")
    subject = request.form("subject")
    body = request.form("body")
else
     assume it is get
    from = request.querystring("from")
    to_ = request.querystring("to")
    subject = request.querystring("subject")
    body = request.querystring("body")
end if

set objnewmail = server.createobject ("cdonts.newmail")
objnewmail.send from, to_, subject, body
set objnewmail = nothing
response.write "message was sent"
%>