Staging
v0.5.1
https://github.com/python/cpython
Raw File
Tip revision: 50d55ff8c73f484708225d492a2167b82c8c8bb8 authored by Martin v. Löwis on 11 March 2008, 17:59:53 UTC
Prepare for 2.4.5
Tip revision: 50d55ff
check_soundcard.vbs
rem Check for a working sound-card - exit with 0 if OK, 1 otherwise.
set wmi = GetObject("winmgmts:")
set scs = wmi.InstancesOf("win32_sounddevice")
for each sc in scs
   set status = sc.Properties_("Status")
   wscript.Echo(sc.Properties_("Name") + "/" + status)
   if status = "OK" then
       wscript.Quit 0 rem normal exit
   end if
next
rem No sound card found - exit with status code of 1
wscript.Quit 1

back to top