ASP教程之asp制作常見flash新聞圖片輪換代碼(2)_ASP教程

推薦：如何用asp程序處理數據庫被掛馬的問題
數據庫被掛馬后很多人不知怎么處理，或處理的不完全，導致網頁打開后仍有木馬，本文介紹一種比較好的處理辦法，供大家參考。 第一步 ：為現有數據庫做好備份。 第二步 ：執行如下ASP文件，就可以去掉數據庫當中的JS木馬。（注：conn.asp從略） ’這里放入JS木

<a target=_self href="javascript:goUrl()"> <span class="f14b">  <script type="text/javascript">  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=200   var focus_height=160   var text_height=18   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>’);   </script>  </span></a><span id=focustext class=f14b> </span>

    flash文件下載地址：flash.rar

分享：詳解asp之FileSystemObject對象
指定的驅動器存在嗎？ 本例演示如何使用DriveExists方法來探測某個驅動器是否存在。 代碼如下： html body % Setfs=Server.CreateObject(Scripting.FileSystemObject) iffs.driveexists(c:)=truethen Response.Write(驅動器c:存在。) Else Response.Wr