教你首页FLASH调用的技巧昨天李长生版主给发来的一个效果，我将这个改为论坛首页的调用，其实就是一个FLASH图片调用，大家可以套用到现在的三格或者四格调用中，最终效果图(要正常显示，必须保证展区图片集中有五个图片)：
[img]http://bbs.dvbbs.net/skins/default/filetype/gif.gif[/img]此主题相关图片如下：未命名.gif
[url=http://bbs.dvbbs.net/Dv_UPLOADFILE/2007-9/20079129303258070.gif][img]http://bbs.dvbbs.net/Dv_UPLOADFILE/2007-9/20079129303258070.gif[/img][/url]
具体调用设置如下：
1、FLASH调用当然需要一个FLASH文件了，先将压缩包中的[url=http://www.toumingflash.com.cn/]透明flash[/url].swf文件传到论坛的images目录(如果更改文件名或者路径的话，请与首页调用代码中保持一致)：
[table=550][tr][td=2,1][b]下载信息[/b] [文件大小：[url=][color=#000000]1.8 KB[/color][/url] 下载次数：[url=][color=#000000]1382[/color][/url]][/td][/tr][tr][td=2,1][img]http://bbs.dvbbs.net/skins/default/filetype/rar.gif[/img][url=http://bbs.dvbbs.net/viewFile.asp?BoardID=102&ID=183331][color=#0000ff]点击浏览该文件:flash.rar[/color][/url][/td][/tr][/table]
2、因为图片调用的大小不一会影响FLASH播放器的效果，这里必须统一图片大小，我们使用AspJpeg组件的缩位图功能，缩位图大小为306*200，选等比例缩放，到后台进行上传设置(如图)：
[img]http://bbs.dvbbs.net/skins/default/filetype/gif.gif[/img]此主题相关图片如下：上传设置.gif
[url=http://bbs.dvbbs.net/Dv_UPLOADFILE/2007-9/20079129312832790.gif][img]http://bbs.dvbbs.net/Dv_UPLOADFILE/2007-9/20079129312832790.gif[/img][/url]
3、开始设置后台的首页调用，新建一个调用，调用标识名称为flashpic，具体设置如下图：
[img]http://bbs.dvbbs.net/skins/default/filetype/gif.gif[/img]此主题相关图片如下：首页调用管理.gif
[url=http://bbs.dvbbs.net/Dv_UPLOADFILE/2007-9/20079129335531501.gif][img]http://bbs.dvbbs.net/Dv_UPLOADFILE/2007-9/20079129335531501.gif[/img][/url]
模板_开始标记部分：
[color=#ff0000][color=#ff0000]<script type="text/javascript">
var varText = "";
function addInfo(title,photourl,link){
if(varText!=""){
varText+="|||";
}
varText+=title+"|_|"+photourl+"|_|"+link;
}
linkarr = new Array();
picarr = new Array();
textarr = new Array();[/color]
[/color]展区特殊设置这里留空，如图所示：
[img]http://bbs.dvbbs.net/skins/default/filetype/gif.gif[/img]此主题相关图片如下：展区特殊设置.gif
[url=http://bbs.dvbbs.net/Dv_UPLOADFILE/2007-9/20079129343652325.gif][img]http://bbs.dvbbs.net/Dv_UPLOADFILE/2007-9/20079129343652325.gif[/img][/url]
模板_主体循环标记部分：
[color=#ff0000][color=#ff0000]linkarr = "dispbbs.asp?boardid={$Boardid}%26id={$RootID}%26replyID={$ReplyID}";
picarr = "{$TrueFilename}";
textarr = "{$Readme}";
addInfo(textarr,picarr,linkarr);[/color]
[/color]模板_结束标记部分：
[color=#ff0000][color=#ff0000]document.write('<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="[/color][url=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0][color=#ff0000]http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0[/color][/url][color=#ff0000]" width="410" height="200" id="01" align="middle">');
document.write('<param name="allowScriptAccess" value="sameDomain" />');
document.write('<param name="movie" value="[color=#0000ff]images/flash.swf[/color]?info='+varText+'" />');
document.write('<param name="quality" value="high" />');
document.write('<param name="bgcolor" value="#ffffff" /><param name="wmode" value="transparent" />');
document.write('<embed src="[color=#0000ff]images/flash.swf[/color]" quality="high" bgcolor="#ffffff" width="410" height="200" name="01" align="middle" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="[/color][url=http://www.macromedia.com/go/getflashplayer][color=#ff0000]http://www.macromedia.com/go/getflashplayer[/color][/url][color=#ff0000]" />');
document.write('</object>');
</script>[/color]
[/color]4、dv_news.asp文件做如下修改：
If SQL(9,i)<>"" Then
Filename = Bbsurl & SQL(9,i)
Else
Filename = SQL(4,i)
If InStr(Filename,":") = 0 Or InStr(Filename,"//") = 0 Then
Filename = Bbsurl & Dvbbs.Forum_Setting(76) & Filename
End If
End If
下面添加一行代码：
[color=#ff0000]Skin_Main = Replace(Skin_Main,"{$TrueFilename}",Filename)[/color]