| 北京时间[] |
伦敦时间[] |
纽约时间[] |
芝加哥时间[] |
东京时间[] |
<%
if Trim(Request("user_name"))<>"" then
user_name=replace(Request("user_name"),"'","") '姓名
'userpassword=replace(Request("userpassword"),"'","")
user_cs=Request("user_cs") '城市
useremail=Request("useremail") '邮箱
'user_name=Request("user_name")
user_tel=Request("user_tel") '电话号码
user_hy=Request("user_hy") '身份证号
'response.Write username&userpassword&useremail
if user_name="" or user_hy="" or useremail="" or user_cs="" or user_tel="" then
response.Write ""
response.End()
else
oicq=Request("oicq")
if oicq="" then oicq=" "
user_name=Request("user_name")
if user_name="" then user_name=" "
sex=Request("sex")
if sex="" then sex=1
user_hy=Request("user_hy")
if user_hy="" then user_hy=" "
user_add=Request("user_add")
if user_add="" then user_add=" "
user_tel=Request("user_tel")
if user_tel="" then user_tel=" "
user_cs=Request("user_cs")
if user_cs="" then user_cs=" "
sql="select * from [mnzc] where [user_name]='"&user_name&"' or [useremail]='"&useremail&"'" '查看mnzc表中所有数据,条件是user_name=user_name
set rs=conn.execute(sql)
if not rs.eof then '如果没有搜索到最后既有重名的user_name=user_name
response.Write ""
response.End()
else
sql="select * from [mnzc]"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,3,2
rs.addnew
rs("useremail")=useremail
rs("user_name")=user_name
rs("sex")=sex
rs("user_hy")=user_hy
rs("user_add")=user_add
rs("user_tel")=user_tel
rs("user_cs")=user_cs
rs("oicq")=oicq
'再次加入
rs.update
'session("user_name")=user_name
' session("useremail")=useremail
'session("sex")=sex
'session("user_hy")=user_hy
'session("user_add")=user_add
'session("user_tel")=user_tel
'session("user_cs")=user_cs
' session("oicq")=oicq
session("user_name")="yes"
response.Write ""
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
end if
end if
%>
香港:办公电话 00852-25810198 | 传真:00852-25810270
交易指导热线:13590317744 | 深圳:市场部电话0755-82839349 | 传真: 0755-82839348