主题:  怎样把表单提交的数据生成一个HTML页面发送到指定的邮箱?

Alon

职务:普通成员
等级:1
金币:0.0
发贴:1
注册:2002/10/18 13:28:58
#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]