<% const ChannelID=2 const ShowRunTime="Yes" MaxPerPage=10 SkinID=0 PageTitle="搜索结果" strFileName="Article_Search.asp?Field=" & strField & "&Keyword=" & keyword & "&ClassID=" & ClassID %> <%=SiteName%>--文章搜索结果 <% call MenuJS() %> onmousemove='HideMenu()'>
专 题 栏 目
<% call ShowSpecial(10) %>
推 荐 文 章
<% call ShowElite(5,16) %>
热 门 文 章
<% call ShowHot(5,16) %>
最 新 调 查
<% call ShowVote() %>
 
<% if keyword="" then response.write "所有文章" else select case strField case "Title" response.write "文章标题含有 "&keyword&" 的文章" case "Content" response.write "文章内容含有 "&keyword&" 的文章" case "Author" response.write "作者姓名含有 "&keyword&" 的文章" case "Editor" response.write "编辑姓名含有 "&keyword&" 的文章" case else response.write "文章标题含有 "&keyword&" 的文章" end select end if %>
<%call ShowSearchResult()%>
<% if totalput>0 then call showpage(strFileName,totalput,MaxPerPage,false,true,"篇文章") end if %>
  站内文章搜索:
<% call ShowSearchForm("Article_Search.asp",2) %>
<% call Bottom() %> <% call CloseConn() %>