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

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

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

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

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

×
1.到论坛后台,风格界面模板总管理,改分页面模板(page_index) ,界面风格,template.html(0)* L- @( e, z, A2 U( G5 ^& m 找到 . z8 F; M, V3 }8 R# y9 D: ~% j% \<div id="tdleft" style="height:120px; ">- N$ l8 ]* l% h& B# i3 N) f 改成 6 `$ T( R( C/ ^0 [. @<div id="tdleft" style="height:120px;width:40%; "> - e* \/ h( k( C* @/ I; R再找到* _7 M4 ^- J" F$ n <div style="height:120px;float:left;width:320px;" > + e8 m7 {, x8 C! e5 U- N' r# ~改成$ e' W* r3 Y2 R <div style="height:120px;float:left;width:40%;" id="tdleft">3 L# c6 n$ f; [+ h3 n7 K! g 注意:如果你已装了时钟等插件,做过了以上修改,就跳过从以下开始安装 + X) s. B( D9 F# K$ q然后找到 \. @3 x2 L8 m/ v1 F8 s( d<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]> # H7 t2 k% e2 l' H</div> ( \9 R! l ~" I</div> / R P8 M7 h2 ]% |; h3 b下面插入 . F* I, o) G! R& p. y& R<div style="width:100%;text-align : center;overflow:hidden;"><script src="Dv_News.asp?GetName=def_flapic"></script></div> 1 @$ p" e- Q- ?5 |: r5 B2.后台增加首页flash图片调用. h& g* ?* y" ~$ a* |$ c! {8 P 调用标识名称:def_flapic n: i7 _: Q5 X; J4 A调用说明:首页FLASH图片 , K5 Q0 |) _4 N1 @ 调用类型:展区调用 w5 i: h6 c$ I. _( @ 数据更新间隔:300 秒 (这里可以按你的需要设小些) # [6 I$ b: s) f0 |5 T. R时间显示格式:YYYY-M-D : ?* X& z; i' ~2 F) b, K# C 调用设置: 显示记录数:6 每行显示个数:1 标题长度:10 - h9 S# A( H; Z, f' P/ e 调用的版面:精美贴图 (选择你要调用的版面) - A7 i! k- H8 |) a, U9 i版面限制设置:只调用该版面' B. @5 N* ~. h. \) X0 m, l 版面的限制:显示特殊版面数据 ) t# n/ ~" _3 _调用文件类型 :图片集 / v3 q0 e% [; H! z- y' y- K% p显示排序: 默认 ' I- x( s4 G/ e- ? 1 `* @; y( B! G9 \6 D% I 以上可以按自己要求设置:- K$ }, V. p" g" X 以下为关键部分,如果看不懂,请不要随意更改! * d( ~2 H$ d$ f. a$ K! o模板_开始标记部分(其中的数字自己试着调整)1 O7 J( J) l$ c" v <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=''; 3 d8 J1 L, X7 R4 _& g/ s& m# P 模板_主体循环标记部分(其中地址换成你的地址) 7 X: I- o+ ?: k! D2 x; _pics+='{$TrueFilename}|';4 l+ I$ C% q0 O! n/ R links+='http://ctpt.com.cn/bbs/dispbbs.asp?boardid={$Boardid}%26id={$RootID}%26replyID={$ReplyID}|';3 D& |6 W' C8 u texts+='{$Readme}|'; y# |9 F: T; C3 z/ j5 w7 J% \, r + }3 E/ r* a% E" }4 R& M$ ~模板_结束标记部分 1 z" V ]: x2 L# f' X) q& l4 |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 +'">'); : X2 V) ^) D* _- m/ P4 Idocument.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="fla/focus.swf"> <param name="quality" value="high"><param name="bgcolor" value="#CCCCCC">'); 7 I# g# E4 T1 k2 W9 adocument.write('<param name="menu" value="false"><param name=wmode value="opaque">');1 b4 ~, n& H8 ~2 \2 r6 q. u3 w( ~ document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">'); & ~; \! u' C4 o! d0 A* Rdocument.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>'); - n( S+ v" A+ t, [2 D 2 Y# Q- J$ y9 \& X% W3 E: o//--> / f- S( K7 X/ z5 v3 j </script> * f, _$ E6 c: V1 h: n# O7 a1 l3.调用文件修改 $ d1 n, B" h3 |3 t打开论坛根目录下的DV_NEWS.ASP " n0 [; l* e+ X6 w找到4 n% p4 y- V1 B6 J) Y# ^2 W7 [ Skin_Main = Replace(Skin_Main,"{$Boardid}",SQL(2,i)) 0 u! p9 T0 ^7 b Skin_Main = Replace(Skin_Main,"{$UserName}",SQL(3,i)) . a+ Y8 f& p$ g. R后面插入 & ? U8 d. r" m. P8 x Topic=replace(Topic,"'","‘") 5 L! i( y/ Q- E* c: W% i Topic=replace(Topic,"""","“") % p+ p( R. q; J' w* R4 Z9 A( W找到 - q2 h+ w0 T! `% \) G2 ]) ? Filename = SQL(4,i)' m+ U4 a$ |8 L& n If InStr(Filename,":") = 0 Or InStr(Filename,"//") = 0 Then. o& ]8 V# l# ]# O" t Filename = Bbsurl & Dvbbs.Forum_Setting(76) & Filename: _9 }; a, R8 l5 r5 v% f0 z End If3 I( R, u w* a" L5 ^ End If( q0 R0 a( P& k) k 后面插入/ T/ u: @1 ~7 ? Skin_Main = Replace(Skin_Main,"{$TrueFilename}",Filename)6 L/ S4 d! R( w. Z: r. C, ? 修改完成! - f! h Z8 `1 X [3 K红色部分的标记是我自己加的,要与调用文件修改中的最后一步相对应!
遨海湾-心灵的港湾 www.aosea.com
您需要登录后才可以回帖 登录 | 入住遨海湾

本版积分规则

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

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

GMT+8, 2024-11-24 18:43

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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