《2022年FlashGet实现右键下载Flash动画上传下载教程.docx》由会员分享,可在线阅读,更多相关《2022年FlashGet实现右键下载Flash动画上传下载教程.docx(3页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、2022年FlashGet实现右键下载Flash动画上传下载教程通常我们在网上阅读Flash动画的时候,想下载下来并不是那么简单,因为一般的下载工具不能很好的解析出网页中的动画文件地址。总结以下大家普遍采纳的主要有两种方法:(1)干脆打开HTML源文件自己找出这个*.swf文件,然后干脆通过其他下载工具下载。此方法虽然可行,但是比较烦琐。(2)通过网上找一些别人写的特地下载Flash动画的小程序。这种方法比较便利,但是一般没有断点续传功能,对于一些较大的文件来说不是很合适。通过我的实际应用发觉了一种更为简洁易用的方法,现在介绍给大家,希望能够对大家有用。这种方法主要是通过扩展FlashGet来
2、实现的,一个更大的优点是可以很好地利用FlashGet的断点续传功能。运用起来跟平常下载其他格式文件一样,简洁便利。下面具体介绍以下详细实现方法:(1)编写接口文件首先确认你已经安装了FlashGet软件,找到详细的安装书目(默认路径为C:Program FilesFlashGet),在书目下发觉有两个html文件。jc_all.htm 是运用网际快车下载全部链接的接口jc_link.htm是运用网际快车下载一个链接的接口我们在此书目下扩展一个jc_flash.htm 作为我们是运用网际快车下载Flash的接口详细内容如下:<script language=VBScript> De
3、signed by Happywinds. in 2022.06.08 Thanks for use. Email: happywinds On Error Resume Next set JetCarCatch=CreateObject(JetCar.Netscape) if err<>0 then MsgBox(FlashGet not properly installed!+ vbCrLf+Please Install FlashGet again) else set links = external.menuArguments.document.getElementsByT
4、agName(OBJECT) ReDim params(links.length*2) params(0) = external.menuArguments.document.Url for i = 0 to links.length - 1 set e = external.menuArguments.document.createElement(<A HREF=+links(i).Movie+></A>) params(i*2 + 1) = e.href params(i*2 + 2) = FlashMovie (i+1) e = null next JetCarCatch.AddUrlList params end if </script>