请问下面的语句有错吗？
<tr>
<td height="20">
<table width="100%" border="1" cellpadding="0" bordercolor="#D6DFF7" style="border-collapse: collapse" cellspacing="0">
<tr>
<td height="20" valign="center" bgcolor="#c0c0c0">
&nbsp;<strong>请您发表评论</strong>
</td>
</tr>
<tr>
<td>
<%
dim znamez
znamez=request.QueryString("name")
set rs2=server.CreateObject("adodb.recordset")
sql="select * from Spi_Article where editor='"&znamez&"'"
rs2.open sql,conn,1,3
%>
<table cellspacing="0" cellpadding="0" width="510" align="center" border="0">
<form id="form1" name="form1" action="show_AddMsg.asp?uid=<%=rs2("NewsID")%>" method="post">
<tr>
<td width="100" height="25" align="center" valign="center"></td>
<td height="25" colspan="2" align="left" valign="center">您要为您所发的言论的后果负责，故请各位遵纪守法并注意语言文明。</td>
</tr>
<tr>
<td height="30" align="center" valign="center"">
用户名：
</td>
<td width="294" height="30" align="left" valign="center">
<input id="username" size="30" name="username" value="匿名网友" check="^[\s|\S]{1,20}$" warning="网友名称不能为空且长度不能超过20！"><font color="red">*</font>
</td>
<td width="136" align="left" valign="center" ></td>
</tr>
<tr>
<td height="30" align="center" valign="center">
电子邮箱：
</td>
<td height="30" colspan="2" align="left" valign="center">
<input id="email" size="30" name="email">
</td>
</tr>
<tr>
<td align="center" valign="middle" >
留言：</td>
<td height="30" colspan="2" align="left" valign="top">
<textarea id="liuyan" name="liuyan" rows="5" cols="55" check="^[\s|\S]{1,500}$" warning="留言不能为空且长度不能超过500！"></textarea><font color="red">*</font>
</td>
</tr>
<tr align="middle">
<td height="25" colspan="3" valign="top">
<input name="Submit" type="submit" value="发表留言" />
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;
<input type="reset" name="reset" value="重新填写" />
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
</td>
</tr>
<%
rs2.close
set rs2=nothing
%>



下面是接收的页面



<!--#include file="conn.asp"-->

<%
'NewsID=request.QueryString("uid")
'username = Trim(Request("username"))
'email=request("email")
'liuyan=request("liuyan")
'sql="insert into Spi_Remark(username,email,detail,articleid) values('"&username&"','"&email&"','"&liuyan&"',"&NewsID&")"
'set rs=server.CreateObject("adodb.recordset")
'sql="select * from Spi_Remark"
'rs.open sql,conn,1,3
'rs.addnew
'rs("username")=username
'rs("email")=email
'rs("detail")=liuyan
'rs("articleid")=NewsID
'rs.update
%>
<%
rs.close
set rs=nothing
%>

下面是接收的页面
<!--#include file="conn.asp"-->

<%
NewsID=request.QueryString("uid")
username = Trim(Request("username"))
email=request("email")
liuyan=request("liuyan")

set rs=server.CreateObject("adodb.recordset")
sql="select * from Spi_Remark"
rs.open sql,conn,1,3
rs.addnew
rs("username")=username
rs("email")=email
rs("detail")=liuyan
rs("articleid")=NewsID
rs.update
%>
<%
rs.close
set rs=nothing
%>

晕，你自己都不知道有没有错，谁还能知道！！

<%
'NewsID=request.QueryString("uid")
'username = Trim(Request("username"))
'email=request("email")
'liuyan=request("liuyan")
'sql="insert into Spi_Remark(username,email,detail,articleid) values '"&username&"','"&email&"','"&liuyan&"',"&NewsID&")"
'set rs=server.CreateObject("adodb.recordset")
'sql="select * from Spi_Remark"
'rs.open sql,conn,1,3
'rs.addnew
'rs("username")=username
'rs("email")=email
'rs("detail")=liuyan
'rs("articleid")=NewsID
'rs.update
%>
<%
rs.close
set rs=nothing
%>
绿色部分都是注释，哪来的Rs.close

不好意思，是我没有说清楚。抱歉！
楼1的从《下面是接收的页面》开始是我发错了。
楼2的才是。
其实第一页并不是重要的，因为它的作用只是传一些参数到接收的页，接收页的更新才是我不明白的地方！

怎么没人发贴了？？？

根据楼主提供的
下面是接收的页面
<!--#include file="conn.asp"-->

<%
NewsID=request.QueryString("uid")
username = Trim(Request("username"))
email=request("email")
liuyan=request("liuyan")

set rs=server.CreateObject("adodb.recordset")
sql="select * from Spi_Remark"
rs.open sql,conn,1,3
rs.addnew
rs("username")=username
rs("email")=email
rs("detail")=liuyan
rs("articleid")=NewsID
rs.update
%>
<%
rs.close
set rs=nothing
%>
这些代码来看没什么问题,楼主有那里不明白？