sub Check()
if trim(request.form("words"))="" then
response.write "<script language=javascript>alert('请填写留言');javascript:history.back();</script>"
response.end
end if
if len(trim(request.form("words")))<6 then
response.write "<script language=javascript>alert('留言字数少于6');javascript:history.back();</script>"
response.end
end if
if len(trim(request.form("words")))>60 then
response.write "<script language=javascript>alert('留言字数多于60');javascript:history.back();</script>"
response.end
end if
Set Rs1 = Server.CreateObject("ADODB.RecordSet")
Sql1="select * from party where party_id=" & party_id
Rs1.Open Sql,Conn,2,3

Rs1("party_yj") = server.HTMLEncode(request.form("words"))
Rs1.Update
Rs1.Close
Set Rs1=Nothing
response.write "<script language=javascript>window.close();</script>"

end sub


前面的程序运行的好好的,但后面的红色字体的程序为什么运行不出来啊?