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

Virmach 3.23美元可用6个月的VPS主机

Virmach 商家算是比较久且一直在低价便宜VPS方案中玩的不亦乐乎的商家,有很多同时期的商家纷纷关闭转让,也有的转型到中高端用户。而前一段时间也有分享过一次Virmach商家推出所谓的一次性便宜VPS主机,比如很低的价格半年时间,时间到服务器也就关闭。这不今天又看到商家有提供这样的产品。这次的活动产品包括圣何塞和水牛城两个机房,为期六个月,一次性付费用完将会取消,就这么特别的产品,适合短期玩玩...

易探云服务器怎么过户/转让?云服务器PUSH实操步骤

易探云服务器怎么过户/转让?易探云支持云服务器PUSH功能,该功能可将云服务器过户给指定用户。可带价PUSH,收到PUSH请求的用户在接收云服务器的同时,系统会扣除接收方的款项,同时扣除相关手续费,然后将款项打到发送方的账户下。易探云“PUSH服务器”的这一功能,可以让用户将闲置云服务器转让给更多需要购买的用户!易探云服务器怎么过户/PUSH?1.PUSH双方必须为认证用户:2.买家未接收前,卖家...

Fiberia.io:$2.9/月KVM-4GB/50GB/2TB/荷兰机房

Fiberia.io是个新站,跟ViridWeb.com同一家公司的,主要提供基于KVM架构的VPS主机,数据中心在荷兰Dronten。商家的主机价格不算贵,比如4GB内存套餐每月2.9美元起,采用SSD硬盘,1Gbps网络端口,提供IPv4+IPv6,支持PayPal付款,有7天退款承诺,感兴趣的可以试一试,年付有优惠但建议月付为宜。下面列出几款主机配置信息。CPU:1core内存:4GB硬盘:...

网页源代码为你推荐
psbc.comwap.psbc.com网银激活百花百游百花蛇草的作用同ip域名同IP网站具体是什么意思,能换独立的吗www.765.com哪里有免费的电影网站yinrentangweichentang万艾可正品的作用真的不错吗关键词分析关键词分析的考虑思路是怎样的,哪个数据是最重要的chudian365陈译贤的《触电》 歌词红玉头冠急求,wow中红玉头冠的第一个任务是什么呀。。www.niuniu.com哪里可以牛牛游戏在线玩?无聊就玩玩咯!关键字工具网站seo关键词软件工具有哪些
jsp虚拟主机 域名反查 域名转让网 工信部域名备案查询 linuxapache虚拟主机 enzu 主机 香港机房 lamp配置 php免费空间 cdn联盟 流量计费 网络空间租赁 国外免费asp空间 空间登入 免费asp空间 贵阳电信测速 双线空间 登陆qq空间 hostease 更多