以文本方式查看主题

-  中文XML论坛 - 专业的XML技术讨论区  (http://bbs.xml.org.cn/index.asp)
--  『 XML基础 』  (http://bbs.xml.org.cn/list.asp?boardid=1)
----  ASP vb里加入读取aspxml数据时!无法取得数据反而一直刷新!  (http://bbs.xml.org.cn/dispbbs.asp?boardid=1&rootid=&id=54161)


--  作者:070707
--  发布时间:10/22/2007 1:28:00 PM

--  ASP vb里加入读取aspxml数据时!无法取得数据反而一直刷新!
为什么我在ASP vb里加入读取aspxml数据时!无法取得数据反而一直刷新!不停的!
是哪错了么?

<script type="text/javascript">
var URL = "OpenLocal.asp";

var arrWeekdays = new Array("", "星期一", "星期二", "星期三", "星期四", "星期五", "星期六", "星期日");
var xmlHttp;

function createXMLHttpRequest()
{
 if (window.ActiveXObject)
 {
  xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
 }
 else if (window.XMLHttpRequest)
 {
  xmlHttp = new XMLHttpRequest();
 }
}

function startRequest()
{
 //createXMLHttpRequest();
 //xmlHttp.onreadystatechange = handleStateChange;
 //xmlHttp.open("GET", URL, true);
 //xmlHttp.send(null);
 showResult();
}

function handleStateChange()
{
 if (xmlHttp.readyState == 4)
 {
  if (xmlHttp.status == 200)
  {
   showResult();
  }
 }
}

function showResult()
{
 //var xmlDoc = xmlHttp.responseXML;
 
 var http = new ActiveXObject("Microsoft.XMLHTTP");
 var xmlDoc = new ActiveXObject("Microsoft.XMLDOM");
 http.open("POST", "OpenLocal.asp", false);
 http.send();
  
 xmlDoc.async = false;
 xmlDoc.validateOnParse = false;
 xmlDoc.load(http.responseXML);
 
 document.getElementById("SessionYear").innerHTML = xmlDoc.getElementsByTagName("Year")(0).firstChild.nodeValue;
 //SessionYear.innerText = xmlDoc.getElementsByTagName("Year")(0).firstChild.nodeValue;
 
 var SessionNo0 = xmlDoc.getElementsByTagName("ID")(0).firstChild.nodeValue;
 SessionNo.innerText = SessionNo0;
 
 NextSessionYear.innerText = xmlDoc.getElementsByTagName("NextYear")(0).firstChild.nodeValue;
 var NextSessionNo0 = xmlDoc.getElementsByTagName("NextID")(0).firstChild.nodeValue;
 NextSessionNo.innerText = NextSessionNo0;
 
 divResult.innerHTML = unescape(xmlDoc.getElementsByTagName("Result")(0).firstChild.nodeValue);
 
 var Weekday = arrWeekdays[xmlDoc.getElementsByTagName("Weekday")(0).firstChild.nodeValue];
 SessionDate.innerText = xmlDoc.getElementsByTagName("Date")(0).firstChild.nodeValue + " (" + Weekday + ")";
 BetTotal.innerText = xmlDoc.getElementsByTagName("BetTotal")(0).firstChild.nodeValue;
 
 var Weekday = arrWeekdays[xmlDoc.getElementsByTagName("NextWeekday")(0).firstChild.nodeValue];
 NextSessionDate.innerText = xmlDoc.getElementsByTagName("NextDate")(0).firstChild.nodeValue + " (" + Weekday + ")";
 BonusLeft.innerText = xmlDoc.getElementsByTagName("BonusLeft")(0).firstChild.nodeValue;
 
 B1.innerText = xmlDoc.getElementsByTagName("Bonus")(0).getAttribute("B1");
 B2.innerText = xmlDoc.getElementsByTagName("Bonus")(0).getAttribute("B2");
 B3.innerText = xmlDoc.getElementsByTagName("Bonus")(0).getAttribute("B3");
 B4.innerText = xmlDoc.getElementsByTagName("Bonus")(0).getAttribute("B4");
 B5.innerText = xmlDoc.getElementsByTagName("Bonus")(0).getAttribute("B5");
 B6.innerText = xmlDoc.getElementsByTagName("Bonus")(0).getAttribute("B6");
 B7.innerText = xmlDoc.getElementsByTagName("Bonus")(0).getAttribute("B7");
 
 OK1.innerText = xmlDoc.getElementsByTagName("BetOK")(0).getAttribute("OK1");
 OK2.innerText = xmlDoc.getElementsByTagName("BetOK")(0).getAttribute("OK2");
 OK3.innerText = xmlDoc.getElementsByTagName("BetOK")(0).getAttribute("OK3");
 OK4.innerText = xmlDoc.getElementsByTagName("BetOK")(0).getAttribute("OK4");
 OK5.innerText = xmlDoc.getElementsByTagName("BetOK")(0).getAttribute("OK5");
 OK6.innerText = xmlDoc.getElementsByTagName("BetOK")(0).getAttribute("OK6");
 OK7.innerText = xmlDoc.getElementsByTagName("BetOK")(0).getAttribute("OK7"); 
}

function Refresh()
{
    window.setInterval("startRequest()", 5000);
}

//--------------------------------------------------------------------------------
function ErrorTrap()
{
 window.location.reload();
 return false;
}

window.onerror = ErrorTrap;
//--------------------------------------------------------------------------------

//startRequest();
//Refresh();
</script>


W 3 C h i n a ( since 2003 ) 旗 下 站 点
苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》
5,089.844ms