网页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 # dce0e2scrollbar-highlight-color #ffffff立体滚动条阴影的颜色 #
687888 scrollbar-3dlight-color # 687888scrollbar-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 >         <输入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” >   系统帮助 <BR>   1、预览帮助您找到你所需要的闪光文件 <BR>&nb sp 
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发布了9月份促销信息,针对香港华为云线路物理服务器华为一型提供立减300元优惠码,优惠后香港华为一型月付仅450元起。ZJI是原来Wordpress圈知名主机商家:维翔主机,成立于2011年,2018年9月更名为ZJI,提供中国香港、台湾、日本、美国独立服务器(自营/数据中心直营)租用及VDS、虚拟主机空间、域名注册等业务,商家所选数据中心均为国内访问质量高的机房和线路,比如香港阿里云、华为...
最近上洛杉矶机房联通CUVIP线路主机的商家越来越多了,HostKvm也发来了新节点上线的邮件,适用全场8折优惠码,基于KVM架构,优惠后最低月付5.2美元起。HostKvm是一家成立于2013年的国人主机商,提供基于KVM架构的VPS主机,可选数据中心包括日本、新加坡、韩国、美国、中国香港等多个地区机房,君选择国内直连或优化线路,延迟较低,适合建站或者远程办公等。以洛杉矶CUVIP线路主机为例,...
Justg是一家俄罗斯VPS云服务器提供商,主要提供南非地区的VPS服务器产品,CN2高质量线路网络,100Mbps带宽,自带一个IPv4和8个IPv6,线路质量还不错,主要是用户较少,带宽使用率不高,比较空闲,不拥挤,比较适合面向非洲、欧美的用户业务需求,也适合追求速度快又需要冷门的朋友。justg的俄罗斯VPS云服务器位于莫斯科机房,到美国和中国速度都非常不错,到欧洲的平均延迟时间为40毫秒,...