AJAX之xmlHttp

AJAX之xmlHttp2007-04-26<script type="text/javascript" language="javascript">
<！--
//以XML求取数据
function XmlPost（theEmail）
{
var webFileUrl = "../User/CheckUser.aspx？LogonName=" + theEmail;
var result = "";

if （window.ActiveXObject） {
xmlHttp = new ActiveXObject（"Microsoft.XMLHTTP"）;
}
else if （window.XMLHttpRequest） {
xmlHttp = new XMLHttpRequest（）;
}

//var xmlHttp = new ActiveXObject（"MSXML2.XMLHTTP"）;
xmlHttp.open（"POST", webFileUrl, false）;
xmlHttp.setRequestHeader（"Content-Type","application/x-www-form-urlencoded"）;
xmlHttp.send（""）;

xmlHttp.onreadystatechange=function（）
{
if （xmlHttp.readyState==4）
{
result = xmlHttp.responseText;
}
}
if（xmlHttp.status！=200）
{
alert （"网络故障（xmlHttp.status="+xmlHttp.status+"），请稍后再试！"）;
}

result = xmlHttp.responseText;
result = result.substring（0,result.indexOf（"？EX"））;

if（result ！= "false"）
{
return true;
}
else
{
return false;
}
}
//-->
</script>""" <summary>
""" 检测用户是否存在<文件名：../User/CheckUser.aspx>
""" </summary>
""" <remarks>Created by dzh @2006/06/27 18:22</remarks>
Partial Class Web_User_CheckUser
Inherits System.Web.UI.Page

Protected Sub Page_Load（ByVal sender As Object, ByVal e As System.EventArgs） Handles Me.Load
If Request.QueryString（"LogonName"） Is Nothing Then
Response.Write（"false" + "？EX"）
Response.End（）
Exit Sub
End If

If （New EasyClick.EasyBusiness.UserBusiness）.GetUserByLogonName（Request.QueryString（"LogonName"）.ToString） Is Nothing Then
Response.Write（"false" + "？EX"）
Response.End（）
Exit Sub
Else
Response.Write（"true" + "？EX"）
Response.End（）
Exit Sub
End If
End Sub
End Class