轮显图片[动态读取图片数据]代码

因为项目需要，所以去找了下轮显图片的代码。网上很多，简单的修改了下，恩可以显示图片。但是问题来了，当没有数据的时候会出现页面显示出现问题。后来才发现是我对数据库有没有数据进行判断的时候出现了问题。居然连最基本的顺序执行都给忘记了。所以后来只要改动下代码的位置就OK了。贴出来代码积累点经验。学习asp还是有很长的路要走的。

代码段1. js+flash搞定。

 

<%
pathlevel = " ../ "
%>

<%   ----------------- 数据库连接
' 幻灯片新闻
sql="select top 5 * from [图表专区] where 属于=5 and 类别=1 order by 编号 desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,cn,1,1
if not rs.eof then    -------------------读取数据库内容

-----------------下面是对读取的内容进行处理

k=1
Num_total=rs.recordcount
for i=1 to 5
if i>Num_total then exit for
if i=1 then
imgUrl11=rs("图片")
 if len(rs("标题"))>=18 then
 imgtext11= left(rs("标题"),18)&"..."
 else
 imgtext11=rs("标题")
 end if
imgLink11=rs("图片")
end if
if i=2 then
imgUrl22=rs("图片")
 if len(rs("标题"))>=18 then
 imgtext22= left(rs("标题"),18)&"..."
 else
 imgtext22=rs("标题")
 end if
imgLink22=rs("图片")
end if
if i=3 then
imgUrl33=rs("图片")
 if len(rs("标题"))>=18 then
 imgtext33= left(rs("标题"),18)&"..." 
 else
 imgtext33=rs("标题")
 end if
imgLink33=rs("图片")
end if
if i=4 then
imgUrl44=rs("图片")
 if len(rs("标题"))>=18 then
 imgtext44= left(rs("标题"),18)&"..."
 else
 imgtext44=rs("标题")
 end if
imgLink44=rs("图片")
end if
if i=5 then
imgUrl55=rs("图片")
 if len(rs("标题"))>=18 then
 imgtext55= left(rs("标题"),18)&"..."
 else
 imgtext55=rs("标题")
 end if
imgLink55=rs("图片")
end if
rs.movenext
k=k+1
next
%>

----------------有数据的时候调用flash显示图片


 
 

imgUrl1="<%=imgUrl11%>";
imgtext1="<%=imgtext11%>"
imgLink1=escape("<%=imgLink11%>");
imgUrl2="<%=imgUrl22%>";
imgtext2="<%=imgtext22%>"
imgLink2=escape("<%=imgLink22%>");
imgUrl3="<%=imgUrl33%>";
imgtext3="<%=imgtext33%>"
imgLink3=escape("<%=imgLink33%>");
imgUrl4="<%=imgUrl44%>";
imgtext4="<%=imgtext44%>"
imgLink4=escape("<%=imgLink44%>");
imgUrl5="<%=imgUrl55%>";
imgtext5="<%=imgtext55%>"
imgLink5=escape("<%=imgLink55%>");
var focus_width=246
 var focus_height=142
 var text_height=15
 var swf_height = focus_height+text_height
 <%if Num_total=1 then%>
 var pics=imgUrl1
 var links=imgLink1 
 var texts=imgtext1
 <%elseif Num_total=2 then%>
 var pics=imgUrl1+"|"+imgUrl2
 var links=imgLink1+"|"+imgLink2
 var texts=imgtext1+"|"+imgtext2
 <%elseif Num_total=3 then%>
 var pics=imgUrl1+"|"+imgUrl2+"|"+imgUrl3
 var links=imgLink1+"|"+imgLink2+"|"+imgLink3
 var texts=imgtext1+"|"+imgtext2+"|"+imgtext3
 <%elseif Num_total=4 then%>
 var pics=imgUrl1+"|"+imgUrl2+"|"+imgUrl3+"|"+imgUrl4
 var links=imgLink1+"|"+imgLink2+"|"+imgLink3+"|"+imgLink4
 var texts=imgtext1+"|"+imgtext2+"|"+imgtext3+"|"+imgtext4
 <%elseif Num_total=5 then%>
 var pics=imgUrl1+"|"+imgUrl2+"|"+imgUrl3+"|"+imgUrl4+"|"+imgUrl5
 var links=imgLink1+"|"+imgLink2+"|"+imgLink3+"|"+imgLink4+"|"+imgLink5 
 var texts=imgtext1+"|"+imgtext2+"|"+imgtext3+"|"+imgtext4+"|"+imgtext5
 <%end if%>
 
 document.write( ' < object classid = " clsid:d27cdb6e-ae6d-11cf-96b8-444553540000 "  codebase = " http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0 "  width = " '+ focus_width +' "  height = " '+ swf_height +' " > ' );
 document.write( ' < param name = " allowScriptAccess "  value = " sameDomain " >< param name = " movie "  value = " focus.swf " >< param name = " quality "  value = " high " >< param name = " bgcolor "  value = " #F0F0F0 " > ' );
 document.write( ' < param name = " menu "  value = " false " >< param name = wmode value = " opaque " > ' );
 document.write( ' < param name = " FlashVars "  value = " pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+' " > ' ); 
 document.write( ' < embed src = " pixviewer.swf "  wmode = " opaque "  FlashVars = " pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+' "  menu = " false "  bgcolor = " #F0F0F0 "  quality = " high "  width = " '+ focus_width +' "  height = " '+ focus_height +' "  allowScriptAccess = " sameDomain "  type = " application/x-shockwave-flash "  pluginspage = " http://www.macromedia.com/go/getflashplayer "   /> ' );  document.write( ' object > ' );
 


 

----------------------没有数据直接输出 
<%
else 
response.Write "暂时没有数据！"
end if
%>

 

把上面的文件保存在一个文件show.asp内在需要的地方直接调用就可以了。。

这样就不会出现页面显示混乱的问题了。。。需要一个显示图片的flash。

下面贴一个js+div 显示的。

 

<%
pathlevel = " ../ "
%>

< Script Language = " JavaScript " >   
  
Script >   

 

这个也是保存为一个文件，在需要的时候直接调用就OK啦。。。