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
%>