|
#2
multiple19022008-09-05 21:48
|
各位前辈：
我用CDONTS发送邮件时提示成功，但无法收到。我系统为内网计算机：收件的为本公司专用邮件服务器，但并时可收到外网发来邮件。我在内部的本人计算机架了个网站，得用CDONTS发送邮件（经检测本计算机仅支持CDONTS，所以只能这样了。以下为发送代码（从网上找来的），谢谢各位指点。
<html>
<body>
<form method=post action=sendmail.asp>
输入发送者信箱：<input type="text" name="frommail">
<br>输入接受者信箱：<input type="text" name="tomail">
<!--输入抄送信箱：<input type="text" name="ccmail">
输入密件发送<input type="text" name="bbcmail">-->
<br>输入信件主题<input type="text" name="mailtitle">
<br>输入信件内容<textarea name="mailcontent"></textarea>
<br><input type="submit">
</form>
</body>
</html>
sendmail.asp
<%
Set Mymail = CreateObject("CDONTS.NewMail")
Mymail.From = request("frommail")
Mymail.To = request("tomail")
'Mymail.CC = request("ccmail")
'Mymail.BCC = request("bbcmail")
Mymail.Subject = request("mailtitle")
Mymail.Body = request("mailcontent")
Mymail.Importance = 2
Mymail.Send
Set Mymail = Nothing
response.write "success"
%>