请问下面的语句有错吗?
<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">
<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="发表留言" />
<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
%>
[求助]请教(急)