windows vbs启动多个应用程序并使程序最小化（显示桌面）

CreationTime--2018年7月26日11点18分

Author:Marydon

1.应用场景

　　每天开机后，都需要打开平常所需要的软件，又不想将程序设为开机启动，能不能开机后，同时启动多个程序呢？

2.代码实现

　　第一步：新建一个文本文件

　　桌面-->右键-->新建-->文本文档-->双击打开

　　第二步：编辑命令

　　语法：

　　Dim shell

　　Set shell = CreateObject("WScript.Shell")

　　shell.Run """你的应用程序的绝对路径"""

Dim shellSet shell = CreateObject("WScript.Shell")'1.启动qqshell.Run """E:\TIM-x86\Bin\TIM.exe"""'2.启动chromeshell.Run """E:\ChromePortable-65-PE\App\Google Chrome\chrome.exe"""'3.启动eclipseshell.Run """D:\eclipse-2018-x86\eclipse.exe"""'4.启动notepad++shell.Run """D:\Notepad++-7.3-PE\notepad++.exe"""'5.显示桌面Set shell = CreateObject("Shell.Application")shell.ToggleDesktop'6.将变量置空 这一步可以不要Set shell = Nothing

　　说明：虽然vbs有最小化的命令，但是效果不明显，因此，第5，6步相当于没有起作用，可以忽略。

　　第三步：文件-->另存为-->vbs文件

　　

　　第四步：删除刚才新建的txt文件

　　以后直接双击运行即可

 

 相关推荐：