• 博客(0)
  • 资源 (2)

空空如也

asp 无限极分类完整实例

自己编写的无限极分类代码,参考alixixi

2011-05-14

flash首页图片.rar

<!--#include file="conn.asp"--> <% sql="select top 6 * from news order by id desc" set rs=Server.CreateObject("adodb.recordset") rs.open sql,db,1,1 %> <script type="text/javascript"> var pic_width=450; //图片宽度 var pic_height=250; //图片高度 var button_pos=4; //按扭位置 1左 2右 3上 4下 var stop_time=4000; //图片停留时间(1000为1秒钟) var show_text=1; //是否显示文字标签 1显示 0不显示 var txtcolor="000000"; //文字色 var bgcolor="DDDDDD"; //背景色 var imag=new Array(); var link=new Array(); var text=new Array(); <% i=1 while not rs.eof Response.Write("imag["&i&"]="""&rs("Smpic")&""";") response.Write("document.write('\n');") Response.Write("link["&i&"]='newshow.asp?id="&rs("id")&"';") response.Write("document.write('\n');") Response.Write("text["&i&"]="""&rs("Txtitle")&""";") response.Write("document.write('\n');") i=i+1 rs.movenext wend rs.close %> //可编辑内容结束 var swf_height=show_text==1?pic_height+20:pic_height; var pics="", links="", texts=""; for(var i=1; i<imag.length; i++){ pics=pics+("|"+imag[i]); links=links+("|"+link[i]); texts=texts+("|"+text[i]); } pics=pics.substring(1); links=links.substring(1); texts=texts.substring(1); document.write('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cabversion=6,0,0,0" width="'+ pic_width +'" height="'+ swf_height +'">'); document.write('<param name="movie" value="focus.swf">'); document.write('<param name="quality" value="high"><param name="wmode" value="opaque">'); document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&pic_width='+pic_width+'&pic_height='+pic_height+'&show_text='+show_text+'&txtcolor='+txtcolor+'&bgcolor='+bgcolor+'&button_pos='+button_pos +'&stop_time='+stop_time+'">'); document.write('<embed src="focus.swf" FlashVars="pics='+pics+'&links='+links+'&texts='+texts+'&pic_width='+pic_width+'&pic_height='+pic_height+'&show_text='+show_text+'&txtcolor='+txtcolor+'&bgcolor='+bgcolor+'&button_pos=' +button_pos+'&stop_time='+stop_time+'" quality="high" width="'+ pic_width +'" height="'+ swf_height +'" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />'); document.write('</object>'); </script>

2010-04-26

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除