西安网站建设Asp+Ajax实现无刷新验证

11852013-03-19

西安网站建设Asp+Ajax实现无刷新验证

首先建立一个数据库db1.mdb为下面结构:

表test_user[u_id,u_name]

 

conn.asp连接数据库文件:

<%
 on error resume next
 db_path = "db1.mdb"
 Set conn= Server.CreateObject("ADODB.Connection")
 connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db_path)
 conn.Open connstr

 Function CloseDatabase
  Conn.close
  Set conn = Nothing
 End Function
%>

 

usrprove.asp用户名验证页面:
<%
 Response.Buffer = True
 Response.ExpiresAbsolute = Now() - 1
 Response.Expires = 0
 Response.CacheControl = "no-cache"
 Response.AddHeader "Pragma", "No-Cache"
 %>
 <!--#include file="conn.asp"-->
 <%
 name=request.querystring("name")
 Set rs = Server.CreateObject ("ADODB.Recordset")
 sql = "Select * from test_user where u_name='"&name&"'"
 rs.Open sql,conn,1,1
 if rs.eof and rs.bof then
  response.write("true")
 else
  response.write("false")
 end if
 rs.close
 set rs=nothing
 call CloseDatabase
%>

reg.html注册表单页面:

<script language="javascript" type="text/javascript">
var xmlHttp = false;
try {
  xmlHttp = new ActiveXObject("Msxml2.XMLHTTP");
} catch (e) {
  try {
    xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
  } catch (e2) {
    xmlHttp = false;
  }
}
if (!xmlHttp && typeof XMLHttpRequest != 'undefined') {
  xmlHttp = new XMLHttpRequest();
}

function callServer() {
  var u_name = document.getElementById("u_name").value;
  if ((u_name == null) || (u_name == "")) return;
  var url = "usrprove.asp?name=" + escape(u_name);
  xmlHttp.open("GET", url, true);
  xmlHttp.onreadystatechange = updatePage;
  xmlHttp.send(null); 
}

function updatePage() {
  if (xmlHttp.readyState < 4) {
    test1.innerHTML="loading...";
  }
  if (xmlHttp.readyState == 4) {
    var response = xmlHttp.responseText;
    test1.innerHTML=response;
  }
}
</script>


<form name="form1" action="regpost.asp" method="post" autocomplete="off">
用户名: <input type="text" name="u_name" id="u_name" onChange="callServer();" />
<span id="test1">是否能注册</span><br>
密 码:<input type="password" />
<input type="submit" value="注册" />
</form>


regpost.asp注册信息提交页面:
<!--#include file="conn.asp"-->
<%
 name=request.form("u_name")
 Set rs = Server.CreateObject ("ADODB.Recordset")
 sql = "Select * from test_user where u_name='"&name&"'"
 rs.Open sql,conn,3,3
 if not rs.eof then
  response.write("该用户名已被注册,<a href=reg.html>返回</a>重新注册")
 else
  rs.addnew
  rs("u_name")=name
  rs.update
  response.write("注册成功,<a href=reg.html>返回</a>检测AJAX功能")
 end if
 rs.close
 set rs=nothing
 call CloseDatabase
%>

可以将代码保存到本地可以测试下效果,西安网站建设团队点墨网络竭诚为您服务。。。
通过这个例子,我们可以按照这个原理实现更多的效果。。。


 

通过本文您对西安网站建设有了进一步了解,本公司温馨提醒:找西安做网站公司,请选择手续齐全、业务精、服务好的正规公司。

工商网上亮照

版权所有:西安点墨网络科技有限公司 信息备案编号: 陕ICP备11004160号-1

客户服务电话:029-89640155 18991365125

公司地址:西安市雁塔区朱雀大街紫郡长安F3

Sitemap 网站地图 手机版

办公电话:029-89640155

服务热线:18991365125

客服信箱:vip@dianmo.cc

846461336327

西安点墨网络科技有限公司

版权所有:西安点墨网络科技有限公司 信息备案编号: 陕ICP备11004160号-1