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

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

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

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

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

×
1.到论坛后台,风格界面模板总管理,改分页面模板(page_index) ,界面风格,template.html(0)/ S. ^ d( i" Y7 n3 q 找到 " m' q/ I$ Z+ o3 A4 M) y0 R5 v! \<div id="tdleft" style="height:120px; "> 9 | L9 b0 G' a改成 ! X3 x& `5 Z J+ |* r<div id="tdleft" style="height:120px;width:40%; "> 7 g6 ?+ \4 S1 r* ^9 C/ c8 X再找到 4 l! a# @, X |* U- g1 }7 O<div style="height:120px;float:left;width:320px;" > 8 q; ]/ e7 R" C: x+ T1 }改成2 Q. C4 @0 C* B0 c, _2 I <div style="height:120px;float:left;width:40%;" id="tdleft">) y) Y6 X- `5 K 注意:如果你已装了时钟等插件,做过了以上修改,就跳过从以下开始安装 : J4 T6 o; \2 q8 N# K ]然后找到" g/ h% R: r9 R5 [ <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]>1 p) o. l8 S5 c8 z _- V </div> 8 _6 D& S$ I( c) e* J/ G2 I/ u. i: A- h</div> & ^* e: @. U2 j# J9 H% o! |下面插入% R1 a+ h' b! J% t- u+ A% g <div style="width:100%;text-align : center;overflow:hidden;"><script src="Dv_News.asp?GetName=def_flapic"></script></div> 3 b$ e1 `/ |3 O2.后台增加首页flash图片调用4 s2 i' v1 S+ p) f* L9 f 调用标识名称:def_flapic 0 m Y) Y: F2 M* v c 调用说明:首页FLASH图片 . q! t6 j/ }6 N0 P5 ]; g调用类型:展区调用 + G/ ~' ~$ r' A5 W' e6 u 数据更新间隔:300 秒 (这里可以按你的需要设小些) % {0 O3 U6 a" J5 M时间显示格式:YYYY-M-D 4 {1 A6 ?+ s' w* I调用设置: 显示记录数:6 每行显示个数:1 标题长度:10 * F4 n$ e, |( W( U) J 调用的版面:精美贴图 (选择你要调用的版面) z+ `. c% K3 H X 版面限制设置:只调用该版面8 k: v. O' ^( f 版面的限制:显示特殊版面数据 8 |+ _/ q0 K c$ Z" O 调用文件类型 :图片集 + E# c0 i& W$ u 显示排序: 默认 6 f5 i# Q% D2 r1 l8 i 6 i F) _2 N5 ? G) e以上可以按自己要求设置:/ @ U& d& I, ]5 |* C1 \ 以下为关键部分,如果看不懂,请不要随意更改! 7 ^6 E4 v o) X: c1 e- N/ N模板_开始标记部分(其中的数字自己试着调整) N- J* Y) A/ O5 `# M7 G<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=''; ) V. G" M4 t& K模板_主体循环标记部分(其中地址换成你的地址) & o O5 x% L/ i; c h! qpics+='{$TrueFilename}|'; 2 }3 q' S3 Y: L1 o' |links+='http://ctpt.com.cn/bbs/dispbbs.asp?boardid={$Boardid}%26id={$RootID}%26replyID={$ReplyID}|'; / H2 ~+ M6 Q! u- n9 `8 Ktexts+='{$Readme}|'; * L" r/ o+ I( p+ {3 U# F# | `+ @3 N5 e! A. r7 j- H5 b 模板_结束标记部分 1 n( K7 x7 N" R0 epics=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 +'">'); ' n4 O- M7 C- _* ]7 M2 W/ }- \document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="fla/focus.swf"> <param name="quality" value="high"><param name="bgcolor" value="#CCCCCC">');$ I: ]$ A1 P! b7 q' B4 L document.write('<param name="menu" value="false"><param name=wmode value="opaque">'); - |; L0 u, ^5 t* {document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">'); ) g Y& P& o, b2 B/ y+ K3 sdocument.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>'); 2 G9 s6 Q" b+ {; R4 e, d, r: K 1 W i9 K+ ?7 b) Q' H//--> ' f; ~. ~+ E, z+ D& [ </script> 4 s9 l* {6 i0 U$ F' N6 _9 s" S 3.调用文件修改, C* O B6 C8 C* i2 X0 } 打开论坛根目录下的DV_NEWS.ASP# d' u# B- a3 X# o* j 找到 ; ~; z& a( Q4 _ |* V+ Z4 i$ Z& n Skin_Main = Replace(Skin_Main,"{$Boardid}",SQL(2,i))9 A) p6 W; X; M+ j A4 D# S g Skin_Main = Replace(Skin_Main,"{$UserName}",SQL(3,i)) ; e3 |- t* ~' B) F后面插入1 o3 i1 T1 P4 y, X& ?( F Topic=replace(Topic,"'","‘") 6 G4 g) L' h- q, ]( D4 { Topic=replace(Topic,"""","“") 8 E- k1 {# i9 k- D' S找到 ) I, q8 X5 J# I+ C7 w q+ W! S Filename = SQL(4,i) H" r0 _# E4 J# \: t; w; D If InStr(Filename,":") = 0 Or InStr(Filename,"//") = 0 Then; y$ n5 O+ w: b6 I9 I5 B Filename = Bbsurl & Dvbbs.Forum_Setting(76) & Filename 8 {/ b4 s/ k" A6 | End If 7 D6 G! U2 f8 ] End If 4 F+ J3 S1 e! p" r+ q. A后面插入 # V3 [& u2 ^6 V7 e$ E Skin_Main = Replace(Skin_Main,"{$TrueFilename}",Filename)/ ^- N( W9 g. j! e# v+ C 修改完成! ' t, c/ X# G m: `# k, a红色部分的标记是我自己加的,要与调用文件修改中的最后一步相对应!
遨海湾-心灵的港湾 www.aosea.com
您需要登录后才可以回帖 登录 | 入住遨海湾

本版积分规则

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

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

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

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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