ajax檢測使用者名稱 教程二

第三步:把資料發送給asp指令碼進行處理.

<%
Response.ContentType = "text/html"
Response.Charset = "GB2312" '解決亂碼問題
response.buffer=true '禁止緩衝
response.expires=0
    dbDir="ajax.mdb"
set conn=Server.CreateObject("ADODB.Connection")
    connStr="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath(dbDir)
    conn.open connStr
 
Set rs=Server.CreateObject("ADODB.Recordset")

Sub CloseConn() 
  Set rs=Nothing
  conn.close
  Set conn=Nothing
End Sub

mydo=request.QueryString("mydo")
 
If mydo="CheckUser" Then
   UserId=Trim(request.QueryString("UserId")) 
 if UserId="" then
     response.Write"ID不可為空！"
  response.end
  end if
   sql="select *from [user] where UserId='"&UserId&"'"
    rs.open sql,conn,1,3
   if rs.eof  then   
      response.write"succese! 您可以註冊"&UserId
   else
      response.write"false! "&UserId&"已經被別人搶注"
   end if
   Call CloseConn()
End If
 %>

好了ajax使用者檢測己經做完了.