<!--#include file="Inc/conn.asp"--> 
<% 
Set news_rs = Server.CreateObject("ADODB.Recordset") 
Sql = "select  * from pic  order by id desc" 
news_rs.open Sql,conn,1,3 
%> 
<table width="359" border="0" cellpadding="1" cellspacing="1" bordercolor="#FED851" bgcolor="#DAD0D1"> 
  <tr> 
    <td width="355" height="187" bgcolor="#FFFFFF" valign="top"> 
      <SCRIPT> 
var NowFrame = 1; 
var MaxFrame = 5; 
var bStart = 0; 
function fnToggle() { 
var next = NowFrame + 1; 
if(next == MaxFrame+1) 

NowFrame = MaxFrame; 
next = 1; 

if(bStart == 0) 

bStart = 1; 
  
setTimeout('fnToggle()', 1000); 
return; 

else 

oTransContainer.filters[0].Apply(); 
document.images['oDIV'+next].style.display = ""; 
document.images['oDIV'+NowFrame].style.display = "none"; 
oTransContainer.filters[0].Play(duration=5); 
if(NowFrame == MaxFrame) 
NowFrame = 1; 
else 
NowFrame++; 
} setTimeout('fnToggle()', 6000); 

fnToggle(); 
</SCRIPT> 
      <!--焦点图片开始--> 
      <DIV id=oTransContainer style="FILTER: progid:DXImageTransform.Microsoft.Wipe(GradientSize=1.0, wipeStyle=0, motion='forward'); WIDTH: 243px; HEIGHT: 185px"> 
  <% 
  dim i 
  i=1 
  do while not news_rs.eof%> 
<IMG id=oDIV <%=i%> style="BORDER-RIGHT: black 0px solid; BORDER-TOP: black 0px solid; DISPLAY: yes;  BORDER-LEFT: black 0px solid; BORDER-BOTTOM: black 0px solid" height=187 src=" <%=news_rs("pic")%>" width=355 border=0> 
  oDIV <%=i%> 
  <% 
  
  news_rs.movenext 
  i=i+1 
  loop 
  %> 
  </DIV> </td> 
  </tr> 
</table> 
可以拿出来但是显示了6