方法网页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 (' } ' ) ;

创梦网络-四川大带宽、镇江电信服务器云服务器低至56元

达州创梦网络怎么样,达州创梦网络公司位于四川省达州市,属于四川本地企业,资质齐全,IDC/ISP均有,从创梦网络这边租的服务器均可以备案,属于一手资源,高防机柜、大带宽、高防IP业务,一手整C IP段,四川电信,一手四川托管服务商,成都优化线路,机柜租用、服务器云服务器租用,适合建站做游戏,不须要在套CDN,全国访问快,直连省骨干,大网封UDP,无视UDP攻击,机房集群高达1.2TB,单机可提供1...

MechanicWeb免费DirectAdmin/异地备份

MechanicWeb怎么样?MechanicWeb好不好?MechanicWeb成立于2008年,目前在美国洛杉矶、凤凰城、达拉斯、迈阿密、北卡、纽约、英国、卢森堡、德国、加拿大、新加坡有11个数据中心,主营全托管型虚拟主机、VPS主机、半专用服务器和独立服务器业务。MechanicWeb只做高端的托管vps,这次MechanicWeb上新Xeon W-1290P处理器套餐,基准3.7GHz最高...

hypervmart:英国/荷兰vps,2核/3GB内存/25GB NVMe空间/不限流量/1Gbps端口/Hyper-V,$10.97/季

hypervmart怎么样?hypervmart是一家国外主机商,成立于2011年,提供虚拟主机、VPS等,vps基于Hyper-V 2012 R2,宣称不超售,支持linux和windows,有荷兰和英国2个数据中心,特色是1Gbps带宽、不限流量。现在配置提高,价格不变,性价比提高了很多。(数据中心不太清楚,按以前的记录,应该是欧洲),支持Paypal付款。点击进入:hypervmart官方网...

网页源代码为你推荐
8080端口如何关闭和打开8080端口同ip网站查询怎样查询一个ip绑了多少域名www.jjwxc.net晋江文学网 的网址是什么?ip在线查询通过对方的IP地址怎么样找到他的详细地址?www.vtigu.com如图所示的RT三角形ABC中,角B=90°(初三二次根式)30 如图所示的RT三角形ABC中,角B=90°,点p从点B开始沿BA边以1厘米每秒的速度向A移动;同时,点Q也从点B开始沿BC边以2厘米每秒的速度向点C移动。问:几秒后三角形PBQ的面积为35平方厘米?PQ的距离是多少www.idanmu.com新开奇迹SF|再创发布网|奇迹SF|奇迹mu|网通奇迹|电信奇迹|66smsm.comwww.zpwbj.com 这个网址是真的吗?我想知道它的真实性.......谢谢 我就剩50了,都给你了..............www.884tt.com刚才找了个下电影的网站www.ttgame8.com,不过好多电影怎么都不能用QQ旋风或者是迅雷下在呢?网页源代码网页的HTML代码www.1100.com诺亚洲1100怎么下电影
独立ip虚拟主机 域名注册中心 重庆服务器租用 播放vps上的视频 最便宜虚拟主机 免费动态域名解析 ipage 个人空间申请 免费全能主机 河南移动m值兑换 双线机房 彩虹云 1元域名 空间登入 英雄联盟台服官网 atom处理器 lamp怎么读 深圳域名 阿里云邮箱登陆 中国电信宽带测速 更多