[求助]为什么我的这个群发邮件失败
我得这个群发邮件再发了四十多封后提示失败<!--#include file="../../include/conn.asp"-->
<%
If Session("Admin")<>"admin" Then
Call Root_Check(Session("W_Root"),011)
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>群发邮件</title>
</head>
<body>
<script language=javascript>
var Member=new Array();
var per;
Member[<%=I%>]=new Array("电子邮箱","会员账号","ID");
function sendmail(i)
{
var userid;
var strResult;
var ArtID=<%=文章ID%>;
var sendInfo;
if (window.XMLHttpRequest)
{
oBao = new XMLHttpRequest();
}
else if (window.ActiveXObject)
{
oBao = new ActiveXObject("Microsoft.XMLHTTP");
}
userid=escape(Member[i][0]);
ArtID=escape(ArtID);
oBao.open("POST","email.asp",false);
sendInfo="UserID="+userid+"&ID="+ArtID;
oBao.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
oBao.send(sendInfo);
strResult=unescape(oBao.responseText);
ShowBar(strResult,i+1);
}
function ShowBar(message,num)
{
per=Math.round(num*100/Member.length);
if(message=="True")
{
div_message.innerHTML+="发送到会员"+Member[num-1][1]+"的邮箱"+Member[num-1][0]+"的邮件成功<br/>";
}
else
{
div_message.innerHTML+="发送到会员"+Member[num-1][1]+"的邮箱"+Member[num-1][0]+"的邮件失败<br/>";
div_message.innerHTML+="错误代码："+message;
return false;
}
ddd.innerHTML= "<br><table width='264' border=0 cellpadding='0' cellspacing='0' ><tr><td width='"+per+"%' background='loadbar.gif' height=25 >"+per+"%</td><td width='"+(100-per)+"%'></td></tr></table>";
if(num<(Member.length+1))
{
setTimeout("sendmail("+num+");", 2000);
}
else
{
alert('邮件发送完成!');
}
}
</script>
<input type="submit" name="Submit" value="群发邮件" onClick="sendmail(0);">
<div id="ddd" width=300px></div>
<br></br>
<DIV id=div_message ></DIV>
</body>
</html>
