<%
set rsh=Server.CreateObject("Adodb.Recordset")
sql="select top 10 * from down where tid="&types2&" order by hits_day desc"
'SQL="select top 13 * from [down] where hits_datetime=date() order by hits_day desc"
rsh.open sql,conn,1,1
h=1
do while not rsh.eof and h<=10
if len(rsh("cxn"))>12 then
name=left(rsh("cxn"),12)
else
name=rsh("cxn")
end if
%>
|
|
<%
rsh.movenext
h=h+1
loop
rsh.close:set rsh=nothing
%>
<%
set rsh=Server.CreateObject("Adodb.Recordset")
sql="select top 10 * from down where tid="&types2&" order by id desc"
'sql="select top 13 * from [down] where tid="&types2&" order by hits_week desc "
rsh.open sql,conn,1,1
h=1
do while not rsh.eof and h<=10
if len(rsh("cxn"))>12 then
name=left(rsh("cxn"),12)
else
name=rsh("cxn")
end if
%>
|
|
<%
rsh.movenext
h=h+1
loop
rsh.close:set rsh=nothing
%>
<%
set rsh=Server.CreateObject("Adodb.Recordset")
sql="select top 10 * from down where tid="&types2&" order by id desc"
'sql="select top 13 id,name,hits_ms from [down] order by hits_ms desc "
rsh.open sql,conn,1,1
h=1
do while not rsh.eof and h<=10
if len(rsh("cxn"))>12 then
name=left(rsh("cxn"),12)
else
name=rsh("cxn")
end if
%>
|
|
<%
rsh.movenext
h=h+1
loop
rsh.close:set rsh=nothing
%>
<%
set rsh=Server.CreateObject("Adodb.Recordset")
sql="select top 10 * from down where tid="&types2&" order by hits desc"
'sql="select top 13 * from [down] order by hits desc "
rsh.open sql,conn,1,1
h=1
do while not rsh.eof and h<=10
if len(rsh("cxn"))>12 then
name=left(rsh("cxn"),12)
else
name=rsh("cxn")
end if
%>
|
|
<%
rsh.movenext
h=h+1
loop
rsh.close:set rsh=nothing
%>
|
