四格调用之幻灯片设置方法
five01
调用类型为展区调用
调用的图片调用宽度和高度分别为250和190
flash模板开始部份
<script>var focus_width=250;var focus_height=190;var text_height=22;var swf_height = focus_height+text_height;var pics='';var links='';var texts='';
flash模板循环部份
pics+='{$TrueFilename}|';links+='dispbbs.asp?boardid={$Boardid}&id={$RootID}&replyID={$ReplyID}|';texts+='{$Readme}|';
flash模板结束部份
pics=pics.substring(0,pics.length-1);links=links.substring(0,links.length-1);texts=texts.substring(0,texts.length-1);document.write('<object classid="picclsid: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="#CCCCCC">'); 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="focus.swf" wmode="opaque" FlashVars="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'" menu="false" bgcolor="#ffffff" quality="high" width="'+ focus_width +'" height="'+ swf_height +'" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />'); document.write('</object>'); //--> </script>
dv_news.asp的程序修改
在
If SQL(9,i)<>"" Then
Filename = Bbsurl & SQL(9,i)
Else
Filename = SQL(4,i)
If InStr(Filename,":") = 0 Or InStr(Filename,"//") = 0 Then
Filename = Bbsurl & Dvbbs.Forum_Setting(76) & Filename
End If
End If
下面添加
Skin_Main = Replace(Skin_Main,"{$TrueFilename}",Filename) '首页调用增加代码
[此贴子已经被作者于2008-8-27 9:28:01编辑过]