Ajax test User Name tutorial two

Step three: Send the data to the ASP script for processing.

<%
Response.ContentType = "Text/html"
Response.Charset = "GB2312" ' solve garbled problem
Response.buffer=true ' Disables caching
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 cannot be empty! "
Response.End
End If
sql= "SELECT *from [user] where userid= '" &UserId& ""
Rs.Open sql,conn,1,3
If Rs.eof Then
Response.Write "succese! You can register "&userid
Else
Response.Write "false! "&UserId&" has been registered by others.
End If
Call Closeconn ()
End If
%>

All right, Ajax user testing has been done.