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

ZJI(月付450元),香港华为云线路服务器、E3服务器起

ZJI发布了9月份促销信息,针对香港华为云线路物理服务器华为一型提供立减300元优惠码,优惠后香港华为一型月付仅450元起。ZJI是原来Wordpress圈知名主机商家:维翔主机,成立于2011年,2018年9月更名为ZJI,提供中国香港、台湾、日本、美国独立服务器(自营/数据中心直营)租用及VDS、虚拟主机空间、域名注册等业务,商家所选数据中心均为国内访问质量高的机房和线路,比如香港阿里云、华为...

HostKvm新上联通CUVIP线路VPS,八折优惠后1G内存套餐$5.2/月起

最近上洛杉矶机房联通CUVIP线路主机的商家越来越多了,HostKvm也发来了新节点上线的邮件,适用全场8折优惠码,基于KVM架构,优惠后最低月付5.2美元起。HostKvm是一家成立于2013年的国人主机商,提供基于KVM架构的VPS主机,可选数据中心包括日本、新加坡、韩国、美国、中国香港等多个地区机房,君选择国内直连或优化线路,延迟较低,适合建站或者远程办公等。以洛杉矶CUVIP线路主机为例,...

JUSTG(5.99美元/月)最新5折优惠,KVM虚拟虚拟512Mkvm路线

Justg是一家俄罗斯VPS云服务器提供商,主要提供南非地区的VPS服务器产品,CN2高质量线路网络,100Mbps带宽,自带一个IPv4和8个IPv6,线路质量还不错,主要是用户较少,带宽使用率不高,比较空闲,不拥挤,比较适合面向非洲、欧美的用户业务需求,也适合追求速度快又需要冷门的朋友。justg的俄罗斯VPS云服务器位于莫斯科机房,到美国和中国速度都非常不错,到欧洲的平均延迟时间为40毫秒,...

网页源代码为你推荐
沙滩捡12块石头价值近百万捡块石头价值一亿 奇石到底应该怎么定价美国互联网瘫痪网络中断会对美国军力造成什么影响商标注册流程及费用注册商标的流程是什么,大概需要多少费用?嘉兴商标注册怎么查商标注册日期www.hao360.cn每次打开电脑桌面都出现以下图标,打开后链接指向www.hao.360.cn。怎么彻底删除?lunwenjiance我写的论文,检测相似度是21.63%,删掉参考文献后就只有6.3%,这是为什么?seo优化工具seo优化软件有哪些?www.522av.com现在怎样在手机上看AV网站检测请问论文检测网站好的有那些?www.119mm.com看电影上什么网站??
虚拟主机管理软件 上海服务器租用 高防服务器租用qy cn域名备案 lamp 海外服务器 idc测评网 paypal认证 payoneer 光棍节日志 国外空间 500m空间 panel1 阿里云浏览器 什么是刀片服务器 web服务器的架设 爱奇艺会员免费试用 in域名 shuang12 中国linux 更多