<!--×î½üËÑË÷´¦Àí-->
<% data_path=""  %>
<!--#include file="conn/conn.asp"-->
	<%
	keys=""
	set rsnear=server.CreateObject("adodb.recordset")
	sqlnear="select top 5 keywords from Websen_keyhots  order by hits desc"
	rsnear.open sqlnear,conn,1,1
	if rsnear.eof then
	keys=""
	end if
	if not rsnear.eof then
	do while not rsnear.eof
	keys=keys&"<a href="&HOPE_InstallDir&"search/searchall.asp?keywords="&rsnear("keywords")&"><font color='#ffffff'>"&rsnear("keywords")&"</font></a>,"
	rsnear.movenext
	loop
	set rsnear=nothing
	end if
	
 if request.Cookies("zhuyongjian")="" then
    response.Cookies("zhuyongjian")=keys
 end if
    response.Write("document.write('"&replace(request.Cookies("zhuyongjian"),",","&nbsp;")&"')")
 %>