asp读取后台图文信息的无缝滚动,怎么修改都是出现错误。一直被这个烦恼,在这里也搜索到好多代码
但是加进去直接报错。不知道哪位高手帮帮忙,小弟在此谢谢了
以下是图文信息的asp文件
<table width="552" border="0" align="center" cellpadding="0" cellspacing="0">
<tbody>
<tr>
<td height="6"></td>
</tr>
</tbody>
</table>
<table width="770" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="98"><marquee direction="left" onmouseover='this.stop()' onmouseout='this.start()'style='cursor:hand'>
<div id=demo class="partypic">
<ul>
<%
Set RsContent=Server.CreateObject("Adodb.Recordset")
SqlContent= "Select top 8 * from ImgData where fClassID=70 order by ID desc"
RsContent.open SqlContent,conn
if RsContent.eof and RsContent.bof then %>
<li>暂无相关信息!!!</li>
<%else
while (Not RsContent.eof)
title=left(RsContent("Photo_Name"),10)
%>
<li><A href="ShowPic.asp?id=<%=RsContent("id")%>&class=61" target="_blank"><img src="ShowImg.Asp?ID=<%=RsContent("id")%>" width="120" height="80" border="0"></A><br /><A href="ShowPic.asp?id=<%=RsContent("id")%>&class=61" target="_blank"><%=title%></A></li>
<%
RsContent.Movenext
wend
end if
RsContent.close
Set RsContent = Nothing
%>
</ul>
</div>
</marquee></td>
</tr>
</table>
首页加载该页面