symbian-qemu-0.9.1-12/python-2.6.1/Lib/test/check_soundcard.vbs
author Gareth Stockwell <gareth.stockwell@accenture.com>
Fri, 24 Sep 2010 12:07:03 +0100
branchgraphics-phase-3
changeset 115 7fc47a6656f3
parent 1 2fb8b9db1c86
permissions -rw-r--r--
Removed syborg-graphicswrapper model library This has been moved to the adapt/graphics.simulator package - see changeset 563aa0c4cea3.

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