效果预览

<script type="text/javascript">   
var xmlData = "<?xml version='1.0' encoding='gb2312'?>"   
xmlDataxmlData = xmlData + "<root>"   
{dede:arclist row='5' att='3' type='image.' infolen='66' titlelen='36'}   
xmlDataxmlData = xmlData + "<photo pUrl='[field:litpic/]' gUrl='[field:arcurl/]' 
  fName='[field:title function='ClearHtml(@me)'/]' sName='[field:info/]' />";   
{/dede:arclist}   
xmlDataxmlData = xmlData + "</root>";   
var InternetExplorer = navigator.appName.indexOf("Microsoft") != -1;   
function myFlash_DoFSCommand(command, args){   
var myFlshObj = InternetExplorer ? myFlash : document.myFlash;   
if(myFlshObj){   
myFlshObj.SetVariable("xmlString", xmlData);   
}   
}   
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 myFlash_FSCommand(ByVal command, ByVal args)\n');   
document.write(' call myFlash_DoFSCommand(command, args)\n');   
document.write('end sub\n');   
document.write('</script\> \n');   
}   
</script>   
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase=
"[url]http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5[/url],0,0,0" 
id="myFlash" height="235" width="500">   
<param name="movie" value="/templets/images/play.swf">   
<param name="quality" value="high">   
<param name="wmode" value="opaque">   
<embed wmode="transparent" src="/templets/images/play.swf" quality="high" name="myFlash" 
     swliveconnect="true" type="application/x-shockwave-flash" 
     pluginspage="[url]http://www.macromedia.com/go/getflashplayer"[/url] height="235" width="500">   
</object>   

附件下载：

play.rar

备份下载地址： https://bbs.dedecms8.com/thread-100-1-1.html