Leaked source code of windows server 2003
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
|
<HTML><HEAD> <TITLE>DeviceConsole: List all devices</TITLE> <HTA:APPLICATION></HEAD><BODY> <H1>Devices:</H1>
<SCRIPT LANGUAGE=vbscript><!--SET DevCon = CreateObject("DevCon.DeviceConsole")SET Devs = DevCon.AllDevices
Count = Devs.Countdocument.write "<b>There are "+CStr(Count)+" devices:</b><br>"
'on error resume next
FOR EACH Dev IN Devs IF Dev.IsRunning THEN document.write "<font color=""#008000"">" ELSEIF Dev.HasProblem THEN document.write "<font color=""#FF0000"">" ELSE document.write "<font color=""#FF8000"">" END IF document.write Dev.Description + "</font><br>"NEXT
--> </SCRIPT>
</BODY></HTML>
|
