搜索結(jié)果
<%
if search_q<>"" then
set rs=server.createobject("adodb.recordset")
rs.open(s_sql),cn,1,1
%>
<%'=============分頁定義開始，要放在數(shù)據(jù)庫打開之后
if err.number<>0 then '錯誤處理
response.write "數(shù)據(jù)庫操作失敗：" & err.description
err.clear
else
if not (rs.eof and rs.bof) then '檢測記錄集是否為空
r=cint(rs.RecordCount) '記錄總數(shù)
rowcount = 12 '設(shè)置每一頁的數(shù)據(jù)記錄數(shù)，可根據(jù)實際自定義
rs.pagesize = rowcount '分頁記錄集每頁顯示記錄數(shù)
maxpagecount=rs.pagecount '分頁頁數(shù)
page=request.querystring("page")
if page="" then
page=1
end if
rs.absolutepage = page
rcount1=0
pagestart=page-5
pageend=page+5
if pagestart<1 then
pagestart=1
end if
if pageend>maxpagecount then
pageend=maxpagecount
end if
rcount=rs.RecordCount
'=============分頁定義結(jié)束%>
關(guān)鍵字 - <%=search_q%>
SEARCH
您正在搜索"<%=search_q%>",找到相關(guān)信息 <%=rcount%> 條
提示：用空格隔開多個搜尋關(guān)鍵詞可獲取更理想結(jié)果，如"最新 產(chǎn)品"。
<%'===========循環(huán)體開始
do while not rs.eof and rowcount%>
<%
select case rs("ArticleType")
case 1
Content_FolderName=Article_FolderName
case 2
Content_FolderName=Product_FolderName
case 3
Content_FolderName=Case_FolderName
end select
title1=left(rs("title"),30)
for i=0 to c
title1=Replace(title1, keywords(i), "" & keywords(i)& "")
next
content1=left(ClearHtml(rs("content")),30)
for i=0 to c
content1=Replace(content1,keywords(i), "" & keywords(i)& "")
next
%>
![](/images/up_images/<%=rs("image")%>)
<%
rowcount=rowcount-1
rs.movenext
loop
'===========循環(huán)體結(jié)束%>
<%
else
response.write "
" end if end if end if%>
<%=title1%>
<%=content1%>...
<%=year(rs("time"))%>-<%=month(rs("time"))%>-<%=day(rs("time"))%>
很抱歉,沒有找到與 "&search_q&" 相關(guān)的信息！
提示：用空格隔開多個搜尋關(guān)鍵詞可獲取更理想結(jié)果，如“最新 產(chǎn)品”。
" end if end if end if%>
