![]() |
用于创建一个 WEB Base 的桌面应用程序
Set htWin = CreateObject("NetBox.HtmlWindow")
Browser | 查询 HtmlWindow 中的 WebBrowser 对象 |
AllowClose | 指定是否允许用户关闭本窗口,缺省为 true,允许关闭 |
Argument | 获取 HTML 窗口打开 URL 时传递的参数 |
border | 查询和设定窗口是否有边框,为 True 则有边框。缺省为 True |
Caption | 查询和设定窗口是否有标题栏,为 True 则有标题栏。缺省为 True |
clientHeight | 查询窗口用户区域的高度 |
clientWidth | 查询窗口用户区域的宽度 |
DropShadow | 设定和查询窗口是否显示阴影,需要 Windows XP 以上的系统支持 |
ContextMenu | 查询和设定窗口是否允许上下文菜单,为 True 则允许上下文菜单。缺省为 True |
Height | 查询和设定当前窗口的高度 |
HWND | 查询窗口的系统句柄 |
Icon | 加载图标到对象中,支持的图标格式为:BMP (bitmap), JPEG, WMF (metafile), ICO (icon), GIF |
LayeredAlpha | 设定和查询窗口半透明值,需要 Windows 2000 以上的系统支持 |
Left | 查询和设定当前窗口左上角 x 值 |
MaximizeBox | 查询和设定窗口是否有最大化按钮,为 True 则有最大化按钮。缺省为 True |
Maximized | 查询和设定窗口是否有是最大化状态,为 True 则是最大化状态。缺省为 False |
MinimizeBox | 查询和设定窗口是否有最小化按钮,为 True 则有最小化按钮。缺省为 True |
Minimized | 查询和设定窗口是否有是最小化状态,为 True 则是最小化状态。缺省为 False |
resizable | 查询和设定窗口是否可以自由改变尺寸,为 True 则可以自由改变尺寸。缺省为 True |
scrollbar | 查询和设定窗口是否有滚动条,为 True 则有滚动条。缺省为 True |
Title | 查询和设定当前窗口的标题文本 |
ToolWindow | 查询和设定窗口是否是工具窗口,为 True 则是工具窗口。缺省为 False |
Top | 查询和设定当前窗口左上角 y 值 |
TopMost | 查询和设定窗口是否是顶层窗口,为 True 则是顶层窗口。缺省为 False |
Width | 查询和设定当前窗口的宽度 |
WindowEdge | 查询和设定窗口是否有内陷边框,为 True 则有内陷边框。缺省为 False |
Visible | 查询和设定窗口是否显示,为 True 则显示。缺省为 False |
center | 将当前窗口定位到屏幕中央 |
close | 关闭当前窗口 |
drag | 以指定的方式拖动窗口 |
EndDialog | 关闭当前窗口并设定返回值 |
isClosed | 检查当前对象的窗口是否已经关闭 |
isActive | 检查当前对象的窗口是否是当前激活的窗口 |
focus | 将活动焦点设定到当前窗口 |
moveTo | 移动当前窗口到指定位置,参数窗口左上角的目标位置 |
moveWindow | 同时指定窗口的位置和大小 |
Open | 在当前窗口打开给定 url 的 HTML 资源 |
OpenModalDialog | 快捷方法,创建并运行一个对话框窗口,返回结果 |
resizeTo | 设定当前窗口到指定的大小 |
SetTransparentMask | 设定窗口的透明模版和拉伸模式 |
showDialog | 显示激活当前窗口,并等待窗口关闭 |
此对象用于创建基于 WEB 和 HTML 技术的桌面应用程序,通过使用 HTML,可以方便迅速的创建丰富多彩的用户操作界面。
在创建 HTML 窗口时,可以为窗口指定一个 URL,此 URL 通常可以是 http:,也可以使用 netbox: 协议直接使用 NetBox 应用程序的内部文件,以方便发布和部署。
在连接了 URL 以后,页面 HTML 内的 Javascript 或者 VBScript 可以使用 window.external 访问和操作窗口本身。
下面的例子创建一个 HTML 窗口,连接一个 html 文件,显示窗口:
Set htWin= CreateObject("NetBox.HtmlWindow") htWin.Open "netbox:/default.htm" htWin.ShowDialog
在创建窗口和关闭窗口时,也可以在主程序和窗口程序之间传递参数和返回结果:
Set ht = CreateObject("NetBox.HtmlWindow") ht.open "netbox:/html.htm", "Hello!!! :-P" Shell.Console.WriteLine ht.showDialog
html.htm 的内容如下:
<script> document.write(external.Argument); </script> <br> <button onclick="external.endDialog('Hi!!!')">endDialog</button>