www.gusucode.com > asp+SQLServer网上书店系统设计(源代码+论文) > asp+SQLServer网上书店系统设计(源代码+论文)\网上书店asp+SQLServer\网上书店\modify1.asp
<!--#include file="conn.asp"--> <% name=trim(Request("user")) if Request("Pwd")=Request("Pwd1") then if name<>session("user") then set rs=server.createobject("adodb.recordset") sqltext="select * from 用户 where User_name='" & name & "'" rs.open sqltext,cn,1,1 if not rs.EOF then Response.redirect "register6.asp?msg=很抱歉用户已被人使用,请返回上一页重新输入不同的用户名!" end if end if user_name=session("user") real_name=trim(Request("real_name")) pwd=trim(Request("Pwd")) pwd1=trim(Request("Pwd1")) sex=trim(Request("sex")) Address=trim(Request("Address")) phone=trim(Request("phone")) postcode=trim(Request("postcode")) set rs=Server.CreateObject("ADODB.Recordset") user_name=session("user") sql="select * from 用户 where user_name='"&user_name&"'" rs.open sql,cn,3,3 rs("user_name")=name rs("user_realname")=real_name rs("pwd")=pwd rs("sex")=sex rs("address")=Address rs("phone")=phone rs("postcode")=postcode rs.update rs.close cn.close if DBError=0 then Response.redirect "register4.asp?msg=恭喜你修改成功!" end if else Response.redirect "register6.asp?msg=两次输入密码不同,请返回上一页重新输入!" end if %>