ASP邮件发送付值问题!!

来源：百度知道 编辑：UC知道 时间：2024/06/01 14:22:55
user="haha"
pwd="123456"
JMail.HTMLBody ="您的帐号是:"user"您的密码是:"pwd""
错误类型：
Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
这里是什么错误啊我应该怎么修改请大家指教!!

user="haha"
pwd="123456"
JMail.HTMLBody ="您的帐号是:" & user & "您的密码是:" & pwd

注册 cdonts组件
"运行"里面输入 regsvr32 cdonts.dll

自动发送处理代码：
<%
Dim MailObject
Response.Write "正在发送邮件......<BR>"
Mailto = Request("Mailto")
Mailfrom = Request("Mailfrom")
Mailsubject = Request("Mailsubject")
Mailbody = Request("Mailbody")
Mailfile = Request("Mailfile")

Set MailObject = Server.CreateObject("CDONTS.NewMail")
'收信人地址
MailObject.To = Mailto
'发信人地址
MailObject.From = Mailfrom
'信件标题
MailObject.Subject = Mailsubject
'信件内容
MailObject.Body = Mailbody
'附件地址
MailObject.AttachFile Mailfile
'开始发送邮件
MailObject.Send
Set MailObject = Nothing
Response.Write "邮件发送成功了"
%>
运行