中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » IE隐藏打开网站

xxcvb
新手上路

积分 6
发帖 10
注册 2009-2-12
状态离线

『楼主』: IE隐藏打开网站

set ws=createobject("wscript.shell")
url="www.baidu.com"

do
ws.run"iexplore.exe "&url,0
wscript.sleep 3000
call kill_IE(url)
loop

private sub kill_IE(url)
set bag=getobject("winmgmts:\\.\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name='iexplore.exe'")
For Each id In pipe
if instr(1,id.commandline,url)<>0 then
id.terminate()
end if
Next
end sub

2009-3-13 04:56

xxcvb
新手上路

积分 6
发帖 10
注册 2009-2-12
状态离线

『第 2 楼』:

上面代码实现了隐藏打开指定网站,
求高手给写个模拟鼠标事件
点击指定坐标广告的代码

2009-3-13 04:57

xxcvb
新手上路

积分 6
发帖 10
注册 2009-2-12
状态离线

『第 3 楼』:

是否要用到下面函数
sendkeys
CALL SUB_CLICK(X,Y)

2009-3-13 05:04

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: