中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

中国DOS联盟论坛
现在时间是 2026-08-05 11:11

共 48,038 主题排行 / 350,123 发帖 / 今日 1 篇 / 48,251 会员排行

第1楼　zhanghong1	发表于 2007-07-12 13:11
初级用户　发帖 34　积分 78
关于VBS关闭记事本[已解决] 我在咱论坛找到一段挺有意思的vbs: 如下： dim ws str = "user: ok welcome!!!" Num = len(str) set ws=wscript.createobject("wscript.shell") ws.run("notepad.exe") wscript.sleep 200 ws.appactivate "无标题 - 记事本" wscript.sleep 500 for i = 1 to Num Input = Mid(str, i, 1) if Input = "$" then Input = vbCr wscript.sleep 500 ws.sendkeys(Input) next 结果是，打开的记事本，效果也挺好，能不能再接着把这个记事自动关闭呀。不用保存。。。。 [ Last edited by zhanghong1 on 2007-7-12 at 05:14 PM ]

第2楼　ccwan	发表于 2007-07-12 15:53
金牌会员　发帖 1,160　积分 2,725　来自河北廊坊
可以啊，在最后加上这两句： WS.SendKeys "%{f4}" WS.SendKeys "no"