网络上最流行的图片向左滚动代码有误，请高手进！：：：

<div align='center' id='demo' style='overflow:hidden;height:75px;width:100%;'><!--滚动区的高度和宽度-->
<table align='center' cellpadding='0' cellspace='0' border='0'>
<tr>
<td id='demo1' valign='top'>
<table width='100%' cellpadding='0' cellspacing='0' border='0' align='center'>
<tr valign='top'>
<%
while not rs_Product.EOF
fileExt=lcase(getFileExtName(rs_Product("DefaultPicUrl")))
%>
<td align='center'>
<TABLE width=100% border=0 align=center cellPadding=0 cellSpacing=0>
<!-- <TR>
<TD width=8 rowspan=3 >&nbsp;</TD>
<TD vAlign=top width=8><img src='Images/bg_0ltop.gif' width=10 height=10></TD>
<TD background=images/bg_01.gif></TD>
<TD vAlign=top width=7><img src='Images/bg_0rtop.gif' width=10 height=10></TD>
<TD width=7 rowspan=3 vAlign=top>&nbsp;</TD>
</TR>-->
<TR>
<%if (uselvl<=rs_Product("ReadLevel") and uselvlv2=rs_Product("ReadLevelv2")) or uselvl=9 then%>
<!-- <TD background='Images/bg_03.gif'>&nbsp;</TD>-->
<TD align="center" bgcolor="#000000" style="FILTER: alpha(opacity=45,finishopacity=5,style=0)" onmouseover="this.style.filter='alpha(opacity=100,finishopacity=65,style=0)';" onmouseout="this.style.filter='alpha(opacity=45,finishopacity=5,style=0)';">

<a href='ProductShow.asp?ArticleID=<%=rs_Product("ArticleID")%>' target=_self title='<%=rs_Product("title")%>'>
<%if fileext="jpg" or fileext="bmp" or fileext="png" or fileext="gif" then

      
%>
                  

<img border="0" height="75" <%if uselvl>rs_Product("ReadLevel") then%>onmouseover="this.style.filter='alpha(opacity=\'30\')';" onmouseout="this.style.filter='alpha(opacity=\'10\')';" style="FILTER: alpha(opacity=30,finishopacity=30,style=1)"<%else%>onmouseout=low(this) onmouseover=high(this) style="FILTER: alpha(opacity=30)"<%end if%> src="<%if rs_Product("DefaultPicUrl")="" then%>Img/nopic.gif<%else%><%=rs_Product("DefaultPicUrl")%><%end if%>" width="105" alt="<%=rs_Product("title")%>">

 <!--<img border="0" height="75" style="FILTER: revealTrans(duration=2,transition=20) alpha(opacity=75,finishopacity=5,style=0)" src="<%if rs_Product("DefaultPicUrl")="" then%>Img/nopic.gif<%else%><%=rs_Product("DefaultPicUrl")%><%end if%>" width="105" alt="<%=rs_Product("title")%>">
  -->
 
 
 
<%else
if fileext="swf" then%>
<object  classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000'  codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0' width='105' height='75'>
<param name=movie value='<%=rs_Product("DefaultPicUrl")%>'>
<param name=quality value=high>
<param name='Play' value='-1'>
<param name='Loop' value='0'>
<param name='Menu' value='-1'>
<param name='wmode' value='transparent'>
<embed src='<%=rs_Product("DefaultPicUrl")%>' width='105' height='75' pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash'></embed>
</object>

<%end if
end if%></a>

   </TD>
   <TD background=''>&nbsp;</TD>
   <%else%>
  
     
  <%end if%>
  
</TR>
<!-- <TR>
<TD><img src='Images/bg_0lbottom.gif' width=10 height=10></TD>
<TD><img src='Images/bg_02.gif'></TD>
<TD><img src='Images/bg_0rbottom.gif' width=10 height=10></TD>
   </TR>-->   </TABLE>
</td>
  <%
  rs_Product.MoveNext
wend
%>
</tr>
</table>
</td>
<td id=demo2 valign=top></td>
</tr>
</table>
</div>