请问用vb 角本打开ie ,我想不现上面的工具拦,命令要怎么写呀,谢谢 请问用vb 角本打开ie ,我想不现上面的工具拦,命令要怎么写呀 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 调用一个本地的 HTML 文件。里面写个 javascript ,内容为打开弹出式窗口,然后关闭自己。具体脚本到处都有。 代码如下:<SCRIPT language=JavaScript>window.onload=new Function("window.open('http://www.cauc.edu.cn','_blank','width=500, height=300, toolbar=0, menubar=0, scrollbars=1, resizable=1, location=0, status=0');");</SCRIPT> 这样就有两个IE了。所以你的VB还要能关闭初始的IE窗口才可以。 Private Sub Command1_Click() Dim IE As Object Set IE = CreateObject("InternetExplorer.Application") IE.ToolBar = False '不显示工具栏 IE.MenuBar = False '不显示菜单栏 'IE.FullScreen = True '全屏 IE.Visible = True IE.Navigate "http://powerbasic.cn/"End Sub set ie = createobject("internetexplorer.application")ie.fullscreen = 1 '全屏ie.navigate "about:blank" '打开空白页ie.width=300 '设置宽度,高度ie.height=250ie.visible=1 '设置可见wscript.sleep 2000 '显示2秒ie.quit '退出 机房收费系统源代码 菜鸟,该怎么读sql库? 一个比较抽象的问题!!!! 天成299---2023+3102+5812双晶6线升级程序 new 的用法 各位老大请帮忙,那里可以下到VB6.0企业版? 十万火急:如何产生随机的数字或字符 “服务方收到连接请求后,服务方建立一新的Socket,用此新的Socket同对方建立连接”,请问这是什么意思? 有没有操作OUTLOOK EXPRESS中邮件的方式? 救急,关于listview的用法,如何才能使一个数组的每个元素输入到listview中 关于winio的使用 问个简单的问题:如何在win98系统下定时弹出对话框。
具体脚本到处都有。
<SCRIPT language=JavaScript>
window.onload=new Function("window.open('http://www.cauc.edu.cn','_blank','width=500, height=300, toolbar=0, menubar=0, scrollbars=1, resizable=1, location=0, status=0');");
</SCRIPT>
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.ToolBar = False '不显示工具栏
IE.MenuBar = False '不显示菜单栏
'IE.FullScreen = True '全屏
IE.Visible = True
IE.Navigate "http://powerbasic.cn/"
End Sub
ie.fullscreen = 1 '全屏
ie.navigate "about:blank" '打开空白页
ie.width=300 '设置宽度,高度
ie.height=250
ie.visible=1 '设置可见
wscript.sleep 2000 '显示2秒
ie.quit '退出