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


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

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

Author:Marydon

1.应用场景

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

2.代码实现

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

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

  第二步:编辑命令

  语法:

  Dim shell
  Set shell = CreateObject("WScript.Shell")

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

Dim shell
Set shell = CreateObject("WScript.Shell")
'1.启动qq
shell.Run """E:\TIM-x86\Bin\TIM.exe"""
'2.启动chrome
shell.Run """E:\ChromePortable-65-PE\App\Google Chrome\chrome.exe"""
'3.启动eclipse
shell.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文件

  以后直接双击运行即可

 


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM