<% query=request("query") cl=request("cl") URLQuery=Server.URLEncode(query) if query="" then Response.Redirect("search.htm") else NoURLQuery=URLDecode(query) ConditionQuery="%" & NoURLQuery & "%" end if Function TDTEXT(cl2,ClassText)'導(dǎo)航欄 TDTEXT=""&ClassText&"" end Function MaxTM = 50 '總條目數(shù) set rs = server.createobject("adodb.recordset") sql = "select top "&MaxTM&" SoSUM,SoQuery from JK_So where SoQuery like '"&ConditionQuery&"' and SoQuery not like '"&Query&"' order by SoSUM desc" rs.open sql,conn,1,1 if rs.bof and rs.eof then Response.Redirect("search.asp?query="&URLQuery&"&cl="&cl) else set rsQS = server.createobject("adodb.recordset") sqlQS = "select top "&MaxTM&" sum(SoSUM) as QS from JK_So where SoQuery like '"&ConditionQuery&"' and SoQuery not like '"&Query&"'" rsQS.open sqlQS,conn,1,1 QS=rsQS("QS") rsQS.close set rsQS = nothing RSC=rs.recordcount k = 0 if RSC mod(5) <> 0 then h = int( RSC / 5 ) + 1 else h = int( RSC / 5 ) end if for j = 1 to h SearchMore=SearchMore&"" for i = 1 to 5 k = k + 1 ImageWidth=int(rs("SoSUM")/QS*500) if ImageWidth > 150 then ImageWidth = 150 end if if ImageWidth < 2 then ImageWidth = 2 end if SearchMore=SearchMore&"" if k < RSC then rs.movenext else exit for end if next SearchMore=SearchMore&"
"&k&". "&outHTML(rs("SoQuery"))&""&rs("SoSUM")&"
" next end if %> 求醫(yī)問(wèn)藥搜霸相關(guān)搜索_<%=outHTML(query)%>

艾客直播_伊人久久婷婷五月综97色,无码少妇一区二区三区99,精品国产欧美一区二区,四虎成人国产精品永久在线

求醫(yī)問(wèn)藥 設(shè)求醫(yī)問(wèn)藥為首頁(yè)
>
<%=TDTEXT(1,"資 訊")%><%=TDTEXT(2,"醫(yī) 院")%><%=TDTEXT(3,"醫(yī) 藥")%><%=TDTEXT(4,"疾 病")%><%=TDTEXT(5,"網(wǎng) 站")%>與 <%=outHTML(query)%> 相關(guān)的關(guān)鍵詞，被搜索次數(shù)最多的有： 
  小提示：點(diǎn)擊每個(gè)關(guān)鍵詞，可查看搜索結(jié)果
關(guān)鍵字被搜索次數(shù)
<%=SearchMore%>
關(guān)于我們 | 聯(lián)系方式 | 廣告服務(wù) | 招商引資 | 友情鏈接 | 設(shè)為首頁(yè) | 網(wǎng)站地圖 | 網(wǎng)站導(dǎo)航
Copyright © 2005-2009　求醫(yī)問(wèn)藥　jk58.com　All rights reserved
本站信息僅供參考 不能作為診斷及醫(yī)療的依據(jù)
聲明：本站部分信息來(lái)自互聯(lián)網(wǎng)，若有版權(quán)問(wèn)題請(qǐng)及時(shí)與本站聯(lián)系。 

    • <tt id="qgamd"></tt>