批处理之家 - Powered by Discuz! Board

标题: [问题求助] 求教：vbs如何关闭这种窗口。谢谢（已解决：） [打印本页]

作者: bcetl 时间: 2022-4-4 18:52 标题: 求教：vbs如何关闭这种窗口。谢谢（已解决：）

本帖最后由 bcetl 于 2022-4-5 18:07 编辑

以下代码关闭不成功。
set shell=CreateObject("WScript.shell")
shell.Run "taskkill /f /im 绿化.exe",0
wscript.quit

作者: went 时间: 2022-4-4 21:30

命令行改成这样

taskkill /fi "windowtitle eq 绿化成功"
复制代码

作者: bcetl 时间: 2022-4-5 17:38

本帖最后由 bcetl 于 2022-4-5 17:56 编辑

回复 2# went

set shell=CreateObject("WScript.shell")
taskkill /fi "windowtitle eq 绿化成功"
wscript.quit

这是bat命令吧，
set shell=CreateObject("WScript.shell")
shell.Run taskkill /fi "windowtitle eq 绿化成功",0
wscript.quit
这2种试了，关不了。。。要以什么样的语法方式才正确呢？

补充一下，这个“绿化.exe”是以管理员权限运行的。 vbs或可能权限不够，结束不了。vbs调用管理员权限来结束它呢？
刚刚用bat试了一下，反馈结果是：
错误: 无法终止 PID 6208 (属于 PID 11676 子进程)的进程。
原因: 拒绝访问。

作者: bcetl 时间: 2022-4-5 18:00

本帖最后由 bcetl 于 2022-4-5 18:06 编辑

已解决：
刚刚以管理员权限运行bat，倒可以关闭进程成功。但我采用的是vbs。不想用带窗口的bat。

这个“绿化.exe”是必须要用管理权限打开的。关闭也要管理权限才能关闭。

Set WshShell = WScript.CreateObject("WScript.Shell")
If WScript.Arguments.Length = 0 Then
  Set ObjShell = CreateObject("Shell.Application")
  ObjShell.ShellExecute "wscript.exe" _
  , """" & WScript.ScriptFullName & """ RunAsAdministrator", , "runas", 1
  WScript.Quit
End if

set shell=CreateObject("WScript.shell")
shell.Run "taskkill /f /im 绿化.exe",0
wscript.quit

欢迎光临批处理之家 (http://bathome.net./)