savecomreg.asp

中介之家房产中介系统 V4.0企业共享版

<!--#include file="conn.asp"-->
<!--#include file="char.asp"-->
<%
userid=trim(request("userid"))
set rs=server.createobject("adodb.recordset")
sqltext="select * from user where uid='"&userid&"'"
rs.open sqltext,conn,3,3

if not rs.eof and not rs.bof then
		response.write "<script language=JavaScript>{window.alert('此账号已经存在，请更换其他账号!');window.history.go(-1);}</script>"
else
'添加一条记录到数据库
rs.addnew
rs("uid")=request("userid")
rs("pwd")=request("password1")
rs("comname")=request("comname")

if request("codezip")="" then
	rs("zip")="-"
else
	rs("zip")=request("codezip")
end if

if request("touchman")="" then
	rs("touchman")="-"
else
	rs("touchman")=request("touchman")
end if

if request("address")="" then
	rs("address")="-"
else
	rs("address")=request("address")
end if

if request("tel")="" then
	rs("tel")="-"
else
	rs("tel")=request("tel")
end if

rs("dateandtime")=now()

if request("email")="" then
	rs("email")="-"
else
	rs("email")=request("email")
end if

if request("cominfo")="" then
	rs("info")="-"
else
	rs("info")=htmlencode(request("cominfo"))
end if

rs.update

response.write "<script language=JavaScript>{window.alert('提交成功!');window.location.href='userinfo.asp';}</script>"  		
rs.close
conn.close
end if
%>