确定主系统音量是否静音？答案

【问题标题】：Determine whether the Master System Volume is muted?确定主系统音量是否静音？
【发布时间】：2014-03-20 03:13:46
【问题描述】：

我想编写一个脚本来确定主系统卷是否已静音，将其静音或取消静音。

基本上我想做this回答中解释的事情：

Set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys(chr(&hAD))

...但是稍微改进一下，我想要执行的是两个程序，一个用于静音，另一个用于取消静音，所以我需要确定它是否静音。

我已经知道如何使用其他语言的 3rd 方库来做到这一点，但是我需要使用 VisualBasicScipt 来做到这一点，所以我不知道从哪里开始使用这种有限的语言，也许 WMI 会告诉一些关于当前主音量级别的信息？如果是，那么我想这可以救我。

有什么想法吗？

【问题讨论】：

标签： windows vbscript wmi volume mute

【解决方案1】：

VBScript/Windows Script Host/WMI 不提供此信息。您需要使用第三方实用程序或其他一些编程语言，例如：

【讨论】：

【解决方案2】：

set oShell = CreateObject("WScript.Shell") 
oShell.run"%SystemRoot%\System32\SndVol.exe" 'Runs The Master Volume App.
WScript.Sleep 1500 'Waits For The Program To Open
oShell.SendKeys("{PGUP}") 'Turns Up The Volume 20, If It Is Muted Then It Will Unmute It
oShell.SendKeys("{PGUP}") 'Turns Up The Volume 20
oShell.SendKeys("{PGUP}") 'Turns Up The Volume 20
oShell.SendKeys("{PGUP}") 'Turns Up The Volume 20
oShell.SendKeys("{PGUP}") 'Turns Up The Volume 20
oShell.SendKeys"%{F4}"  ' ALT F4 To Exit The App.

这会运行主音量并取消静音并将音量设置为 100 如果您想减小音量，请执行以下操作

oShell.SendKeys('{PGDN}')

【讨论】：