方法网页flash动画的保存程序源代码(Webpage flash animation preservation program source code)

网页源代码  时间:2021-03-05  阅读:()

网页flash动画的保存程序源代码Webpage flash animationpreservation program source code

"Flash animation preservation program source code.Txt withouta line you see me online, hurry to stealth, rest assured. I'mnot going to pester you. Keep good now but never abandon theydo. - Web programming Flash animation

-- -- -- -- -- -- the following is the code of the procedure-- -- -- ---

-- -- -- -- -- -- S ave SWF.html -- -- -- --

<html>

<head>

<title> page Flash animation save program </title>

</head>

<body>

<script language= "JavaScript" >

//function is used to achieve the Flash file information intothe array

Function writearray (FILESRC, f ilewidth, f ileheight) {Swff ileurl.push (FILESRC) ;

Swffilew.push (f ilewidth) ;

Swff ileh.push (f ileheight) ;

Return;

}

URL treatment has been used for information / function Flashfile

Function processurl (myurl) {

Var endurl ;

If (myurl. indexOf ("http://") ! =-1) endurl=myurl ;

{else

Var pageurl;

Hostname=external.menuArguments. location.hostname;

Pathname=external.menuArguments. location.pathname;

Pageurl= "http://" +hostname+pathname;

Pagepath=pageurl. substring (0, pageurl. lastIndexOf ("/") +1) ;I f (myurl. charAt (0) =! ". " && myur l.charAt (0) ! = "/

endurl=pagepath+myurl") ;

Else if (myurl.charAt (0) = = "/" endurl= "http://"+hos tname+myurl) ;

{else

I f (myurl. charAt (0) = = "{. ")

Endurl=pagepath;

Whi l e (myurl. charAt (0) = = "{. ")

Myurl=myurl. substr (3) ;

Endurl=endurl. substring (0, endurl. length-1) ;

Endurl=endurl. substring (0, endurl. lastIndexOf ("/") +1) ;}

Endurl=endurl+myurl ;

}

}

}

Return (endurl) ;

}

/ / function is used to get all the Flash file informationFunction getinfo () {

For (i=0; i<srcDocument.applets. length; i++) for all pageswithin the cycle / Flash file

{tObject=srcDocument.applets[i] ; //Object reference page setT=tObject. codeBase; / / get the current Object object types(developers)

Ss=t.toLowerCase () ;

If (ss. indexOf (macromedia.com) >0) / / judge the plug-in isnot Macromedia Flash plug-in development

{tt=tObject.getAttribute ("Movie") ; / / <param name=movie. . .The value of > URL of SWF

W=tObject.width; / / Flash width value

H=tObject.height; / / Flash height

Tt=processurl (TT) ;

Writearray (TT, W, H) ;

}

}

Return;

}

// function is used to create user window for preview and saveFunction MainWindow () {

Var outstr="";

Var openwin=window.open (", ", "flashbrowser", "height=400,width=625, toolbar=no, location=no, scrollbars=yes, status=no,menubar=no, top=100, left=100") ;

With (openwin.document) {

Open () ;

Writ eln ("<HTML>") ;

Wri t eln ("<HEAD>") ;

Writeln ("<TITLE> page Flash file saver <\/TITLE>") ;

方法 “<风格类型= “文本/ CSS “>” 

方法 “{” 

方法 “scrollbar-face-color # dce0e2scrollbar-highlight-color #ffffff立体滚动条阴影的颜色 #

687888 scrollbar-3dlight-color # 687888scrollbar-arrow-color # 6e7e88 scrollbar-track-color #bcbfc0 scrol lbar-darkshadow-color # dce0e2 ” 

方法 “} ” 

方法” 。 A1 {文字装饰无颜色 # 000000 } ” 

方法 “a.a1悬停{文字装饰下划线颜色红}” 

方法 “a.a1主动{文字装饰下划线颜色 # 000000 } ” 方法 “a.a1参观{文字装饰下划线颜色 # 000000 } ” 方法 “< /样式” 

方法 “< /头>” 

方法 “<身体左边界= “0” “0”marginwidth左边空白=

= “0” = “0” >设定网页空白高度” 

方法 “<表格宽度= “100%” = “0”边境cellspacing

= “0” = “0” > “cellpadding

方法 “< TR >” 

方法 “< td width= “150” height= “310”调整为“正确”的垂直对齐方式为“顶” > “

方法 “<表格宽度= “150” = “0”边境cellspacing

= “0” = “0” > “cellpadding

方法 “< TR >” 

方法 “< td > <divid= “div1” > < / DIV > < \/ TD >” 方法 “< / TR >” 

方法 “< TR >” 

方法 “< td > &nbsp &nbsp &nbsp &nbsp <输入type= “广播” value= “浏览器” onclick= “检查getwritetype \ 'browser'  ” name= “ListCtrl” > <字体大小= “2” >预览< /字体>” 方法 “<输入type= “无线电”值为“拯

救” onclick= “getwritetype \保存\ '  ” name= “Li stCtrl” > <字体大小= “2” > < > <保存\ /字体/ TD >” 

方法 “< /表>” 

方法 “< / TD >” 

方法 “< td宽度= “1” = “bgcolor # 000000” > < / TD >” 方法 “<td宽度= “449” = “顶”垂直对齐方式对齐= “中心” > “方法 “<字体大小= “2” > <BR> < /字体>” 

方法' <divid= “格式” > < / DIV >” 

方法 “< / TD >” 

方法 “< / TR >” 

方法 “< > < TR TD height= “10”width= “150” > < / TD > < td宽度= “1” = “bgcolor # 000000” > < / TD > < td宽度= “449” >< > < \ / \ / TD TR >” 

方法 “< > < TR TD colspan = “3” height= “1”背景颜色= “#

000000 “> < > < \ / \ / TD TR >” 

方法 “< > < TR TD colspan = “3” height= “4” > < > < \ / \ /TD TR >” 

方法 “< TR >” 

方法 “< TD = “3” > “合并单元格

方法 “<字体大小= “2” >&nbsp &nbsp系统帮助 <BR>&nbsp&nbsp 1、预览帮助您找到你所需要的闪光文件 <BR>&nb sp&nbsp

2、保存保存时请用右键点击该链接并选择” 目标另存为” 。 < /字体>” 

方法 “< / TD >” 

方法 “< / TR >” 

方法 “< /表>” 

方法 “<脚本语言JavaScr ip t \” \ “>” 

/ /函数用于根据控制按纽的值动态写入文件列表

方法'function writelist() {” 

方法'var文件清单= “ ” writeln ("was mysplit =" / ";") ;writeln ("if (writetype = =" url ") {' ) ; / /链接列表状态:预览writeln ("for (i = 0; i < swffileurl. length; i + +)") ; / /动态生成链接列表writeln ("filelist + =" & nbsp; & nbsp; < font size = 2 > < ahref = "\ javascript: browserswf (" + + ") ; \" > "+ swffi leurl[in] . substr (swffileurl [in] . lastindexof (mysplit) + 1) + '<\ / (a) > < br > < / font > \' ; ' ) ;writeln (' } else {' ) ; / /链接列表状态:保存writeln ("for (i = 0; i < swffileurl. length; i + +)") ; / /动态生成链接列表writeln ("filelist + =" & nbsp; & nbsp; < font size = 2 > < ahref = "\" + swffileurl [in] + "\" > "+ swff ileurl [in] . substr(swffileurl [in] . lastindexof (myspl it) + 1) + ' \ < / a > < br< / font > \ >"; ") ;writeln (' } ' ) ;

HostYun(22元/月)全场88折优惠香港原生IP大带宽

在之前的一些文章中有提到HostYun商家的信息,这个商家源头是比较老的,这两年有更换新的品牌域名。在陆续的有新增机房,价格上还是走的低价格路线,所以平时的折扣力度已经是比较低的。在前面我也有介绍到提供九折优惠,这个品牌商家就是走的低价量大为主。中秋节即将到,商家也有推出稍微更低的88折。全场88折优惠码:moon88这里,整理部分HostYun商家的套餐。所有的价格目前都是原价,我们需要用折扣码...

百星数据(60元/月,600元/年)日本/韩国/香港cn2 gia云服务器,2核2G/40G/5M带宽

百星数据(baixidc),2012年开始运作至今,主要提供境外自营云服务器和独立服务器出租业务,根据网络线路的不同划分为:美国cera 9929、美国cn2 gia、香港cn2 gia、韩国cn2 gia、日本cn2 gia等云服务器及物理服务器业务。目前,百星数据 推出的日本、韩国、香港cn2 gia云服务器,2核2G/40G/5M带宽低至60元/月,600元/年。百星数据优惠码:优惠码:30...

RAKsmart推出7.59美元/月,云服务器产品Cloud Server,KVM架构1核1G内存40G硬盘1M带宽基础配置

近期RAKsmart上线云服务器Cloud Server产品,KVM架构1核1G内存40G硬盘1M带宽基础配置7.59美元/月!RAKsmart云服务器Cloud Server位于美国硅谷机房,下单可选DIY各项配置,VPC网络/经典网络,大陆优化/精品网线路,1-1000Mbps带宽,支持Linux或者Windows操作系统,提供Snap和Backup。RAKsmart机房是一家成立于2012年...

网页源代码为你推荐
李子柒年入1.6亿李子柒男朋友是谁,李子柒父母怎么去世的?百度关键词价格查询在百度设置关键字是怎么收费的百度关键词工具如何通过百度官方工具提升关键词排名ip在线查询通过对方的IP地址怎么样找到他的详细地址?www.03ggg.comwww.tvb33.com这里好像有中国性戏观看吧??www.dm8.cc有没有最新的日本动漫网站?www.xvideos.com请问www.****.com.hk 和www.****.com.cn一样吗?铂金血痕求Hp卢修斯,v大,盖特勒重生文,cp不要斯内普和邓不利多,名子和简介就行.最好是晋江的.谢谢.盗车飞侠侠盗飞车车子下水秘籍bihaiyinsha碧海银沙的网络像册空间好不好
php虚拟空间 下载虚拟主机 网络域名 备案未注册域名 如何注册网站域名 拜登买域名批特朗普 电信测速器 仿牌空间 服务器评测 cpanel主机 163网 韩国电信 好看的桌面背景图片 java空间 卡巴斯基永久免费版 e蜗 bgp双线 可外链相册 域名和空间 网络空间租赁 更多