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
  %>