Ajax 订阅所有【Ajax】的日志

asp+ajax检测用户名是否可用的代码

作者:xiayuesong 日期:2008-06-15

字体大小: 小 中 大

 

ASP/Visual Basic代码
  1.   
  2.   
  3. t1.html   
  4.   
  5. <script language="javascript" type="text/javascript">   
  6. var xmlHttp = false;   
  7. try {   
  8.   xmlHttp = new ActiveXObject("Msxml2.XMLHTTP");   
  9. } catch (e) {   
  10.   try {   
  11.     xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");   
  12.   } catch (e2) {   
  13.     xmlHttp = false;   
  14.   }   
  15. }   
  16. if (!xmlHttp && typeof XMLHttpRequest != 'undefined') {   
  17.   xmlHttp = new XMLHttpRequest();   
  18. }   
  19.   
  20. function callServer() {   
  21.   var u_name = document.getElementById("u_name").value;   
  22.   if ((u_name == null) || (u_name == "")) return;   
  23.   var url = "cu.asp?name=" + escape(u_name);   
  24.   xmlHttp.open("GET", url, true);   
  25.   xmlHttp.onreadystatechange = updatePage;   
  26.   xmlHttp.send(null);    
  27. }   
  28.   
  29. function updatePage() {   
  30.   if (xmlHttp.readyState < 4) {   
  31.  test1.innerHTML="loading...";   
  32.   }   
  33.   if (xmlHttp.readyState == 4) {   
  34.     var response = xmlHttp.responseText;   
  35.  test1.innerHTML=response;   
  36.   }   
  37. }   
  38. </script>   
  39.   
  40.   
  41. <form name="form1" action="t1.asp" method="post" autocomplete="off">   
  42. 用户名: <input type="text" name="u_name" id="u_name" onChange="callServer();" />   
  43.  <span id="test1">是否能注册</span><br>   
  44. 密 码：<input type="password" />   
  45.  <input type="submit" value="注册" />   
  46. </form>   
  47.   
  48.     
  49.   
  50. cu.asp   
  51.   
  52. <%   
  53. Response.Buffer = True  
  54. Response.ExpiresAbsolute = Now() - 1   
  55. Response.Expires = 0   
  56. Response.CacheControl = "no-cache"  
  57. Response.AddHeader "Pragma", "No-Cache"  
  58. %>   
  59. <!--#include file="conn.asp"-->   
  60. <%   
  61. name=request.querystring("name")   
  62. Set rs = Server.CreateObject ("ADODB.Recordset")   
  63. sql = "Select * from u_ser where u_name='"&name"'"  
  64. rs.Open sql,conn,1,1   
  65. if rs.eof and rs.bof then   
  66.  response.write("true")   
  67. else   
  68.  response.write("false")   
  69. end if   
  70. rs.close   
  71. set rs=nothing   
  72. call CloseDatabase   
  73. %>  

 

 

点击下载此文件

 



[本日志由 xiayuesong 于 2008-08-11 09:37 AM 编辑]
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags: ASP Ajax xmlhttp
相关日志:
评论: 1 | 引用: 0 | 查看次数: 1849
回复回复星空泪[2009-03-29 00:34 AM | del]
恩。谢了
发表评论
昵　称:
密　码: 游客发言不需要密码.
内　容:
验证码: 验证码
选　项:
虽然发表评论不用注册，但是为了保护您的发言权，建议您注册帐号.
字数限制 1000 字 | UBB代码 关闭 | [img]标签 关闭