regsave_class.asp

来自「起点9 V2.0小说整站系统 介绍： 1、 采用企业级标准应用三层架构」· ASP 代码 · 共 17 行

<!--#include file="conn.asp"-->
<%
pnum=request("pnum")
username=request("username")
busername=request("busername")
userpass=request("userpass")
userpassqr=request("userpassqr")
usermail=request("usermail")
set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from "&prefix&"userpro where username='"&username&"'"
rs.open sql,conn,1,1
if not rs.eof then
result="帐号已经存在!<a href=""reg.asp?pnum="&pnum&""">返回</a>"
result=result&"<!--#include file=""bootom_ad.asp""--></p></card></wml>"
'response.end
end if
%>