.程序集 窗口程序集1
.子程序 _窗口1_创建完毕
图片框1.移动 (0, 0, 460, 210)
互联网浏览器1.可视 = 假
互联网浏览器1.静默 = 真 ' 不显示网页对话框,包括脚本错误提示。
互联网浏览器1.移动 (-5, -7, 460, 210)
.如果 (取反 (是否与互联网连接 ()))
标题 = 标题 + 取空白文本 (4) +“..没有联网..”
.否则
标题 = 标题 + 取空白文本 (4) +“..正在播放..”
互联网浏览器1.浏览 (“http://fm.mp3.baidu.com/app.html”, , , )
' 使用了云外归鸟的Webbrowser2支持库静态版
.如果结束
.子程序 _互联网浏览器1_已就绪
.参数 地址, 文本型, 参考
.局部变量 对象, 对象, , , 网页文档对象
.局部变量 代码, 文本型, , , 欲对网页执行的JS脚本
代码 =“javascript:document.documentElement.style.overflow='hidden';flashContainer.style.paddingTop='0px';”
' 这两条语句意思分别是:1、隐藏文档滚动条,2、将Flash容器顶部空白设为0。
互联网浏览器1.取网页文档对象 (对象)
对象.读对象型属性 (“parentwindow”, ).通用方法 (“execScript”, 代码,“Javascript”)
图片框1.可视 = 假
互联网浏览器1.可视 = 真