user.asp

711房产管理系统

<!-- #include file="top.asp"-->
<% 
if session("uid")="" then
response.Redirect"error.asp"
end if
%> 
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td background="images/topb.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="5%"><img src="images/cent_01.gif" width="37" height="20"></td>
          <td width="90%" background="images/cent_02.gif">&nbsp;</td>
          <td width="5%"><img src="images/cent_03.gif" width="51" height="20"></td>
        </tr>
      </table></td>
  </tr>
  <tr>
    <td background="images/topb.gif"><div align="center">
        <TABLE cellSpacing=0 cellPadding=0 width="98%" border=0>
          <TBODY>
            <TR> 
              <TD align=middle height=50><div align="center"><a href="user.asp?gn=ziliao"><img src="images/user1.gif" alt="我的资料" width="51" height="40" border="0"></a> 
                &nbsp;<a href="user.asp?gn=xgzl"><img src="images/user2.gif" alt="修改资料" width="51" height="40" border="0"></a>&nbsp; 
                <a href="user.asp?gn=myhouse"><img src="images/user3.gif" alt="我的房产" width="51" height="40" border="0"></a>&nbsp; 
                <a href="user.asp?gn=message"><IMG 
                  src="images/message01.gif" alt="收件箱" border=0></a>&nbsp; <A 
                  href="user.asp?gn=box"><IMG 
                  src="images/message04.gif" alt="发件箱" border=0></A>&nbsp; <A 
                  href="user.asp?gn=write"><IMG 
                  src="images/message05.gif" alt="撰写" 
            border=0></A>&nbsp; <img src="images/user4.gif" alt="帮助" width="40" height="40"></div></TD>
            </TR>
          </TBODY>
        </TABLE>
		<% if request("gn")="xgzl" then%>
		<!-- #include file="user_xgzl.asp"-->
		<% else
		response.Write""
		end if
	    if request("gn")="ziliao" then%>
		<!-- #include file="user_ziliao.asp"-->
		<% else
		response.Write""
		end if
		if request("gn")="myhouse" then%>
		<!-- #include file="user_myhouse.asp"-->
        <% else
		response.Write""
		end if
		if request("gn")="message" then %>
        <!-- #include file="user_message.asp"-->
		<% else 
		   response.Write""
		   end if 
		   if request("gn")="box" then %>
		<!-- #include file="user_messagebox.asp"-->
		<% else 
		   response.Write""
		   end if 
		   if request("gn")="write" then %>
        <!-- #include file="user_messageWR.asp"-->
		<% else
		   response.Write""
		  end if
  if request("del")<>"" then 
  del=request.QueryString("del")
  conn.execute ("delete from message where id="&del)
  response.Redirect"user.asp?gn=message"
  else
  response.Write""
  end if 
  %>	
</td>
  </tr>
</table>
<%if request("lyw")<>"" then
uid=REQUEST("uid")
uname=REQUEST("uname")
xb=REQUEST("xb")
pwd=REQUEST("pwd")
tishi=REQUEST("tishi")
tsda=REQUEST("tsda")
sfz=REQUEST("sfz")
email=REQUEST("email")
tel=REQUEST("tel")


set rs2=server.CreateObject("adodb.recordset")
sql2="select * from puser where uid='"& session("uid") &"'"
rs2.open sql2,conn,1,3

rs2("uname")=uname
rs2("xb")=xb
rs2("pwd")=pwd
rs2("tishi")=tishi
rs2("tsda")=tsda
rs2("sfz")=sfz
rs2("email")=email
rs2("tel")=tel

rs2.update

Response.Write"<script language=JavaScript>"
Response.Write"alert(""恭喜！个人资料修改成功！"");"
Response.Write"window.location='user.asp?gn=xgzl'"
Response.Write"</script>"
else
response.Write""
end if%>
<!-- #include file="let.asp"-->