<% set rs=server.createobject("adodb.recordset") rs.open "select * from title",conn,1,3 auto=rs("auto") rs.close set rs=nothing if auto<>1 then Response.Write "" Else set rsDe=server.createobject("adodb.recordset") sql=" select * from detail where verity=0 order by id desc" rsDe.open sql,conn,1,3 do while not rsDe.eof if rsDe("youqing123_in")>0 then rsDe("verity")=1 rsDe.update end if rsDe.movenext loop rsDe.close set rsDe=nothing 'Response.End end if %> <% set rsDe=server.createobject("adodb.recordset") sql= "select * from detail Where verity=1 and youqing123_hei=0 order by youqing123_intime desc" 'response.write sql rsDe.open sql,conn,1,1 %> <% n=1 While Not rsDe.Eof and n<50 %> <% if n mod 7 =0 then Response.Write("") end if rsDe.MoveNext n=n+1 Wend rsDe.close set rsDe=nothing %>
网址:<%=rsDe("url")%> 当天来路:<%=rsDe("youqing123_dayin")%>次|历史来路:<%=rsDe("youqing123_in")%>次 target='_blank'> <%if rsDe("youqing123_dayin")>9 then%><%end if%> <%if rsDe("youqing123_dayin")>19 then%><%end if%> <%if rsDe("youqing123_dayin")>29 then%><%end if%> <%if rsDe("youqing123_dayin")>39 then%><%end if%> <%if rsDe("youqing123_dayin")>79 then%><%end if%> <%if rsDe("youqing123_dayin")>99 then%><%end if%> <%if rsDe("youqing123_dayin")>149 then%><%end if%> <%if rsDe("youqing123_dayin")>199 then%><%end if%> <%=rsDe("title")%><%if rsDe("youqing123_dayin")>4 then%><%end if%> " target="_blank">世界排名查看
<% set rsDe=server.createobject("adodb.recordset") sql= "select * from detail Where verity=1 and youqing123_hei=0 and logo<>'' order by youqing123_intime desc" 'response.write sql rsDe.open sql,conn,1,1 %>