找回密码
 入住遨海湾
搜索
网站解决方案专享优惠-3折上云
查看: 1090|回复: 0

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

[复制链接]
发表于 2007-11-21 01:58:00 | 显示全部楼层 |阅读模式

登录后查才能浏览下载更多咨询,有问题联系QQ:3283999

您需要 登录 才可以下载或查看,没有账号?入住遨海湾

×
1.到论坛后台,风格界面模板总管理,改分页面模板(page_index) ,界面风格,template.html(0)3 j' {: \6 b7 M" g3 q 找到 7 |& c% G) w: r* }<div id="tdleft" style="height:120px; ">0 w% X3 h! |3 e7 `' @ 改成2 G, @# u5 H+ S y$ ~ <div id="tdleft" style="height:120px;width:40%; "> 8 n8 G, V9 l+ a6 m2 h再找到1 p3 `% s( j' y- @9 X' r' R <div style="height:120px;float:left;width:320px;" > ! T4 O ^; x; p% ]: m2 \5 k改成# L# j- I+ ` [, a' l6 x0 A <div style="height:120px;float:left;width:40%;" id="tdleft"> S( v3 Z' v& y# i+ G5 P7 |8 r( P& T注意:如果你已装了时钟等插件,做过了以上修改,就跳过从以下开始安装 * s3 \2 {$ \6 {* ]然后找到 Z4 j9 U3 n" v5 f" i+ h<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]>4 V/ I. x, [2 p3 S4 S. ?4 _+ W </div> % ]3 x& x& }5 {' J</div>/ W* k2 l) m) \ O- m. y) J+ v# j 下面插入& J' V' w: l' |3 h" r <div style="width:100%;text-align : center;overflow:hidden;"><script src="Dv_News.asp?GetName=def_flapic"></script></div>. L0 a. s2 P# H' I6 p( ?# Y 2.后台增加首页flash图片调用 / y/ ?0 j* L% a调用标识名称:def_flapic ; F, s+ p3 f' ?$ j& g2 ^3 f- p: s调用说明:首页FLASH图片 & T) H- ^/ _ h 调用类型:展区调用 4 h' Q+ G1 n2 U5 v( L2 ?0 R l0 N 数据更新间隔:300 秒 (这里可以按你的需要设小些)' x# N9 E( W4 E8 g' F( r6 ?/ W 时间显示格式:YYYY-M-D $ `. `" d% D( P调用设置: 显示记录数:6 每行显示个数:1 标题长度:10 $ O/ D$ k" K; P8 q3 g 调用的版面:精美贴图 (选择你要调用的版面)7 b% R& W. ]. | 版面限制设置:只调用该版面 % _0 f: g! u, s5 K- z版面的限制:显示特殊版面数据 6 i1 G/ x H$ r; [$ M9 L% q' R( W" Q调用文件类型 :图片集 7 C8 t' S8 u, ~ 显示排序: 默认 ( c. J Q$ j' r$ j5 X7 I. S$ F7 e }4 V% _' _2 v6 i 以上可以按自己要求设置:% a: U+ b. n! E! v 以下为关键部分,如果看不懂,请不要随意更改!9 G- D+ P' @5 w) t' [% G 模板_开始标记部分(其中的数字自己试着调整)) g& W; P- U1 Q/ W8 S <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=''; * P# a' ]4 L9 u( W ^3 { 模板_主体循环标记部分(其中地址换成你的地址)( Z6 J; W U/ u& d% F! O( Q4 h pics+='{$TrueFilename}|'; 1 Y9 }2 B# I0 i P( t2 ylinks+='http://ctpt.com.cn/bbs/dispbbs.asp?boardid={$Boardid}%26id={$RootID}%26replyID={$ReplyID}|';0 w, [# o) K: ^8 M, y1 Q# c texts+='{$Readme}|'; : Z$ d& N; s, e; F4 x3 j: b 8 M1 H- M+ f8 U 模板_结束标记部分' q+ k0 r2 | k% y- `9 R( ]& C 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 +'">');, w. H* [ P5 N& T' x. V document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="fla/focus.swf"> <param name="quality" value="high"><param name="bgcolor" value="#CCCCCC">');8 }* \: k9 N6 k8 @7 t7 L# B document.write('<param name="menu" value="false"><param name=wmode value="opaque">');1 e! F! V9 B4 H$ t2 \5 g8 N document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">');/ n# v0 s% Q+ w1 \) R, j 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>'); : }8 J; ~! w4 @$ P) }+ R! O/ S# _ * T9 ~3 u U1 y5 `# ~1 w: k4 _//-->+ {( w7 Q5 o9 y: a </script> - T/ Q ~9 V4 F, _3.调用文件修改6 A0 o" Y8 B% b& @ 打开论坛根目录下的DV_NEWS.ASP- l1 I8 e1 L: P: a! T& h+ ? 找到 8 \% i0 |6 M$ j$ A2 k0 g0 Q Skin_Main = Replace(Skin_Main,"{$Boardid}",SQL(2,i)) * @4 t7 w, u* M o% F Skin_Main = Replace(Skin_Main,"{$UserName}",SQL(3,i)) 0 l% g, f) d) B$ x8 \- Z后面插入9 F9 e, }! {2 n6 ~" I' Q! B Topic=replace(Topic,"'","‘") ; x3 G$ U7 ]6 @0 R& W; a+ Q6 [8 q Topic=replace(Topic,"""","“") 6 M9 K! B' h0 g3 Y( m找到& V: @& K, S2 H Filename = SQL(4,i)1 I6 l3 N- S: q# L If InStr(Filename,":") = 0 Or InStr(Filename,"//") = 0 Then3 o5 {0 Z! g# F" Q# b Filename = Bbsurl & Dvbbs.Forum_Setting(76) & Filename ; w X1 l5 C! i5 L; b End If/ Y7 o% C$ n1 M% P' } End If 4 ?9 M) J: J2 c1 I( _后面插入$ J( C4 [1 q6 c1 ~ Skin_Main = Replace(Skin_Main,"{$TrueFilename}",Filename) / [# U1 h" b0 y$ @4 j) F修改完成! 4 v" D6 G' j, ~, Z5 D红色部分的标记是我自己加的,要与调用文件修改中的最后一步相对应!
遨海湾-心灵的港湾 www.aosea.com
您需要登录后才可以回帖 登录 | 入住遨海湾

本版积分规则

网站解决方案专享优惠-3折上云

手机版|小黑屋|遨海湾超级社区

GMT+8, 2026-7-8 08:42

Powered by Discuz! X5.0

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表