一个评论的程序。发表文章成功后返回index.htm
但这个发表成功后无法显示页面。但评论实际已经发表。手动返回可以看见。]
帮偶看看那里错咯？？？？？？？？？




<%
if request.form("reviewname")="" then
' Request.Form("reviewname")
'response.redirect"index.asp"
response.write"请填写您的大名!!返回重输"
response.end
end if
if request.form("review")="" then
' Request.Form("review")
'response.redirect"index.asp"
response.write"评论内容不能为空，请重输入返回重输"
response.end
end if
if len(request.form("review"))>8000 then
response.write"评论内容不能太多，请重输入返回重输"
response.end
end if
reviewname=htmlencode2(request.form("reviewname"))
reviewemail=htmlencode2(request.form("reviewemail"))
review=htmlencode2(request.form("review"))
face=Request.Form("face")
reviewurl=Request.Form("reviewurl")
articleid=request("id")
reviewtitle=request("reviewtitle")
IP=Request("REMOTE_ADDR")


set rs=server.createobject("adodb.recordset")
sql="select review,reviewcount from learning where articleid="&articleid
rs.open sql,conn,3,3

rs("reviewcount")=rs("reviewcount")+1

rs("review")=rs("review")&"
评论者："&reviewname&_
"　 "_
&reviewurl&"

"&reviewtitle&" "&_ review&" --发表日期："&date()&" [来自: "&ip&"]

"
rs.update
rs.close
set rs=noting
conn.close
set conn=nothing

response.redirect "review.asp?ID="&request("id")
%>