<%
stats="技术文章"
dim founderr,errmsg
founderr=false
errmsg=""
if request.querystring("cat_id")<>"" then
if not isInteger(request.querystring("cat_id")) then
founderr=true
errmsg=errmsg+"
"+"非法的文章分类参数。"
end if
end if
if request("page")<>"" then
if not isInteger(request("page")) then
founderr=true
errmsg=errmsg+"
"+"非法的文章分页参数。"
end if
end if
if request("keyword")<>"" then
if instr(request("keyword"),"'")>0 then
founderr=true
errmsg=errmsg+"
"+"非法的文章搜索参数。"
end if
end if
if founderr then
call diserror()
response.end
else
call top()
call article_nav()
call article_body()
call endpage()
end if
%>