我是一名软件开发人员,在一个非常吵闹的房间里工作,干扰很多,所以我大部分时间都戴着耳机。然而,每当我去开会、吃午饭或做其他事情时,我通常都会忘记关掉音乐,所以我的同事们都被我耳机里的嘶嘶声烦得不行。
我想到的是:屏幕锁定时关闭音量,解锁后再打开。如何在 Windows XP 机器上做到这一点?
答案1
答案2
这也应该有效,将这段代码保存在例如“mute.vbs”下。当您离开工作场所时,双击该文件,您的声音将关闭并且您的屏幕将被锁定。会议和登录后,您将看到一个弹出窗口,可以打开声音。
On Error Resume Next
set oShell = CreateObject("WScript.Shell")
un_mute()
oShell.Run "%windir%\System32\rundll32.exe user32.dll,LockWorkStation"
intAnswer = Msgbox("Do you want to unmute?", vbYesNo, "Volume")
if intAnswer = vbYes then
un_mute()
end if
sub un_mute()
oShell.run"Sndvol32"
WScript.Sleep 1000
oShell.SendKeys"{TAB 2} "
oShell.SendKeys"%{F4}"
end sub
当然,它并不完美,但对我来说还是有用的。它还适用于 Windows 下的每个播放器,无需安装其他软件 ;-)