www.gusucode.com > 共享世纪内容管理系统 2.1 build 080704 全站开源版 > reg/reg.asp
<!--#include file="../admin/config.asp"--> <!--#include file="../admin/MD5.asp"--> <!--#include file="../admin/char.inc"--> <!--#include file="./connreg.asp"--> <% set rs=server.CreateObject("adodb.recordset") rs.open "select * from UserInfo where (id is null)",conn,1,3 pwd=md5(trim(request("pwd"))) rs.addnew rs("user")=trim(request("regname")) rs("pwd")=pwd ' rs("sex")=request("sex") ' rs("oicq")=htmlencode(trim(request("oicq"))) rs("email")=htmlencode(trim(request("email"))) if webreglock="1" then rs("lock")=1 mgs="默认新注册帐号为锁定状态!" end if rs("regdate")=now() rs("dj")=0 rs.update if err then response.Write(0) else response.Write(1) end if rs.close set rs=nothing conn.close set conn=nothing %>