📄 if_1_2.asp

📁 矮子多用户版客户管理系统2.0Bate2
💻 ASP
字号:
<% @language="vbscript" %>
<!--#include file="Md5.asp"-->
<% 
response.buffer=true
Response.Expires=0
dim mclass_folder
dim url
dim pass
dim rpass
dim email
dim show
dim rq
dim aq
dim mclass

if session("mclass")=session("dd") then 
mclass_folder=request("mclass_folder")
end if

mclass=request("mclass")
pass=request("pass")
rpass=request("rpass")
rq=request("rq")
aq=request("aq")
email=request("email")
show=request("show")
url=request("url")
fenye=request.form("fenye")
waifenye=request.form("waifenye")
'--------------------------------------------
ming=request.form("ming")
sex=request.form("sex")
bumen=request.form("bumen")
zhiwu=request.form("zhiwu")
phone=request.form("phone")
mobile=request.form("mobile")
'--------------------------------------------

 if ming="" then ming ="未填" end if
 if fenye="" then fenye ="10" end if
  if fenye="" then waifenye ="10" end if
   if mobile ="" then mobile ="未填" end if
   if bumen="" then bumen="未填" end if

     if zhiwu="" then zhiwu="未填" end if
     if phone="" then phone="未填" end if
     if mobile="" then mobile="未填" end if
 if email="" then email="未填" end if
 if url="" then url="未填" end if
 if show="" then show="无简介" end if


If pass<>rpass  Then
response.write "SORRY <br>"
response.write "请重新输入你的密码"
response.end
end if
%>
<!--#include file="conn.asp" -->
<%
dim rs,sql
set rs=server.createobject("adodb.recordset")  
sql="select * from mclass where mclass_id="&session("mclass")&""
rs.Open sql,conn,1,3
if rs.eof or rs.bof then
response.write "<p align='center'>该用户已注册过！</p>"
else

if pass ="" then 
pass=rs("pass") 
else
rs("pass")= md5(pass)
end if
if session("mclass")=session("dd") then 
rs("mclass_folder")=mclass_folder
end if

rs("rq")=rq
rs("aq")=aq
rs("url")=url
rs("email")=email
rs("show")=show
rs("ming")=ming
rs("sex")=sex
rs("bumen")=bumen
rs("zhiwu")=zhiwu
rs("phone")=phone
rs("mobile")=mobile
rs("show")=show
rs("fenye")=fenye
rs("waifenye")=waifenye
rs.Update
session("fenye")=fenye
session("waifenye")=waifenye
%>
<html>
<head>
<title>正在进入下一步</title>

<meta http-equiv=refresh content="1; url=<%if session("dd")=session("mclass") then%>if_2.asp<%else%>if_3.asp<%end if%>">


<BODY bgcolor="#ffffff"  text="#000000" link="#000080" alink="#800000" vlink="#2f2f4f" marginheight=0 marginwidth=0 topmargin=10 leftmargin=20 rightmargin=0>
Loading ....
<p align="center">正在进入下一步</p>
<p align="center">加载中，请稍后......</p>
</body></html>

<%

rs.close
set rs=nothing
conn.close
set conn=nothing

end if
%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -