<% set rsDe=server.createobject("adodb.recordset") sql= "select * from detail Where verity=1 order by yl_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("yl_dayin")%>次 历史来路:<%=rsDe("yl_in")%>次|历史去路:<%=rsDe("out")%>次 target='_blank'> <%if rsDe("yl_dayin")>4 then%> <%end if%> <%if rsDe("yl_dayin")>9 then%> <%end if%> <%if rsDe("yl_dayin")>19 then%> <%end if%> <%if rsDe("yl_dayin")>29 then%> <%end if%> <%if rsDe("yl_dayin")>49 then%> <%end if%> <%=rsDe("title")%> <%if rsDe("yl_dayin")>4 then%> <%end if%>