日期:2014-05-16 浏览次数:23187 次
..... <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <link href="course_style.css" rel="stylesheet" type="text/css"> <script src="showpersonalinfo.js"></script> .... <form name="form" method="post" action="sendproc.asp" onSubmit="return chkform();"> ... <td ><input type="text" name="worknum" id="worknum" onKeyUp="showpersonalinfo(this.value)"><td> <td><input type="text" name="name" id="name"></td> <td><input name="extension" type="text" id="extension"></td> .... </form>
var xmlHttp;
function showpersonalinfo(str)
{
xmlHttp=GetXmlHttpObject();
if(xmlHttp==null)
{
alert ("Your browser does not support AJAX!");
return;
}
var url="getpersonalinfo.asp"
url=url+"?worknum="+str;
url=url+"&sid="+Math.random();
xmlHttp.onreadystatechange=statechanged;
xmlHttp.open("get",url,null);
xmlHttp.send(null);
}
function statechanged()
{
if(xmlHttp.readystate==4)
{
[color=#0000FF]var xmlDoc=xmlHttp.responseXML.documentElement;[/color]
document.getelementByid("name").innerHtml=xmlDoc.getelementsBytagname("name")[0].childnodes[0].nodevalue;
document.getelementByid("extension").innerHtml=xmlDoc.getelementsBytagname("extension")[0].childnodes[0].nodevalue;
}
}
function GetXmlHttpObject()
{
var xmlHttp=null;
try
{
// Firefox, Opera 8.0+, Safari
xmlHttp=new XMLHttpRequest();
}
catch (e)
{
// Internet Explorer
try
{
xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");
}
catch (e)
{
xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");
}
}
return xmlHttp;
}
<%
response.Expires=-1
response.contenttype="text/xml"
response.Charset="utf-8"
%>
<!--#included file="inc/conn.asp"-->
<!--#included file="inc/function.asp"-->
<%
dim worknum
dim rs,sql
worknum=trim(request.QueryString("worknum"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from employee where wcode='"&worknum&"'"
rs.open sql,conn,1,3
if not(rs.bof and rs.eof) then
response.write("<?xml version='1.0' encoding='utf-8'?>")
response.write("<personalinfo>")
response.write("<name>"&rs("name")&"</name>")
response.write("<division>"&rs("div")&"</division>")
response.write("<dept>"&rs("dept")&"</dept>")
response.write("<extension>"&rs("extension")&"</extension>")
response.write("<email>"&rs("email")&"</email>")
response.write("</personalinfo>")
end if
rs.close
set rs=nothing
%>