此例子调用的最新4个图片,不能限制只调用幻灯片,请宝宝,K文来解决:
1.先看效果:
http://www.v366.net/v/0701/0822521564766746.shtml2.创建文章的样式(flashtest)如下:
aPic[aPic.length] = "{KY_TitleImgPath}";
aLink[aLink.length] = "{KY_InfoUrl}";
aTitle[aTitle.length] = "{KY_Title#len(30)}";
aText[aText.length] = "{KY_Content#len(80)}";
3.创建标签(猫扑flash):
点文章模型->引用内容样式里选择你刚才保存的样式名字->文章数目改成"4"->系统属性将"图片"选上,我不明白为什么系统属性没有幻灯的选项,这样的话就所有最新图片都会显示了!->保存此标签
4.在模板的适当位置插入如下代码:
<!--代码开始--><table width=100% border=0 cellspacing=0 cellpadding=0><tr><td valign=top ><script>
var aPic = new Array();
var aLink = new Array();
var aTitle = new Array();
var aText = new Array();
{Ky_猫扑flash}
var picStr = "",linkStr="",textStrArrStr="",i;
for(i=0;i<aPic.length;i++)
{
if(picStr=="")
{
picStr = aPic[i];
linkStr = aLink[i];
textStrArrStr = "<div style=\"margin-top:10px;\" align=\"center\"><a href=\""+aLink[i]+"\" target=\"_blank\" class=\"news_hd\">"+aTitle[i]+"</a></div><div class=\"flashlr\" style=\"padding:2px;\">"+aText[i]+"……[<a href=\""+aLink[i]+"\" target=\"_blank\" class=\"news_hd_qw\">全文</a>]</div>";
}
else
{
picStr = picStr+"|"+aPic[i];
linkStr = linkStr+"|"+aLink[i];
textStrArrStr = textStrArrStr+"|<div style=\"margin-top:10px\" align=\"center\" ><a href=\""+aLink[i]+"\" target=\"_blank\" class=\"news_hd\">"+aTitle[i]+"</a></div><div class=\"flashlr\" style=\"padding:2px;\"> "+aText[i]+"……[<a href=\""+aLink[i]+"\" target=\"_blank\" class=\"news_hd_qw\">全文</a>]</div>";
}
}
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=\"296\" height=\"235\" id=\"focus1\" name=\"focus1\">");
document.write("<param name=\"allowScriptAccess\" value=\"sameDomain\">");
document.write("<param name=\"movie\" value=\"/focus.swf\">");
document.write("<param name=\"quality\" value=\"high\">");
document.write("<param name=\"bgcolor\" value=\"white\">");
document.write("<param name=\"menu\" value=\"false\">");
document.write("<PARAM NAME=\"SCALE\" VALUE=\"exactfit\">");
document.write("<param name=\"wmode\" value=\"opaque\">");
document.write("<param name=\"FlashVars\" value=\"picStr="+picStr+"&"+"linkStr="+linkStr+"\">");
document.write("<embed id=\"focus2\" name=\"focus2\" src=\"/focus.swf\" SCALE=\"exactfit\" wmode=\"opaque\" flashvars=\"picStr="+picStr+"&"+"linkStr="+linkStr+"\" menu=\"false\" bgcolor=\"white\" quality=\"high\" width=280 height=190 allowScriptAccess=\"sameDomain\" type=\"application/x-shockwave-flash\" pluginspage=\"http://www.macromedia.com/go/getflashplayer\" />");
document.write("</object>");
document.write("<div id=\"focusTextArea\"></div>");
var textStrArr=textStrArrStr.split("|");
function setFoucsText(id){
document.getElementById("focusTextArea").innerHTML = textStrArr[id];
}
setFoucsText(0);
var isInternetExplorer = navigator.appName.indexOf("Microsoft") != -1;
function focus1_DoFSCommand(command, args) {
if(command == "setFoucsText"){
setFoucsText(args);
}
}
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
document.write('<script language="VBScript">\n');
document.write('On Error Resume Next\n');
document.write('Sub focus1_FSCommand(ByVal command, ByVal args)\n');
document.write('Call focus1_DoFSCommand(command, args)\n');
document.write('End Sub\n');
document.write('</script\>\n');
}
</script><!-代码结束-->
5.将focus.swf文件放到根目录下面去,自己去效果页那儿去下载吧(论坛不允许上传SWF文件),然后再刷新内容页!搞定!,呵呵

附件:
您所在的用户组无法下载或查看附件************************************以下内容,需回复方可浏览