computer · Note

Windows下用vbs直接运行程序中的按钮命令

突然想做一个自动全屏播放PDF的东西,然后想到vbs脚本是一个解决方案,于是在网上找了半天,找到了如下的代码。

Set wshobj=WScript.CreateObject("WScript.Shell")
app=wshobj.Run("FoxitReader.exe Ping.pdf")
wshobj.AppActivate app
WScript.Sleep 1000
wshobj.SendKeys "%vf"
Wscript.Quit

这段代码是我根据FoxitReader的执行办法改写的,可以看到第二行是用阅读器打开pdf文档,你可以对应改成任意你要用的程序打开对应任意的文件(注意相对路径和绝对路径)。然后第四行让你的当前窗口sleep…… 意思是说你下面的操作将对新打开的窗口有效,即你启动的程序界面。于是倒数第二行是快捷键的输入,就像是vbs脚本自动替你从键盘输入命令。%代表Alt 键,vf代表V和F的字母键。然后退出脚本。因为foxitreader里面的全屏播放按钮时Alt+v+f,于是当我双击vbs脚本之后,我就可以直接全屏显示pdf文件了,就和ppt一样……

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.