<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="format.asp"-->
<!--#include file="error.asp"-->
<!--#include file="body/incjs.asp"-->
<!--#include file="body/top.asp"-->
<!--#include file="body/newscat.asp"-->
<!--#include file="body/news_body.asp"-->
<!--#include file="body/foot.asp"-->
<%
stats="技術文章"
dim founderr,errmsg
founderr=false
errmsg=""

if request("page")<>"" then
  if not isInteger(request("page")) then
    founderr=true
    errmsg=errmsg+"<br>"+"<li>非法的新聞分頁參數。"
  end if
end if
if request("keyword")<>"" then
  if instr(request("keyword"),"'")>0 then
    founderr=true
    errmsg=errmsg+"<br>"+"<li>非法的新聞搜索參數。"
  end if
end if

if founderr then
  call diserror()
  response.end
else
call top()
call news_body()
call endpage()
end if
%>