#12002/10/18 13:31:34
请教各位前辈:如何能把表单提交的数据生成一个HTML页面发送到指定的邮箱?小子在网上找了一点资料,但不能看懂,超级菜鸟一个,不知将源码放在网页文件的何处和以何种格式保存,如果方便的话,能不能写一个简单表格提交网页的源码,如果各位前辈有更好的方法,请指点一、二,谢谢!
下面附上我找到的资料:
方法一:
在IIS4下,你可以使用CDONTS。
虽然名字奇怪,它是很容易使用的并且性能良好。如果你希望使用它,请跟随下面步骤。
1.检查你是否安装了SMTP服务。OPTION PACK缺省安装时是包括SMTP服务的。
SMTP服务安装后,在你的system32目录下会有一个文件叫CDONTS.DLL。
2.你可以用下面的简单脚本通过A S P发送E-MAIL:
$#@60;%
Dim MailObject
Set MailObject = Server.CreateObject("CDONTS.NewMail")
MailObject.Send "stelede@ozemail.com.au","stelede@ozemail.com.au","My subject","My text"
%$#@62;
发送附件
CDONTS的一个常用特性是用来在E-MAIL中发送附件。代码也不难写。
$#@60;%
Dim MailObject
Set MailObject = Server.CreateObject("CDONTS.NewMail")
att_file="c:\attachments\StandardPolicy.txt"
f_name="Policy.txt"
MailObject.From="stelede@ozemail.com.au"
MailObject.To="j_smith@zentus.com"
MailObject.Subject="Subject Text Here"
MailObject.Body="Body Text Here"
MailObject.AttachFile att_file,f_name
MailObject.Send
%$#@62;
方法二:
<%
Set MailObject = Server.CreateObject("CDONTS.NewMail")
MailObject.From = "发信人邮箱"
MailObject.To = "收信人邮箱"
MailObject.Subject = "邮件主题"
MailObject.Body = "邮件内容" '这些内容你可以用Request.form()接收表单的提交
MailObject.Mailformat = 1 '邮件的格式,0是MIME格式,1是文本消息
MailObject.Bodyformat = 0 '邮件的正文的格式,0表示HTML格式,1表示普通文本
MailObject.Importance = 1 '邮件的重要性,0表示低重要性,1表示普通,2表示高重要
MailObject.AttachFile ( "附件绝对路径" )
MailObject.Send
Set MailObject = Nothing
%>
[email=wdmrnrstx@163.net]联系小子[/email]