发一段Ajax的代码

AjAx.js

   var bCheckUserPass = false;
   var StrType;
   function checkUsers(StrTmp)
   {
    var oB = window.document.all.nam
    StrType=StrTmp
    if (oB.length == 0) return;
    /// 不允许玩家名中有英文逗号
    for (var i=0; i<oB.length; i++)
    {
     if (oB .value.length > 0)
     {
      if (!checkUserNameHasComma(oB.value))
      {
       alert("错误：玩家名字里面不能有英文逗号(半角逗号)！　　　/n玩家："+oB.value);
       return;
      }
     }
    }
    var sNames = "";
    for (var i=0; i<oB.length; i++)
    {
     if (oB.value.length > 0)
     {
      sNames += oB.value;
      sNames += ",";
     }
    }
    if (sNames.length > 0)
    {
     sUserNames = sNames.substr(0, sNames.length-1);
     getXml("checkuser");//window.setTimeout("getXml('checkuser')", 100);
    }
   }

   /// 不允许玩家名中有英文逗号
   function checkUserNameHasComma(sName)
   {
    if (sName == ""||sName == null) return false;
    var oRex = /,/g;
    if (sName.search(oRex) != -1) return false;
    return true;
   }

 //-----------------------------getXml-----------------------------
   var oDataXml = null;
   var dDueration = "";
   var sUserNames = "";
   function getXml(sType)
   {
    var sUrl = "";
    switch (sType)
    {
     case "checkuser":
      if (sUserNames.length == 0) return;
      sUrl = "Zz-Ajks.Asp?Users=" + sUserNames;
      break;
     default:
      alert("错误：参数错误！　　　");
      break;
    }    
    //window.open(sUrl);
    oDataXml     = new ActiveXObject("Microsoft.XMLDOM");
    oDataXml.async    = false; //同步传输
    oDataXml.onreadystatechange = function()
    {
     iInnerXmlErrorCode  = oDataXml.parseError.errorCode;
     sInnerXmlReason   = oDataXml.parseError.reason;
     if (oDataXml.parseError.errorCode != 0)
     {
      // 加载 xml 数据失败
      alert("xml 数据加载错误！　　　/n" + sInnerXmlReason + "　　　");
      return null;
     }
     else
     {
      if (oDataXml.readyState == 4)
      {
       // 产生逻辑错误
       if (oDataXml.documentElement.childNodes.length == 0)
       {
        clearRows(document.getElementById("DataContainer"));
        return;
       }
       if (oDataXml.documentElement.childNodes[0].nodeName == "error")
       {
        alert(oDataXml.documentElement.childNodes[0].text);
        return;
       }
       else
       {
        dDueration = oDataXml.documentElement.getAttribute("Qyqrq");
        switch (sType)
        {
         case "checkuser":
          var oNodes = oDataXml.documentElement.selectNodes("//Klsjnh");
          checkUsersResult(oNodes);
          break;
         default:
          alert("错误：参数错误！　　　");
          break;
        }
       }
      }
     }
    }
    oDataXml.load(sUrl);
   }
function checkUsersResult(oNodes)
   {
    if (oNodes.length == 0) return;
    var oZ = document.getElementsByName("wjzt");
    var bHasError = false;
    for (var i=0; i<oNodes.length; i++)
    {     
    var zUe=oNodes.getAttribute("UserNm");
    var zWe=oNodes.getAttribute("UserZt");
     
      if (zUe=="-1")
      {
      oZ.value="未注册";
      oZ.style.backgroundColor = "green";
      oZ.style.color = "white";    
      }
    
     if (zWe=="封杀")
     {
      oZ.value="封杀";
      oZ.style.backgroundColor = "red";
      oZ.style.color = "white";
     }
     if (zUe!="-1" && zWe!="封杀")
     {
      oZ.value=zWe; 
     }
    
     
    }
  
   }



Zz-Ajks.Asp


<!--#include file="conn.asp"-->
<%
Response.Charset="GB2312"
zzff=Request("z-type")  '需要进行的操作
zzGm=Request("GameType")
zUsr=CStr(Request("Users"))   '获取列表
   Set zRs=zz.cors   
   tmpA=Split(zUsr,",",-1)
    For i=0 To UBound(tmpA)
     Sql="select * from UserS where 玩家姓名='" & CStr(tmpA(i)) & "'"
     zRs.open sql,conn,1,3
      If zRs.recordcount>0 Then
Xml= Xml & "<Klsjnh id=""" & zRs("ID")  & """" &  " UserNm=""" & zRs("玩家姓名")  & """" & " UserZt=""" & zRs("玩家状态") & """/>" & vbcrlf
      Else
Xml= Xml & "<Klsjnh id=""-1"" UserNm=""-1"" UserZt=""-1""/>" & vbcrlf
      End If
     zRs.close
    Next
    response.Redirect zz.ZXml("C","User.Xml",Xml)

%>