欧洲模具展览会:懂软件开发，ASP代码的进。。

<!--#include virtual="/database/aa.asp" -->
<% If request("zhuce")="zc" Then %>
<%
sql="select * from member where username='"&request("username")&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
if not rs.eof then
%>
<script>
alert("此帐号已经存在！")
history.back();
</script>
<% Else %>
<%
rs.addnew
rs("username")=trim(request("username"))
rs("userpassword")=trim(request("userpassword"))
rs("nicheng")=trim(request("nicheng"))
rs("danwei")=trim(request("danwei"))
rs("chuanzhen")=trim(request("chuanzhen"))
rs("xingming")=trim(request("userzhenshiname"))
rs("address")=trim(request("address"))
rs("tel")=trim(request("tel"))
rs("youbian")=trim(request("youbian"))
rs("useremail")=trim(request("useremail"))

rs.update
session("username")=trim(request("username"))
%>

<script>
alert("注册成功,按确定返回!")
open("/index.asp","_self")
</script>
<!--#include
<% End If %>
<% End If %>virtual="/database/aa1.asp" -->

谁能帮我看看，哪里有错？
老是会无法显示页面
说：不能更新。数据库或对象为只读
哪个高手帮帮忙啊