在脚本中创建窗体

Set ie=CreateObject("InternetExplorer.Application")
ie.Visible=False
ie.AddressBar=False
ie.MenuBar=False
ie.StatusBar=False
ie.ToolBar=False
ie.Resizable=true
ie.Left=300
ie.Top=200
ie.Width=300
ie.Height=240
ie.Silent=True
ie.Navigate "about:blank"
ie.Document.Title="VBScript 创建的窗口"
ie.Document.body.bgColor="#ECE9D8"
ie.Document.body.style.overflow="hidden"
ie.Document.body.style.borderWidth="0"
ie.Document.body.innerHtml="<b>VBScript</b>创建的窗口测试！！<br/><br/><br/><br/>" & _
"<p align='center'><input type='button' onclick=” & _
”'vbscript:msgbox(""单击事件测试！"")' value='单击这里关闭'/></p>"
ie.Visible=True

效果如下：



 


本文链接地址： 在脚本中创建窗体
https://blog.qingfengju.com/index.asp?id=145

上一篇： 键盘钩子
下一篇： 10分钟入门InstallShield

分类：脚本编程 查看次数：6646 发布时间：2009/8/22 1:21:54