[动网] 如何做FLASH广告效果.

熹

1.到论坛后台，风格界面模板总管理，改分页面模板(page_index) ，界面风格，template.html(0) 找到 $ f% d; |+ {2 y; w: ]<div id="tdleft" style="height:120px; "> 改成 <div id="tdleft" style="height:120px;width:40%; "> 再找到 <div style="height:120px;float:left;width:320px;" > 改成 & x: F+ C: t+ s4 H<div style="height:120px;float:left;width:40%;" id="tdleft"> ( i. t( Y) U& ~ u( ^' V' Q; f" B注意：如果你已装了时钟等插件，做过了以上修改，就跳过从以下开始安装 然后找到 & @7 ~' z0 u3 x) k' T<div style="float:left;width:330px;">最高日发帖：<b><xsl:value-of select="[email=BoardList/forum_info/@forum_maxpostnum]BoardList/forum_info/@forum_maxpostnum"/></b[/email]> 篇，发生时间：<xsl:value-of select="[email=BoardList/forum_info/@forum_maxpostdate]BoardList/forum_info/@forum_maxpostdate"/></div[/email]> </div> & C4 T I7 l1 l7 q* s</div> " i- U. j% T, |5 f5 Z下面插入 <div style="width:100%;text-align : center;overflow:hidden;"><script src="Dv_News.asp?GetName=def_flapic"></script></div> + Y4 P$ t) C0 j8 e2.后台增加首页flash图片调用 调用标识名称：def_flapic 5 k. P) C7 b, S, S! |调用说明：首页FLASH图片 调用类型：展区调用 数据更新间隔：300 秒 （这里可以按你的需要设小些） 时间显示格式：YYYY-M-D $ B) l( l; U$ k% v1 @调用设置： 显示记录数：6 每行显示个数：1 标题长度：10 调用的版面：精美贴图 （选择你要调用的版面） 6 [+ n0 ]$ Q# q1 G7 ]6 `版面限制设置：只调用该版面 版面的限制：显示特殊版面数据 1 ~. f0 E3 T3 k6 B- `调用文件类型 ：图片集 显示排序： 默认 8 W* e& K" A4 V, }) e/ v , K! O6 B. E+ s; F以上可以按自己要求设置： 8 Y& p; M- ~( b3 Z# q/ v以下为关键部分，如果看不懂，请不要随意更改！ 模板_开始标记部分(其中的数字自己试着调整） ) c) [9 M! u. n1 m6 e* X<script>var focus_width=150;var focus_height=130;var text_height=15;var swf_height = focus_height+text_height;var pics='';var links='';var texts=''; 模板_主体循环标记部分(其中地址换成你的地址） " Q A/ z* F* }; v& N6 z5 |) A0 cpics+='{$TrueFilename}|'; N) h# K+ o, c! E& h: Clinks+='http://ctpt.com.cn/bbs/dispbbs.asp?boardid={$Boardid}%26id={$RootID}%26replyID={$ReplyID}|'; 7 t' }) J& l0 [0 q6 E0 X$ stexts+='{$Readme}|'; 5 X4 C6 \; `: \8 H4 E. S 模板_结束标记部分 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="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 +'">'); ) {3 w7 q9 ~) s4 L- b4 qdocument.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="fla/focus.swf"> <param name="quality" value="high"><param name="bgcolor" value="#CCCCCC">'); document.write('<param name="menu" value="false"><param name=wmode value="opaque">'); ' M+ V* [, q; N0 y; r& v5 x0 wdocument.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">'); document.write('<embed src="fla/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>'); & o) u: p0 F, r9 p, u / k$ \- q* J( Z+ A" P9 a2 H//--> i" ]. o! H' h6 l0 p' o </script> 3.调用文件修改 打开论坛根目录下的DV_NEWS.ASP 1 m9 A( L( X/ @4 c* \找到 6 T+ n/ W/ J' Y4 R7 N. c: _9 T Skin_Main = Replace(Skin_Main,"{$Boardid}",SQL(2,i)) , j8 a8 q" |9 N/ m/ F3 K, P Skin_Main = Replace(Skin_Main,"{$UserName}",SQL(3,i)) 4 r; l8 C# C4 I' _. U& o$ P" O后面插入 3 u' B( c( } |$ } Topic=replace(Topic,"'","‘") 6 j/ D, I- X1 m0 v- W3 } Topic=replace(Topic,"""","“") 找到 4 ^ \$ F! o, n5 M Filename = SQL(4,i) , L7 k- t# S; h" D$ ?& ?2 Y6 T If InStr(Filename,":") = 0 Or InStr(Filename,"//") = 0 Then 5 g$ p5 x Q, x; |# z Filename = Bbsurl & Dvbbs.Forum_Setting(76) & Filename End If End If 后面插入 Skin_Main = Replace(Skin_Main,"{$TrueFilename}",Filename) ! v$ q% Q0 T0 O修改完成！ : Z I# f" ]4 e$ ~# h红色部分的标记是我自己加的，要与调用文件修改中的最后一步相对应！