通过阿江ASP探针得知FLASH 截图组件 Ironsoft.FlashCapture,又通过GOOGLE找到组件官方网站。然后下载了组件,根据手册说明写了个代码测试了一下。
组件官方说明:“国内首创的Flash组件,可以对FLASH的指定帧进行抓图,是制作Flash欣赏网站的不可缺少的助手”
相关链接:Flash抓图组件FlashCapture评测
示例代码如下(将代码存为.asp或去掉<%和%>存为.vbs文件进行调试):
<% dim FlashCapture Set FlashCapture = CreateObject("IronSoft.FlashCapture") FlashCapture.FileName = "C:\flash\51windows.swf" '指定flash文件路径 TotalFrame = FlashCapture.TotalFrame '获取flash总帧数 Width = FlashCapture.Width '获取抓到的图片的宽度 Height = FlashCapture.Height '获取抓到的图片的高度 FlashCapture.CaptureFrame = 20 '指定抓图的帧 FlashCapture.SaveasJpg "C:\flash\51windows.jpg",95 '保存图片 '生成所有帧的图片,很占CPU 'for i = 1 to TotalFrame ' FlashCapture.CaptureFrame = i ' FlashCapture.SaveasJpg "C:\flash\51windows("& i &").jpg",90 'next Set FlashCapture = Nothing %>