<!--#include file="mdb.asp"-->
<link rel="stylesheet" href="css/style.css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<BODY leftMargin=0 topMargin=0 marginwidth="0" marginheight="0">
<STYLE type=text/css>.article {
    BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM: black 1px solid; BORDER-LEFT: black 1px solid; BORDER-RIGHT: black 1px solid; BORDER-TOP: black 1px solid; FILTER: revealTrans(transition=23,duration=0.5) blendTrans(duration=0.5); PADDING-BOTTOM: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; PADDING-TOP: 0px; POSITION: absolute; VISIBILITY: hidden
}
P {
    FONT-SIZE: 9pt
}
TD {
    FONT-SIZE: 9pt
}
SELECT {
    FONT-SIZE: 9pt
}
A {
    COLOR: #000000; FONT-SIZE: 9pt; TEXT-DECORATION: none
}
A:hover {
    COLOR: #ff0000; TEXT-DECORATION: underline overline
}
.drop {
    FILTER: dropshadow(color=000000, offx=0, offy=0, positive=0)
}
.drop2 {
    FILTER: dropshadow(color=ffffff, offx=0, offy=0, positive=0)
}
</STYLE>
<SCRIPT language=JavaScript1.2> 
<!-- 
function wsug(e, str){
 var oThis = arguments.callee;
 if(!str) {
  oThis.sug.style.visibility = 'hidden';
  //oThis.sug1.innerHTML = "图片正在加载中......";
  document.onmousemove = null;
  return;
 }  
 if(!oThis.sug){
  var div = document.createElement('div'), css = 'top:0; left:0; position:absolute; z-index:100; visibility:hidden;';
   div.style.cssText = css;
   div.setAttribute('style',css);
  var sug = document.createElement('div'), css= 'font:normal 12px/16px "宋体"; white-space:nowrap; color:#666; padding:3px; position:absolute; left:0; top:0; z-index:10; background:#f9fdfd; border:1px solid #0aa; height:86;width:113;';
   sug.style.cssText = css;
   sug.setAttribute('style',css);
  var dr = document.createElement('div'), css = 'position:absolute; top:3px; left:3px; background:#333; filter:alpha(opacity=50); opacity:0.5; z-index:9;';
   dr.style.cssText = css;
   dr.setAttribute('style',css);
  var ifr = document.createElement('iframe'), css='position:absolute; left:0; top:0; z-index:8; filter:alpha(opacity=0); opacity:0;';
   ifr.style.cssText = css;
   ifr.setAttribute('style',css);
  div.appendChild(ifr);
  div.appendChild(dr);
  div.appendChild(sug);
  div.sug = sug;
  document.body.appendChild(div);
  oThis.sug = div;
  //oThis.sug1=sug;
  oThis.dr = dr;
  oThis.ifr = ifr;
  div = dr = ifr = sug = null;
 }
 var e = e || window.event, obj = oThis.sug, dr = oThis.dr, ifr = oThis.ifr;
//obj.div.innerHTML = "图片正在加载中......";
//obj.sug.innerHTML = "图片正在加载中......";
//obj.dr.innerHTML = "图片正在加载中......";
//obj.ifr.innerHTML = "图片正在加载中......";
obj.sug.innerHTML = str;
//obj.sug.innerHTML = str;
var w = obj.sug.offsetWidth, h = obj.sug.offsetHeight, dw = document.documentElement.clientWidth||document.body.clientWidth; dh = document.documentElement.clientHeight || document.body.clientHeight;
var st = document.documentElement.scrollTop || document.body.scrollTop, sl = document.documentElement.scrollLeft || document.body.scrollLeft;
//var left = e.clientX +sl +17 + w < dw + sl  &&  e.clientX + sl + 15 || e.clientX +sl-8 - w, top = e.clientY + st + 17;
var left// = e.clientX + sl +17 + w < dw + sl  &&  e.clientX + sl + 15 || e.clientX + sl - 25 - w;
var top// = e.clientY + st +17 + h < dh + st  &&  e.clientY + st + 17 || e.clientY + st - 25 - h;
if (e.clientY + st +17 + h < dh + st)
 {
 	top = e.clientY + st + 17; 
 }
 else
 {
 //alert(e.clientY + st - 25 - h);
 	if (e.clientY + st - 25 - h < 0)
 	{
 		top = 0;
 	}
 	else
 	{
  		top = e.clientY + st - 25 - h;
  	}
 }
if (e.clientX + sl +17 + w < dw + sl)
 {
 	left = e.clientX + sl + 15;
 
 }
 else
 {
  	left = e.clientX + sl - 25 - w;
 }
 obj.style.left = left+ 10 + 'px';
 obj.style.top = top + 10 + 'px';
 dr.style.width = w + 'px';
 dr.style.height = h + 'px';
 ifr.style.width = w + 3 + 'px';
 ifr.style.height = h + 3 + 'px';
 obj.style.visibility = 'visible';
};
//--> 
</script>
<%
set rsDe=server.createobject("adodb.recordset")
sql= "select * from detail Where verity=1 and xl_hei=0 order by xl_intime desc" 
'response.write sql
rsDe.open sql,conn,1,1
%>
<table width=100% height=4 border=1 cellpadding=1 cellspacing=1 >
<%
n=1 
While Not rsDe.Eof and n<36
%>
    <td height="20">
	<img src=logo/01.gif hspace="5" border=0>
	<a href='showurl.asp?id=<%=rsDe("id")%>' title=名称:<%=rsDe("title")%>&#13&#10网址:<%=rsDe("url")%>&#13&#10当天来路:<%=rsDe("xl_dayin")%>次|历史来路:<%=rsDe("xl_in")%>次 target='_blank'><%if rsDe("xl_dayin")>9 then%></font><font color=#008000><%end if%>
<%if rsDe("xl_dayin")>19 then%></font><font color=#FF00FF><%end if%>
<%if rsDe("xl_dayin")>29 then%></font><font color=#0000ff><%end if%>
<%if rsDe("xl_dayin")>39 then%></font><font color=#ff0000><%end if%>
<%if rsDe("xl_dayin")>79 then%></font><font color=#008000><b><%end if%>
<%if rsDe("xl_dayin")>99 then%></font><font color=#FF00FF><b><%end if%>
<%if rsDe("xl_dayin")>149 then%></font><font color=#0000FF><b><%end if%>
<%if rsDe("xl_dayin")>199 then%></font><font color=#ff0000><b><%end if%>
<%=rsDe("title")%><%if rsDe("xl_dayin")>4 then%></b></font><%end if%></a> </td>
<%
if n mod 7 =0 then
Response.Write("</Tr>")
   end if     
rsDe.MoveNext
n=n+1
Wend
rsDe.close
set rsDe=nothing
%></table>
<% 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("xl_in")>0 then
rsDe("verity")=1
rsDe.update
end if
rsDe.movenext 
loop 
rsDe.close
set rsDe=nothing
Response.End
end if
%>