t1.asp

来自「ajax的例子」· ASP 代码 · 共 18 行

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