VBS Lautstärke regeln per SendKeys

This site uses cookies. By continuing to browse this site, you are agreeing to our Cookie Policy.

  • VBS Lautstärke regeln per SendKeys

    set wshell = CreateObject("Wscript.shell")
    wshell.run "C:\Windows\System32\SndVol.exe"
    If wshell.AppActivate("SndVol.exe") = FALSE then
    Wscript.Sleep 1000
    else
    wshell.sendkeys "{TAB}"
    WScript.Sleep 500
    wshell.sendkeys "{TAB}"
    WScript.Sleep 500
    wshell.sendkeys "{PGUP}"
    End if

    funktioniert eigentlich alles, keine Fehlermeldung und so aber irgendwie werden die sendkeys befehle nicht wirklich umgesetzt...
    Weiss jemand ne lösung?