黄山市歙州学校:asp与数据库更新问题

这问题我问过，但上次没说清楚。
我在向数据库输入新数据时，在页面的开始有cid=Request("cid")语句，用response.write ""&title&""检查，能输出文章的编号，但在调试时，从网页中提交数据，在数据库中，除了cid外，其它数据都提交成功了，不知道怎么回事，下面是代码：
这里是全部代码 http://xinqing.518u.com/showart.asp?art_id=42&cat_id=8

<%
cid=Request("cid")
.
.
.
response.write ""&cid&"<br>" '此处能在浏览器中输出正确的id
.
.
.
Set Rs = Server.CreateObject("ADODB.RecordSet")
Sql="Select * From comm"
Rs.Open Sql,Conn,2,3
Rs.AddNew
if Request.Form("name")=webceo then
Rs("name")=noceo
elseif Request.Form("name")=ceopass then
Rs("name")=webceo
else
Rs("name")=Server.HTMLEncode(Request.Form("name"))
End If

Rs("ctitle")=Server.HTMLEncode(Request.Form("title"))
Rs("comm")=Server.HTMLEncode(Request.Form("comm"))
rs("cid")=cid ' *******就是这一句有问题*******
Rs("date")=now()
Rs("ip")=request.servervariables("remote_addr")
Rs.Update
Rs.Close
Session("s")=""
Set Rs = Nothing
.
.
.
%>
这里的cid是要评论文章的id，用来标明是哪篇文章的评论。
全部代码：http://xinqing.518u.com/showart.asp?art_id=42&cat_id=8