继续问??

roam831 2003-10-09 01:55:31
<%
name = Request.Form ("name")
email= Request.Form ("email")
mailsubject= Request.Form ("mailsubject")
mes= Request.Form ("mes")
//image=Request.Form("ImageID")

dim CLStr,msg,mailserver,username,password,receive
CLStr=Chr(13) & Chr(10)

mailserver="********" '邮局服务器地址(smtp服务器地址)
username="***@****.***" 'smtp服务器验证登陆名
password="*****" 'smtp服务器验证密码 (信箱密码)
receive= email '接受反馈信息的email地址

Set msg = Server.CreateObject("JMail.Message")
msg.ContentType="text/html"
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = username
msg.MailServerPassword = password
msg.From = username
msg.FromName = username
msg.AddRecipient (receive)
msg.Subject = Request.Form("mailsubject")

msg.Body = 你的朋友"&Request.Form("name")&CLStr
msg.Body = msg.Body&"给您发来了贺卡!"&CLStr
msg.Body = msg.Body&"祝福你"&Request.Form("mes")&CLStr
//msg.Body = msg.Body&"<img src=http://127.0.0.1/images/" & image & ""&CLStr

msg.Send (mailserver)
msg.close
set msg = nothing

%>

前面有打//的那两句我不知道该什么处理?
目地是要让贺卡直接显示在邮箱里,像上面那样在邮箱图片是打叉的

...全文
99 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
roam831 2003-10-09
  • 打赏
  • 举报
回复
可以了,我少了一个父目录
谢谢楼上的兄弟
xxrl 2003-10-09
  • 打赏
  • 举报
回复
http://127.0.0.1/
换成存放图片的服务器IP
roam831 2003-10-09
  • 打赏
  • 举报
回复
to 楼上的

我现在是在本机上测试啊
不老书生 2003-10-09
  • 打赏
  • 举报
回复
msg.Body = msg.Body&"<img src=http://www.sohu.com/images/" & image & ""&CLStr

上面图片的地址必须是存在的网址!不能是本地路径!

邮件文本要设为html方式

28,390

社区成员

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

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