网页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 (' } ' ) ;
搬瓦工vps(bandwagonhost)现在面向中国大陆有3条顶级线路:美国 cn2 gia,香港 cn2 gia,日本软银(softbank)。详细带宽是:美国cn2 gia、日本软银,都是2.5Gbps~10Gbps带宽,香港 cn2 gia为1Gbps带宽,搬瓦工是目前为止,全球所有提供这三种带宽的VPS(云服务器)商家里面带宽最大的,成本最高的,没有第二家了! 官方网站:https...
wordpress高级全行业大气外贸主题,wordpress通用全行业高级外贸企业在线询单自适应主题建站程序,完善的外贸企业建站功能模块 + 高效通用的后台自定义设置,更实用的移动设备特色功能模块 + 更适于欧美国外用户操作体验 大气简洁的网站风格设计 + 高效优化的网站程序结构,更利于Goolge等SEO搜索优化和站点收录排名。点击进入:wordpress高级全行业大气外贸主题主题价格:¥398...
hostkvm怎么样?hostkvm是一家国内老牌主机商家,商家主要销售KVM架构的VPS,目前有美国、日本、韩国、中国香港等地的服务,站长目前还持有他家香港CN2线路的套餐,已经用了一年多了,除了前段时间香港被整段攻击以外,一直非常稳定,是做站的不二选择,目前商家针对香港云地和韩国机房的套餐进行7折优惠,其他套餐为8折,商家支持paypal和支付宝付款。点击进入:hostkvm官方网站地址hos...