搜索結果
<%
if search_q<>"" then
set rs=server.createobject("adodb.recordset")
rs.open(s_sql),cn,1,1
%>
<%'=============分頁定義開始,要放在數(shù)據庫打開之后
if err.number<>0 then '錯誤處理
response.write "數(shù)據庫操作失敗:" & err.description
err.clear
else
if not (rs.eof and rs.bof) then '檢測記錄集是否為空
r=cint(rs.RecordCount) '記錄總數(shù)
rowcount = 12 '設置每一頁的數(shù)據記錄數(shù),可根據實際自定義
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
'=============分頁定義結束%>
關鍵字 - <%=search_q%>
SEARCH
您正在搜索"<%=search_q%>",找到相關信息 <%=rcount%> 條
提示:用空格隔開多個搜尋關鍵詞可獲取更理想結果,如"最新 產品"。
<%'===========循環(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
%>
<%
rowcount=rowcount-1
rs.movenext
loop
'===========循環(huán)體結束%>
<%
else
response.write "
" end if end if end if%>
很抱歉,沒有找到與 "&search_q&" 相關的信息!
提示:用空格隔開多個搜尋關鍵詞可獲取更理想結果,如“最新 產品”。
" end if end if end if%>