无刷新登录代码.doc

无刷新登录Index.asp页面代码企业信息管理系统_用户登录     用户   密码     Ajax.js页面代码function useAjaxDemo() var ajax=createAjaxObject(); sendToValidata(); function createAjaxObject() var ajax; try ajax= new ActiveXObject(Msxml2.XMLHTTP); catch(e) try ajax = new ActiveXObject(Microsoft.XMLHTTP); catch(e) ajax = new XMLHttpRequest(); return ajax; /使用AJAX对象 function sendToValidata() if(!ajax) /document.getElementById(msg).innerText=浏览器不支持使用AJAX技术;alert(浏览器不支持使用AJAX技术); else if(document.getElementById(tname).value=)alert(用户不能为空！);document.getElementById(tname).focus();else if(document.getElementById(tpwd).value=)alert(密码不能为空！);document.getElementById(tpwd).focus();else var url=Chkadmin.asp?nick=+document.getElementById(tname).value+&password=+document.getElementById(tpwd).value; ajax.open(get,url,true); ajax.setRequestHeader(cache-control,no-cache);ajax.setRequestHeader(Content-Type,application/x-www-form-urlencoded);ajax.onreadystatechange =result; ajax.send(null); function result() if(ajax.readyState=4) var reword=ajax.responseText;if(reword=1)window.location=manage.asp;/ajax.open(post,manage.asp,true); elsealert(用户名或密码不正确！);document.getElementById(tname).focus(); Chkadmin.asp页面代码%dim sqldim rs dim from1 dim sq12 dim sq123dim nickdim passwordnick=replace(trim(request(nick),)password=md5(replace(trim(Request(password),)regjm=replace(trim(Request(regjm),) txt_check=replace(trim(Request(txt_check),) -企业过期数据检查-set rs=server.createobject(adodb.recordset)sql=select * from xyz_yprs.open sql,conn,1,3do while no