北斗七星是恒星吗:为什么我提交的表单数据不能进入我的邮箱里

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 14:57:51
下面是一段代码,是通过表单提交数据提交到这个页面里面通过126的邮箱服务器发到我要接收到邮箱里,以前用的好好的现在怎么不可以发了。而且换了邮箱也是不能:
下面为代码:
<%
Sub Send_Jmail(Mail_Title,Mail_Body,Mail_incept)
Set JMAIL = Server.CreateObject("JMAIL.Message") '建立发送邮件的对象
JMAIL.silent = true '屏蔽例外错误,返回FALSE跟TRUE两值j
JMAIL.logging = true '启用邮件日志
JMAIL.Charset = "GB2312" '邮件的文字编码为国标
JMAIL.ContentType = "text/html" '邮件的格式为HTML格式
JMAIL.AddRecipient Mail_incept '邮件收件人的地址
JMAIL.From = "hyjt2001@126.com" '发件人的E-MAIL地址
JMAIL.FromName="网站客户反馈信息" '发件人的E-MAIL地址
JMAIL.MailServerUserName = "hyjt2001" '登录邮件服务器所需的用户名
JMAIL.MailServerPassword = "121121" '登录邮件服务器所需的密码
JMAIL.Subject = Mail_Title '邮件的标题
JMAIL.Body = Mail_Body '邮件的内容
'JMAIL.Prority = 3 '邮件的紧急程序,1 为最快,5 为最慢, 3 为默认值
JMAIL.Send("smtp.126.com") '执行邮件发送(通过邮件服务器地址)
JMAIL.Close() '关闭对象
End Sub
msg=""
msg=msg&"企业名称:"&request("m1") &"<br>"
msg=msg&"联 系 人:"&request("m2") &"<br>"
msg=msg&"职 位:"&request("m3") &"<br>"
msg=msg&"联系电话:"&request("m4") &"<br>"
msg=msg&"手机号码:"&request("m5") &"<br>"
msg=msg&"竞价价格:"&request("m6") &"<br>"
msg=msg&"备 注:"&request("m7") &"<br>"
Call Send_Jmail("网站客户竞价",msg,"hyjt2001@chinatextile.net")
Response.Write("发送报价成功!!<br>")
%>
<a href=javascript:history.go(-1)><font color="#996666" face="Times New Roman, Times, serif">>>返回<<</font></a>
怎么样以电子表格形式

以附件的形式发过去,怎么样?

你先保存为电子表格形式!!!
然后以邮箱附件的形式就行了,
电子表格的后缀为::: .xls 保存这种就行了!!