高分求一段VBS代码

来源：百度知道 编辑：UC知道 时间：2024/09/22 20:18:02
谁能用vbs写一个打开指定的txt文件然后全选全部内容后剪切，然后粘贴，保存后再关闭notepad啊？
怎么没人回答啊，急。。。。

用发送按键的方式。其中test.txt为要打开的文件。

Set objws=WScript.CreateObject("wscript.shell")
objws.Run "notepad test.txt"
WScript.Sleep 1000
objws.SendKeys "^a"
WScript.Sleep 1000
objws.SendKeys "^x"
WScript.Sleep 1000
objws.SendKeys "^v"
WScript.Sleep 1000
objws.SendKeys "^s"
WScript.Sleep 1000
objws.SendKeys "%{F4}"

三楼的做法千万不要按鼠标,不然就坏了.