|
主题: CDONTS发邮件?
|
 清风
职务:普通成员
等级:1
金币:1.0
发贴:197
注册:2003/2/28 0:26:50
|
#12003/6/23 12:02:58
问一个很菜的问题,租来的虚拟主机能否安装JMAIL,我的空间不支持JMAIL,支持CDONTS,网上的教程看不懂,高手能做个简单的表单发送信息到邮箱的程序吗? 有原代码最好!
我试着用CDONTS做了个最简单的,能发送,但就是没有内容!请高手指教!!!
原文件表单:
post.asp
发送表单
<% '以下是信件体,大家在我的留言版的所有信件就是这样发给我的。
strBody = "===========留言版留言===========" & vbCrLf strBody = strBody & "发信时间:" & Now() & vbCrLf strBody = strBody & "留言人:" & Name & vbCrLf strBody = strBody & "电子邮件:" & Email & vbCrLf strBody = strBody & "留言内容:" & Text & vbCrLf strBody = strBody & "============ END ============="
Set myMail = Server.CreateObject("CDONTS.NewMail") myMail.From = Email myMail.To = "yourmailbox@mailhost.com" myMail.Subject = Mailsubject myMail.Body = StrBody myMail.Send
Set myMail=Nothing
'当 Send 方法成功完成任务时,NewMail 对象将失效但并不从内存中清除。你应该将失效对象设置为 Nothing 以便将其从内存中清除或给它重新分配另一个NewMail 对象。
%>
邮件已顺利发出,感谢您的意见和建议!
提交后,时间能显示,留言人等都不能显示,我不懂程序,高手拉兄弟一把!!
|
 沉默是金
职务:普通成员
等级:6
金币:11.2
发贴:4357
注册:2004/2/18 11:17:25
|
#22003/6/23 15:46:05
strBody = strBody & "发信时间:" & Now() & vbCrLf strBody = strBody & "留言人:" & Name & vbCrLf strBody = strBody & "电子邮件:" & Email & vbCrLf strBody = strBody & "留言内容:" & Text & vbCrLf strBody = strBody & "============ END =============" 你只得到了now()的时间,请问你的留言人(name),电子邮件(email),留言内容(text)变量的值在哪呢?你根本就没有得到它们的值,你要如何显示出来呢!
难人一个……
|
 缺缺
职务:管理员
等级:8
金币:41.0
发贴:9620
注册:2004/1/14 19:14:47
|
#32003/6/23 15:47:59
你首先要通过request的方法获得变量的值.
|
 清风
职务:普通成员
等级:1
金币:1.0
发贴:197
注册:2003/2/28 0:26:50
|
#42003/6/23 18:06:33
thank you !!! 我对编程简直就是.......,多谢2位大侠指点!
我在查一下request的用法吧!
|