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

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

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

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

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

×
1.到论坛后台,风格界面模板总管理,改分页面模板(page_index) ,界面风格,template.html(0) ! T# S; j+ o* x( }7 Z找到 ! k. t: M; E' G* }! R K# C5 u0 Y1 Q* ~<div id="tdleft" style="height:120px; "> - i5 b+ f) ^& ^! ]$ i$ n- Q9 q0 ]改成 0 \7 ^& a. e- l# T1 ]; v<div id="tdleft" style="height:120px;width:40%; ">8 b' d+ C% q4 N9 c3 b 再找到0 O6 q Q& Y2 ^9 J <div style="height:120px;float:left;width:320px;" > 2 L" X$ ]5 S, v: l改成 d$ G* [6 p. Y R$ x <div style="height:120px;float:left;width:40%;" id="tdleft"> ! p5 l# q6 c6 ~# G+ c4 j: f* b注意:如果你已装了时钟等插件,做过了以上修改,就跳过从以下开始安装5 J! D5 X# |; u! f/ O g) n 然后找到- e- f% y5 _4 D: ^! m. X2 v. |/ r& L <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]>% l! y. Q C1 _ e </div> k$ M% k7 Y, { </div> & r! B& Z' @6 _5 c5 I; O5 n下面插入5 i+ b) F) S/ q1 D0 K. V$ W <div style="width:100%;text-align : center;overflow:hidden;"><script src="Dv_News.asp?GetName=def_flapic"></script></div> + K% F" R) y m% b2.后台增加首页flash图片调用* ]: D6 m* m% E" c 调用标识名称:def_flapic 3 S: N3 p9 [. h" w- L) S调用说明:首页FLASH图片 9 r q& f9 v) u 调用类型:展区调用 ' u E# @$ P# H/ E8 K2 M* p& G0 ]! m 数据更新间隔:300 秒 (这里可以按你的需要设小些)# ~/ v: \$ I: l% d/ o9 r/ a( ^. F/ D 时间显示格式:YYYY-M-D / y' N+ V- E' ]0 D) g, ^调用设置: 显示记录数:6 每行显示个数:1 标题长度:10 : k9 V' u- d3 @+ Q$ j 调用的版面:精美贴图 (选择你要调用的版面) 9 d5 H5 R7 d8 [% M- k版面限制设置:只调用该版面 6 U4 n1 i2 e; }* n版面的限制:显示特殊版面数据 ! J3 o4 { x7 N: X) E调用文件类型 :图片集 ! C1 P" Y4 P U; v5 g) Y显示排序: 默认 8 ? c' T: c- }; W 1 F/ [$ d2 l2 G' Q4 T以上可以按自己要求设置: ) |" }% D' }" E& |7 S; {/ V以下为关键部分,如果看不懂,请不要随意更改! * l9 P4 A: p" D: d9 z, e, v3 p模板_开始标记部分(其中的数字自己试着调整) $ g8 w; W+ |; s! _9 R' y: \4 W<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=''; 8 x5 a/ {+ I+ H0 l# E/ N; h 模板_主体循环标记部分(其中地址换成你的地址) # `8 c! _3 b) [& Z& ^7 Apics+='{$TrueFilename}|';9 @( L2 y4 J( s- z$ ]% v links+='http://ctpt.com.cn/bbs/dispbbs.asp?boardid={$Boardid}%26id={$RootID}%26replyID={$ReplyID}|';4 V$ q9 R. m: i' o" i( T6 P& X! y texts+='{$Readme}|'; 1 C7 n$ @9 {/ ? 3 J) _* g1 C/ V4 m 模板_结束标记部分# l. V$ ?9 D- O+ S& b4 k 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 +'">');8 a1 A, a0 d. S6 E3 j document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="fla/focus.swf"> <param name="quality" value="high"><param name="bgcolor" value="#CCCCCC">'); & X* s0 W8 Y& u4 a* _0 rdocument.write('<param name="menu" value="false"><param name=wmode value="opaque">'); 6 a& u3 J) d, ^document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">'); ' S' E5 n) h- a u+ v4 j" S% U$ 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>'); 5 Q/ |6 ?1 u- N/ \- F: k" U. L; N. V% b2 ~( j% k8 J# E //--> ; s2 P X3 ?5 P5 N( i# T </script> . Y! m# ^& P. S7 J( V3.调用文件修改8 S T% r* B3 T" G/ g5 H 打开论坛根目录下的DV_NEWS.ASP4 P7 C8 \, C! Z8 Y' N* g 找到' F, c' s9 V' O- }2 ]3 `, @3 t Skin_Main = Replace(Skin_Main,"{$Boardid}",SQL(2,i))$ w: M2 T0 H8 X. X3 x4 t) Y Skin_Main = Replace(Skin_Main,"{$UserName}",SQL(3,i)) 7 A; q$ j# t0 h2 G* q后面插入 ' a+ J; ?7 i7 p- r D7 K8 x Topic=replace(Topic,"'","‘") 2 h% u/ k, C9 E6 w8 T* ^- T Topic=replace(Topic,"""","“") : @- Z, X4 {+ G, Y找到 5 S1 w+ B0 g+ V g3 [; D Filename = SQL(4,i); M# j _! D" k2 d \ If InStr(Filename,":") = 0 Or InStr(Filename,"//") = 0 Then* y8 J ^; P' e2 w' h Filename = Bbsurl & Dvbbs.Forum_Setting(76) & Filename Z5 g% C! U+ }) ?7 t; {2 F End If & U% T7 o9 Z7 V9 m/ [# [8 T }# a End If 5 g w7 f( v/ \7 n$ F- Z后面插入 0 W9 l+ X7 D2 T4 N Skin_Main = Replace(Skin_Main,"{$TrueFilename}",Filename) * Q6 n6 t% R9 n/ J' Y' i修改完成!" S, G+ A, R. q# F% I$ @ 红色部分的标记是我自己加的,要与调用文件修改中的最后一步相对应!
遨海湾-心灵的港湾 www.aosea.com
您需要登录后才可以回帖 登录 | 入住遨海湾

本版积分规则

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

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

GMT+8, 2025-1-19 03:04

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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