<link href="css/pic.css" rel="stylesheet">
<%
Dim sban
Set oRs = oConn.Execute("Select Top 5 Id,Bimg,Btxt,Burl FROM [Lstbanner] where Btitle='幻灯片' order by id asc")
If Not oRs.EOF Then sban= oRs.GetRows
Set oRs = Nothing
%>
<div ads_key="sc_chinaz_com" ads_name="首页焦点广告位" id="sc_chinaz_com_box" class="sc_chinaz_com_box ftl">
		<%if Isarray(sban) Then%>
		<%for i=0 to UBound(sban,2)%>
		<div class="img dpn"><a href="<%=sban(3,i)%>" target="_blank" title="<%=sban(2,i)%>"><img class="img_directly_load" src="<%=sban(1,i)%>" style="width:100%;height:180px;" alt="<%=sban(2,i)%>" /></a></div>
		<%Next 
		End if%>
		<ul id="sc_chinaz_com_txt_bg" class="panel">

	</ul>
		
	<div id="sc_chinaz_com_loding" class="loding"></div>
</div>
<script src="JavaScript/pic.js" type="text/javascript"></script>
