陈伟霆表白赵丽颖:语法错误 (操作符丢失) 在查询表达式 'IsAudit and NewsClassID=' 中 请高手指点!

打开MORE这个页面就出现如下错误:
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft JET Database Engine 错误 '80040e14'

语法错误 (操作符丢失) 在查询表达式 'IsAudit and NewsClassID=' 中。

/khdj/info_more.asp，行232

部分出错代码是:
<%
set News=server.createobject("ADODB.RecordSet")
newssql="select * from News where IsAudit and NewsClassID="&request("NewsClassID")
News.open newssql,conn,3
News.pagesize=10
page=cint(request.querystring("page"))
if News.recordcount>0 then
If page<1 or (page-1)*News.pagesize>=News.recordcount then
page=1
End If
News.absolutepage=page
end if
if News.recordcount>0 then
set NewsClass=conn.execute("select * from NewsClass where NewsClassID="&request("NewsClassID"))
if News.pagecount>1 then
top_text="<a href='info_more.asp?page=1&NewsClassID="&NewsClassID&"'><b><font color=000000>[最前页]</font</b></a>"
pre_text="<a href='info_more.asp?page="&page-1&"&NewsClassID="&NewsClassID&"'><b><font color=000000>[上一页]</font</b></a>"
next_text="<a href='info_more.asp?page="&page+1&"&NewsClassID="&NewsClassID&"'><b><font color=000000>[下一页]</font</b></a>"
bottom_text="<a href='info_more.asp?page="&News.pagecount&"&NewsClassID="&NewsClassID&"'><b><font color=000000>[最后页]</font</b></a>"
' response.write "<table width=100% border=0 cellspacing=0 cellpadding=0><tr><td><b>当前位置：</b><a href=index.asp>首页</a>><a href=info_more.asp?NewsClassID="&NewsClassID&">"&NewsClass("class")&"</a>></td><td align=right>"
if page<=1 then
response.write next_text&" "&bottom_text
elseif page>=News.pagecount then
response.write top_text&" "&pre_text
else
response.write top_text&" "&pre_text&" "&next_text&" "&bottom_text
end if
response.write " 第"&page&"页/共"&News.pagecount&"页（"&News.recordcount&"条内容）"
response.write "</td></tr></table>"
end if

' set News=conn.execute("select id,NewsClassID,film_name,player,directer,film_long,star_grade,film_address,film_language,add_date,poster from film where NewsClassID= 3 ORDER BY ID desc" )
'sqltext="select id,NewsClassID,film_name,poster from film where NewsClassID="&News("id")&" ORDER BY ID desc"
'while (not News.eof)
%>
<!-- line start -->

本人是菜鸟，劳烦高手细心解答,问题出在哪,具体的怎么解决!
晕,这是ASP程序啊?怎么用VB修复啊。而且刚在网上查了，没有VB修改高手这个软件!?