源码论坛,商业源码下载,尽在锦尚中国商业源码论坛

标题: 求助企业网站首页产品图片如何滚动显示 [打印本页]

作者: chenghome 时间: 2010-11-1 23:06
标题: 求助企业网站首页产品图片如何滚动显示
各位大大，本人菜鸟，向各位请教个问题：企业网站首页产品图片如何无缝滚动显示？谢谢各位大大了
源码如下： 
                        <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
                           <%
set rs_Product=server.createobject("adodb.recordset")
sqltext="select top 4 * from Product where Passed=True order by UpdateTime desc"
rs_Product.open sqltext,conn,1,1
%>
                           <tr align="center">
                              <%
         If rs_Product.eof and rs_Product.bof then
         response.write "<td><p align='center'><font color='#ff0000'>还没任何产品</font></p></td>"
         else
   row_count=1
   Do While Not rs_Product.EOF%>
                              <td><table width="1%"  border="0" cellspacing="0" cellpadding="0">
                              <tr>
                                 <td><table width="85%"  border="0" cellpadding="3" cellspacing="1" bgcolor="#E9E9E9">
                                    <tr>
                                       <td width="130" height="96" bgcolor="#FFFFFF"><table width="110"  border="0" cellpadding="0" cellspacing="0" bgcolor="#E9E9E9">
                                          <tr>
                                             <td width="110" height="90" align="center" valign="middle" bgcolor="#FFFFFF"><a href="ProductShow.asp?ID=<%=rs_Product("id")%>"><img src=<%=rs_Product("DefaultPicUrl")%> width="130" height="100" border=0 ></a></td>
                                          </tr>

                                       </table></td>
                                    </tr>
                                 </table></td>
                                 <td valign="bottom"><img src="Img/yyri2.gif" width="7" height="112" /></td>
                              </tr>
                              <tr>
                                 <td height="25" colspan="2" align="center"><a href="ProductShow.asp?ID=<%=rs_Product("id")%>"><%=rs_Product("Title")%></a></td>
                              </tr>
                              </table></td>
                              <% if row_count mod 4 =0 then%>
                           </tr>
                           <tr>
                              <%end if%>
                              <%
rs_Product.MoveNext
row_count=row_count+1
Loop
end if
rs_Product.close
%>
                           </tr>
                        </table>

作者: chenghome 时间: 2010-11-2 00:06
怎么没人理我啊？高手大大，帮帮我啊！我调试了半天都没弄好

欢迎光临源码论坛,商业源码下载,尽在锦尚中国商业源码论坛 (https://bbs.52jscn.com/)