如何把调查的信息发送到邮箱中?

zou_cz 2003-12-07 12:05:37
我想做一个问卷调查,当调查提交后自动把提交的内容发送到我的邮箱中不知道如何才能实现?
...全文
597 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
dingyanwei 2003-12-07
  • 打赏
  • 举报
回复
Sub SendMail(Recipient,Subject,Body)
Set Jmail=Server.CreateObject("Jmail.SMTPMail")
Jmail.ServerAddress="localhost"
Jmail.AddRecipient Recipient
Jmail.Subject=Subject
Jmail.Body=Body
Jmail.ContentType="text/html"
Jmail.Sender="web@maiaddress.com"
Jmail.Priority=2
Jmail.Execute
Set Jmail=nothing
End Sub
wanghr100 2003-12-07
  • 打赏
  • 举报
回复
FAQ里面有专题啦...
ASP 收发邮件
http://expert.csdn.net/Expert/FAQ/List_Room_FAQ_Index.asp?Roomid=301
wanghr100 2003-12-07
  • 打赏
  • 举报
回复
http://expert.csdn.net/Expert/topic/2533/2533960.xml?temp=.5738336
wanghr100 2003-12-07
  • 打赏
  • 举报
回复
用Cdonts实现发送Email
http://www.chinabs.net/asp/default.asp?infoid=11
zorou_fatal 2003-12-07
  • 打赏
  • 举报
回复
收集用户提交的信息,编制好格式,然后用jmail组件发送邮件。
dingyanwei 2003-12-07
  • 打赏
  • 举报
回复
楼上的,用我上面写的就差不多能好使了。我以前也遇到过这样的问题。
gdst 2003-12-07
  • 打赏
  • 举报
回复
借光请教一下,
按下面这样写为什么不能工作?


<%
DIM mymail
set mymail = server.createobject("CDONTS.NewMail")
mymail.from = "jhal@21CN.NET"
mymail.To = "cutebox@21cn.com"
mymail.subject = "text"
mymail.body = "hello!this is a test mail"
mymail.send
set mymail = NOTHING
%>
monkeys 2003-12-07
  • 打赏
  • 举报
回复
很多网站上的电子邮件都是自动回复的,就象163电子邮局提供的邮件自动回复功能一样。这是怎么实现的?

我们可以用ASPMail组件来实现电子邮件的自动反馈。代码如下:
<%
Set mailer = Server.CreateObject("ASPMAIL.ASPMailCtrl.1")
recipient="接收者"
sender="发送者"
subject="主题"
message="内容"
mailserver = "163.net";
result = mailer.SendMail(mailserver, recipient, sender, subject, message)
%>


另外:FAQ里有比较多而全的资料

28,407

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧