主题:  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的用法吧!