|
26933062
银牌会员
积分 2268
发帖 879
注册 2006-12-19
状态 离线
|
『楼 主』:
请问用vbs如何退出浏览器
dim ws
set ws=createobject("wscript.shell")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")
objIE.document.parentwindow.clipboardData.SetData "text","小楼一夜听春雨"
WScript.Sleep 2000
objIE.quit
请问上面的代码,最后一句要怎样才对,有办法关闭IE浏览器吗?
|
|
 2007-4-30 20:24 |
|
|
baomaboy
银牌会员
积分 1513
发帖 554
注册 2005-12-30
状态 离线
|
『第
2 楼』:
| Quote: | Originally posted by 26933062 at 2007-4-30 20:24:
dim ws
set ws=createobject("wscript.shell")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")
objIE.document.parentwindow.cli ... |
|
没错误,加一句objIE.Visible就能看到效果了,不对其他窗口操作,所以.....
dim ws
set ws=createobject("wscript.shell")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible=True
objIE.Navigate("about:blank")
objIE.document.parentwindow.clipboardData.SetData "text","小楼一夜听春雨"
WScript.Sleep 2000
objIE.quit [ Last edited by baomaboy on 2007-5-1 at 09:29 PM ]
|
好多菩提树，好多明镜台。本来好多物，好多的尘埃。 |
|
|
2007-5-1 15:29 |
|
|
26933062
银牌会员
积分 2268
发帖 879
注册 2006-12-19
状态 离线
|
『第
3 楼』:
也不行,提示错误,
行 4
字符 1
对象不支持此属性或方法'objIE.Visible
'
|
|
|
2007-5-1 21:14 |
|
|
baomaboy
银牌会员
积分 1513
发帖 554
注册 2005-12-30
状态 离线
|
|
|
2007-5-1 21:28 |
|
|
26933062
银牌会员
积分 2268
发帖 879
注册 2006-12-19
状态 离线
|
|
|
2007-5-2 17:57 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
6 楼』:
Dim ws
Set ws=CreateObject("wscript.shell")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible=True
objIE.Navigate("about:blank")
objIE.Document.parentwindow.clipboardData.SetData "text","小楼一夜听春雨"
WScript.Sleep 2000
objIE.quit
Set objIE=Nothing
Set ws =Nothing
那个可以啊
|
|
|
2007-5-2 18:00 |
|
|
baomaboy
银牌会员
积分 1513
发帖 554
注册 2005-12-30
状态 离线
|
『第
7 楼』:
| Quote: | Originally posted by 26933062 at 2007-5-2 17:57:
还是不行,提示最后一句错误 |
|
又帮你试过，应该是你开着Maxthon等其他浏览器拦截了IE造成了一个不存在的.quit 测试前关掉其他非IE浏览器窗口。
在我这里是这样。
|
好多菩提树，好多明镜台。本来好多物，好多的尘埃。 |
|
|
2007-5-2 18:45 |
|
|
stornager
中级用户
scriptlover
积分 328
发帖 131
注册 2007-3-25
状态 离线
|
『第
8 楼』:
请问26933062兄为什么要加上这句 ：
objIE.document.parentwindow.clipboardData.SetData "text","小楼一夜听春雨"
这句表达了什么意思？？
|
scriptlover
Be with script forever!! |
|
|
2007-5-2 19:13 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
9 楼』:
把"小楼一夜听春雨"复制到剪切板
|
|
|
2007-5-2 20:49 |
|
