Run KVM switch in background and target DDM by monitor model

This commit is contained in:
Lago
2026-03-27 14:49:28 +01:00
parent 8591e22a7b
commit 33e762c182
5 changed files with 164 additions and 21 deletions
+12
View File
@@ -0,0 +1,12 @@
Option Explicit
Dim shell
Dim projectPath
Dim command
Set shell = CreateObject("WScript.Shell")
projectPath = CreateObject("Scripting.FileSystemObject").GetParentFolderName(WScript.ScriptFullName)
command = "cmd.exe /c cd /d """ & projectPath & """ && uv run kvm-switch"
' Run hidden and do not wait.
shell.Run command, 0, False