当前位置 >>> 会员信息设置 <% if request("act")="addact" then sql="select * from user where name='"&request("name")&"'" rs2.open sql,conn,1,1 if rs2.recordcount>0 then response.write "" elseif request("psw")<>request("repsw") or (trim(request("psw"))="" and trim(request("repsw"))="") then response.write "" else if len(trim(request("name")))=0 or len(trim(request("cardname")))=0 or len(trim(request("mobile")))=0 or len(trim(request("tel")))=0 or len(trim(request("idcard")))=0 then response.write "" else rs.open "user",conn,3,3 rs.movelast rs.addnew rs("name")=trim(request("name")) rs("psw")=cstr(md5(trim(request("psw")))) rs("cardname")=request("cardname") rs("mobile")=request("mobile") rs("tel")=request("tel") rs("idcard")=request("idcard") rs("add")=request("add") rs.update rs.close if Err.Number=0 then response.write "" else response.write "" end if end if end if rs2.close elseif request("act")="edit" then if (request("psw")<>request("repsw")) then response.write "" else sql="select * from user where uid="&request("uid") rs.open sql,conn,3,3 if len(trim(request("cardname")))=0 or len(trim(request("mobile")))=0 or len(trim(request("tel")))=0 or len(trim(request("idcard")))=0 then response.write "" else if not (trim(request("psw"))="" or trim(request("repsw"))="") then rs("psw")=cstr(md5(trim(request("psw")))) rs("cardname")=request("cardname") rs("mobile")=request("mobile") rs("tel")=request("tel") rs("idcard")=request("idcard") rs("add")=request("add") rs.update rs.close if Err.Number=0 then response.write "" else response.write "" end if end if end if elseif request("act")="del" then conn.Execute("delete from user where uid="&cint(request("uid"))) if Err.Number=0 then response.write "" else response.write "" end if elseif request("act")="sign" then conn.execute("update user set sign="&cint(request("sign"))&" where uid="&cint(request("uid"))) response.Redirect("user.asp") elseif request("act")="modi" then sql="select * from user where uid="&cint(request("uid")) rs.open sql,conn,1,1 %> "> 会员信息设置 - 修改 会员名 <%=trim(rs("name"))%>      密码 确认密码 姓名 * ">   手机 * ">   电话 * ">   身份证 * ">   地址 ">     提交   <% rs.close elseif request("act")="add" then %> 会员信息设置 - 添加 会员名      密码   确认密码   姓名 *   手机 *   电话 *   身份证 *   地址     添加 <% else %> <% i=1 rs.open "user",conn,1,1 do while not rs.eof %> <% i=i+1 rs.movenext loop rs.close %> 会员信息设置 Account Name Company name Industry Tel Address Note 审核 <%=trim(rs("email"))%>  [ " onClick="{if(confirm('删除不可恢复，确定删除吗?')){return true;}return false;}"> ] <%=rs("name")%> <%=rs("companyname")%> <%=rs("Industry")%> <%=rs("Tel")%> <%=rs("add")%> <%=rs("memo")%> <% if rs("sign")=0 then response.write "未通过" else response.write "已通过" end if %> <% end if %>