我的第一个AJAX网页

index.asp

================ 

 

<% ... @LANGUAGE="VBSCRIPT" CODEPAGE="936" %>
<! DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd" >
< html  xmlns ="http://www.w3.org/1999/xhtml" >
< head >
< meta  http-equiv ="Content-Type"  content ="text/html; charset=gb2312"   />
< title > 无标题文档 </ title >
< script  language ="javascript" > ...
var http_request = false;

function send_request(url)
...{
    http_reuqest= false;
    //开始初始化XMLHttpRequest对象
    if(window.XMLHttpRequest)
    ...{
        http_request = new XMLHttpRequest();
        if(http_request.overrideMimeType)
        ...{
            http_request.overrideMimeType("text/xml");
        }
    }
    else if(window.ActiveXObject)
    ...{
        try
        ...{
            http_request = new ActiveXObject("Msxml2.XMLHTTP");
        }
        catch(e)
        ...{
            try
            ...{
                http_request = new ActiveXOject("Microsoft.XMLHTTP");
            }
            catch(e)...{}
        }
    }
    if(!http_request)
    ...{
        window.alert("不能创建XMLHttpRequest对象实例");
        return false;
    }
    alert("1");
    http_request.onreadystatechange = processRequest;
    http_request.open("GET",url,true);
    http_request.send(null);
}

function processRequest()
...{
    if(http_request.readyState==4)
    ...{
        alert("2");
        if(http_request.status==200)
        ...{
            alert(http_request.responseText);
        }
        else
        ...{
            alert("你所请求的页面有异常.");
        }
    }
}

function userCheck()
...{
    var f = document.form1;
    var username = f.username.value;
    if(username == "")
    ...{
        window.alert("用户名不能为空");
        f.username.focus();
        return false;
    }
    else
    ...{
        var url = "index2.asp?un=" + username ;
        alert(url);
        send_request(url);
    }
}
</ script >
</ head >

< body >
< form  name ="form1"  action =""  method ="post" >
用户名: < input  type ="text"  name ="username"  value ="" /> &nbsp;
< input  type ="button"  name ="check"  value ="唯一性检查"  onclick ="userCheck();" />
< input  type ="submit"  name ="submit"  value ="提交" />

</ form >
</ body >
</ html >

 

index2.asp页

 

<% ...
username = request("un")
username = username & "11111111111111111111111111111"
response.write(username)
%>