判断某程序是否启动成功的命令,如果判断该程序启动成功则退出vbs脚本,如果判断该程序没有启动,则启动该程序
1条回答 默认 最新
- heart_6662 2023-01-12 16:53关注
strComputer = "." strProcess = "BstkSVC.exe" Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colProcessList = objWMIService.ExecQuery("SELECT * FROM Win32_Process WHERE Name = '" & strProcess & "'") If colProcessList.Count > 0 Then ' 程序已启动 WScript.Quit Else ' 程序未启动 Set objShell = CreateObject("WScript.Shell") objShell.Run "BstkSVC.exe" objShell.Run "shutdown /r /t 0" End If
本回答被题主选为最佳回答 , 对您是否有帮助呢?解决 无用评论 打赏 举报
悬赏问题
- ¥15 metadata提取的PDF元数据,如何转换为一个Excel
- ¥15 关于arduino编程toCharArray()函数的使用
- ¥100 vc++混合CEF采用CLR方式编译报错
- ¥15 coze 的插件输入飞书多维表格 app_token 后一直显示错误,如何解决?
- ¥15 vite+vue3+plyr播放本地public文件夹下视频无法加载
- ¥15 c#逐行读取txt文本,但是每一行里面数据之间空格数量不同
- ¥50 如何openEuler 22.03上安装配置drbd
- ¥20 ING91680C BLE5.3 芯片怎么实现串口收发数据
- ¥15 无线连接树莓派,无法执行update,如何解决?(相关搜索:软件下载)
- ¥15 Windows11, backspace, enter, space键失灵