做了个注册会员登入系统,做好后试了下能注册,但是进入会员系统就会显示错误!不能修改资料了!有谁能够帮我修改下!谢谢!!!急用了!修改好后可以把修改好的代码回帖发出来!也可以加我QQ:31363431   谢谢各位大哥大姐了!!!



代码如下:<!-- #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"-->