我XP系统用的ws Jmail 4.3的组件，就高手帮助。

qq448571358 · 发表于 2011-10-14 01:24:48

我XP系统用的ws Jmail 4.3的组件，网页里测试邮箱，点提交发送后，没有出错，可是接收不了邮件，我用的是QQ邮件发送和接收，
代码如下，请高手帮助。我用探测Jmail看是否支持却说，不支持，我该如何呢？

山坛兄弟 · 发表于 2011-10-14 11:28:01

QQ邮箱需要开启SMTP功能才行的，默认QQ不是开启的

qq448571358 · 发表于 2011-10-14 13:12:56

我以开启了，
下面是我的代码：
<[email=%@LANGUAGE=]%@LANGUAGE="VBSCRIPT[/email]" CODEPAGE="936"%>
<html>
<head>
<script type="text/javascript">
function Mycheck(form)
{
for(i=0;i<form.length;i++)
{
if (form.elements.value=="")
  {
  alert("请输入完整信息内容。");
  return false;
  }
}
}
</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<% if request.form("hidd") = "" then %>
<form name="form1" method="post" action="">
  <table width="755" height="416" border="1" cellpadding="0" cellspacing="0">
<tr>
   <td width="185">CDONTS组件使用</td>
   <td width="570"> </td>
</tr>
<tr>
   <td>收件人：</td>
   <td><input name="shoujianrendizhi" type="text" id="shoujianrendizhi"></td>
</tr>
<tr>
   <td>发件人：</td>
   <td> </td>
</tr>
   <tr>
   <td>密码：</td>
   <td> </td>
   </tr>
<tr>
   <td>地址：</td>
   <td> </td>
</tr>
<tr>
   <td>邮件标题：</td>
   <td><input name="biaoti" type="text" id="biaoti"></td>
</tr>
<tr>
   <td>邮件内容：</td>
   <td><textarea name="neirong" cols="60" rows="6" id="neirong"></textarea></td>
</tr>
<tr>
   <td> </td>
   <td> </td>
</tr>
<tr>
   <td><input name="hiddenField" type="hidden" value="1"></td>
   <td><input name="send" type="submit" value="提交">
   <input type="reset" name="Submit2" value="重置"></td>
</tr>
  </table>
</form>
<% else %>
<%
dim strshoujianrendizhi,strbiaoti,strneirong,strfajianrendizhi,stryoujianfuwuqidizhi,strfajianrenxingming,msg
strshoujianrendizhi=request.form("shoujianrendizhi")
strbiaoti=request.form("biaoti")
strneirong=request.form("neirong")
strfajianrendizhi = "448571358@qq.com"
stryoujianfuwuqidizhi = "smtp.qq.com"
strfajianrenxingming = "小张"
set msg = server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charest = "gb2312"
jmail.ContentType = "text/html"
msg.AddRecipient = strshoujianrendizhi
msg.FromName = strfajianrenxingming
msg.From = strfajianrendizhi
msg.MailServerUserName = "448571358"
msg.MailServerPassword = "xiaoxiao"
msg.Priority = 1
msg.Subject = strbiaoti
msg.Body = strneirong
msg.Send(stryoujianfuwuqidizhi)
msg.Close()
%>
<% end if %>
</body>
</html>

[ 本帖最后由 qq448571358 于 2011-10-15 00:40 编辑 ]

qq448571358 · 发表于 2011-10-14 13:33:48

我QQ都开启了SMTP了，有图，你看看，请高手帮助

qq448571358 · 发表于 2011-10-14 19:27:15

求高手讲解，

山坛兄弟 · 发表于 2011-10-15 10:00:49

[ 本帖最后由山坛兄弟于 2011-10-15 12:53 编辑 ]

qq448571358 · 发表于 2011-10-15 13:10:33

版主好人，我看到你加我QQ了，你下回啥时候上线呢？
我们在线聊好吗？
我一般晚上都在线，
我等你啊。

		自动登录	找回密码
密码			会员注册

[求助] 我XP系统用的ws Jmail 4.3的组件，就高手帮助。

回复 2楼山坛兄弟的帖子

回复 6楼山坛兄弟的帖子

浏览过的版块

[求助] 我XP系统用的ws Jmail 4.3的组件，就高手帮助。

回复 2楼 山坛兄弟 的帖子

回复 6楼 山坛兄弟 的帖子

浏览过的版块

回复 2楼山坛兄弟的帖子

回复 6楼山坛兄弟的帖子