这段代码怎么样可以变为动态切换

dean8828 2009-11-25 10:31:01

<META http-equiv=Content-Type content="text/html; charset=gb2312">
<script type="text/javascript">
<!--
var bannerAD=new Array();
var adNum=0;
bannerAD[0]=<%if trim(rs("apic"))="" then %>;
bannerAD[1]=<%else trim(rs("apic"))="" end if %>;

var preloadedimages=new Array();
for (i=1;i<bannerAD.length;i++) {
preloadedimages[i]=new Image();
preloadedimages[i].src=bannerAD[i];
}

function setTransition(){
if (document.all){
bannerADrotator.filters.revealTrans.Transition=Math.floor(Math.random()*23);
bannerADrotator.filters.revealTrans.apply();
}
}

function playTransition(){
if (document.all) {
bannerADrotator.filters.revealTrans.play();
}
}

function nextAd(){
if (adNum<bannerAD.length-1){
adNum++;
} else {
adNum=0;
}
setTransition();
document.images.bannerADrotator.src=bannerAD[adNum];
playTransition();
theTimer=setTimeout("nextAd()", 5000);
}
//-->
</script>

<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select top 3 id,name,apic,adddate,stock from product where stock >= 0 and recommend = 6 order by adddate desc",conn,1,1
if rs.eof and rs.bof then
rs.close
response.write "<table CELLSPACING=0 CELLPADDING=0 BORDER=0 WIDTH=""100%""><tr><td align=center>对不起,请您先到后台添加商品!</td></tr></table>"
else
%>
<% dim j
j=0
do while not rs.eof %>
<%if j>=3 then exit do%>
<table width="200" border="0" cellspacing="0" cellpadding="0" style="float:left; margin:5px 5px 0 0px;">
<TBODY>

<tr>
<td height="200" align="center"><A HREF=b2b_cpinfo.asp?id=<%=rs("id")%> TARGET=_blank>
<IMG SRC=<%if trim(rs("apic"))="" then %>
images/emptybook.gif
<% else %>
image\<% = trim(rs("apic")) %>
<% end if%> BORDER=0 width="180" height="180" name="bannerADrotator" style="FILTER: revealTrans(duration=2,transition=20);"></A>
<script type="text/javascript">nextAd()</script></td>
</tr>
<tr>
<td align="center"><%=trim(rs("name"))%></td>

</tr>

</TBODY>
</table> <% rs.movenext
j=j+1
if rs.eof then
exit do
end if

loop %>
<%
rs.close
%>
<% end if %>




利用了网上一个图片切换代码,想把他改成路径连接数据库的。可是不成功

请问怎么修改才能让图片读取到数据库,以及所有图片都切换
...全文
79 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
dean8828 2009-11-25
  • 打赏
  • 举报
回复
人工置顶。。。
dean8828 2009-11-25
  • 打赏
  • 举报
回复
人工置顶。。。
dean8828 2009-11-25
  • 打赏
  • 举报
回复
这样好像不行
挨踢直男 2009-11-25
  • 打赏
  • 举报
回复
<img src="images/emptybook.gif">
<% else %>
<img src="image/<% = trim(rs("apic")) %>">

28,404

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧