Beim Herunterfahren automatisch auf lautlos stellen

Gerade Besitzer eines T43 oder X41 haben dank der von IBM konzipierten und verbauten SATA-to-IDE-Bridge nicht nur das Problem nur noch wenige aktuelle Festplatten mit entsprechend großer Kapazität zu finden. Durch eine Routine im BIOS dieser Modelle wird das verwendete Laufwerk beim Start auf eine von IBM freigegebene Firmware überprüft. Wird eine solche Firmware nicht vorgefunden, quittiert dies das BIOS je nach Einstellung mit einem Pieps-Ton oder bricht den Start ganz und gar ab. Trotz dieser Fehlermeldung, dem berühmten "Error 2010", arbeitet das ThinkPad einwandfrei. Allein das Warnsignal während des Hochfahrens stört den Benutzer und es kommt schnell der Wunsch auf, das Notebook zumindest für die Startphase zum Schweigen zu bringen.

Für diese Aufgabe gibt es ein kleines und nützliches Tool: Nircmd.Einfach die verlinkte ZIP-Datei herunterladen und in einem Verzeichnis seiner Wahl entpacken. Für das Ein- bzw. Ausschalten des Tons können folgende Befehle genutzt werden:

1. Was bracht man

Als erstes das Tool NIRCMD. Ohne dieses oder ähnliche Tools kann der Ton über die Komandozeile nicht bewußt nur ein- oder eben nur ausschalten werden. Dann zwei VBS-Skripte: Eins wird in den Autostart kopiert (automute.vbs) oder eben dorthin verlinkt (finde ich persönlich übersichtlicher). Das zweite (shutdown.vbs) wird auf den Desktop kopiert oder verknüpft. Als Benutzer muss man sich nur daran gewöhnen, den Rechner über diese Verknüpfung herunterzufahren.

2. Die Skripte

automute.vbs

'********************************************************************
' Logon script with MUTE OFF
'
' Version	: 1.2b (09-07-02)
' author	: buergernb
'
' Dieses Script setzt das Tool NIRCMD im Pfad "C:\nircmd" voraus.
' NIRCMD: http://www.nirsoft.net/utils/nircmd.html
'
' Einfach diese VBS-Datei in den Autostart kopieren oder verknüpfen.
'********************************************************************
 
 
'Erforderlicher Aufruf für eine Shellumgebung.
'------------------------------------------
Set oShell = CreateObject("WScript.Shell")
 
 
'Schaltet den Ton ein.
'-------------------------------------------------
oShell.Run "C:\automute\nircmd.exe mutesysvolume 0"
 
 
'Trigger, der die Windows Eventschleife "abhört".
'Dabei wartet er auf ein Event vom Typ
'"Win32_PowerManagementEvent".
'-------------------------------------------------
Set colMonitoredEvents = GetObject("winmgmts:")._
ExecNotificationQuery("Select * from Win32_PowerManagementEvent") 
 
 
'Die Schleife zur Verarbeitung dieses Events.
'Gibt Win32_PowerManagementEvent die Zahl 4 zurück, 
'ist der Rechner im Begriff in den Standby- oder 
'Hibernate-Modus zu gehen. Also wird der Sound 
'ausgeschaltet. Gibt es die Zahl 7 zurück, wacht der
'Rechner gerade auf und der Ton wird nach einer best. 
'Wartezeit (hier 8000 Millisekunden) wieder eingeschaltet.  
'---------------------------------------------------
Do
 	Set objLatestEvent = colMonitoredEvents.NextEvent
 
  Select Case objLatestEvent.EventType
 
  	Case 4
 			oShell.Run "C:\automute\nircmd.exe mutesysvolume 1", , false
 
 		Case 7
 			wscript.sleep 8000
 			oShell.Run "C:\automute\nircmd.exe mutesysvolume 0", , false
 
 	End Select
Loop

Links

Herstellerseite des Tools Nircmd