VBS 自动打开软件
VBS 自动打开软件 点击 软件 关闭进程方法!
Dim WshShell, QQPath QQPath="C:\TM ACv6\TMAC.exe" '需要打开的软件路径 Set WshShell=WScript.CreateObject("WScript.Shell") path = Chr(34) & QQPath & Chr(34) '去除路径空格 WshShell.Run path,1 WScript.Sleep 10000 '等待1秒钟
WshShell.sendkeys "%{ESC}" '选中当前路径的界面 WshShell.AppActivate "Technitium MAC Address Changer v6 - by Shreyas Zare" '需要激活的软件框标题名称 WshShell.sendkeys "{enter}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{ENTER}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{TAB}" WshShell.SendKeys "{ENTER}" WScript.Sleep 3000 WshShell.SendKeys "{ENTER}" WScript.Sleep 3000 CreateObject("WScript.Shell").Run "taskkill /f /im TMAC.exe", 0 'TMAC.exe 为需要关闭的进程名称
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】博客园社区专享云产品让利特惠,阿里云新客6.5折上折
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步