vbs如何后台运行程序

Set objWord = CreateObject("Word.Application")

Set colTasks = objWord.Tasks

If colTasks.Exists("我的下载 - 迅雷7") = flash Then

Set objshell=createobject("wscript.shell")

objShell.Run "C:\Progra~1\Thunde~1\Thunder\Program\Thunder.exe", 0

End If

do until j = 1

If colTasks.Exists("我的下载 - 迅雷7") Then

colTasks("我的下载 - 迅雷7").visible = flase

j=1

End If

loop

objWord.Quit

End If

loop

objWord.Quit

直接用run有好多程序不会乱告灶后台启动的

本程序友晌是先运行再进行后台隐藏。 所以会看到迅雷窗哗扮口一闪而过

想要软件一直在后台档数，除了不手动关闭软件外，可以按照以下方法 *** 作：

1、进行稿首入设置--电池--后台高耗电--将对应的软件开启；

2、进入i管家--权限管理--权限--自启动开启软件的自启权限；

3、将软件设置加速白名单。

注：若是出现因软件异常占用内存，被智慧引擎强行关闭的情况，则是软件自敬段身原因不支持设置

---