auto_register.asp

机票预定系统 各个模块的设计-ticket reservation systems detailed design system modules of the design

<%
if mem_login="" then
randomize
other_code=int(rnd()*900000)+100000

sql="select * from tmember where Mem_LoginName='"&mobile&"'"
rs.open sql,conn,3,2
if rs.eof then
rs.addnew
'rs("mem_id")=ZXLMem_id
rs("Mem_LoginName")=mobile
rs("Mem_LoginPasd")=other_code
rs("Mem_Email")=CEmail
rs("Mem_sex")=Mem_sex
rs("mem_province")=mem_province
rs("mem_city")=SendTicketCity
rs("Mem_name")=customer
rs("Mem_zip")=postcode
rs("Mem_addr")=address
rs("Mem_tel")=telephone
rs("Mem_power")="1, 2"
rs("Mem_mobile")=mobile
rs("mem_money")=10
'rs("mem_status")="未开通"
rs("mem_grade")=1
rs("mem_RegistDate")=now()

  Registerinfo="您已经成为本站会员，您的登陆用户："&mobile&" 登陆密码："&other_code&""
  mem_login=mobile
  session("mem_name")=mobile
  response.cookies("mem_safe")="@#^*#@@#3%@@324"
  response.cookies("mem_login")=mobile
  response.cookies("mem_grade")=1
  response.cookies("mem_power")="1, 2"
rs.update
end if
rs.close
end if
%>