Использование системного монитора
Системный монитор (SYSMON) можно включить в любое приложение, поддерживающее элементы ActiveX®. Например, можно включить SYSMON в приложение Microsoft Visual Basic или в HTML-документ.
В следующем примере показано, как включить SYSMON в HTML-документ. В примере используется VBScript для добавления счетчиков, значения которых извлекаются с локального компьютера, изменяются некоторые свойства SYSMON, управляющие отображением монитора, и обрабатываются события OnCounterAdd. В примере используется подстановочный знак (*) для добавления всех экземпляров счетчика процессов.
<HTML>
<BODY BGCOLOR=#C0C0C0>
<SCRIPT LANGUAGE="VBScript">
Sub Monitor_OnCounterAdded(index)
Monitor.Counters.Item(1).Width = 8
End Sub
</Script>
<OBJECT
CLASSID="clsid:C4D2D8E0-D1DD-11CE-940F-008029004347"
ID="Monitor"
HEIGHT=80%
WIDTH=100%>
</OBJECT>
<SCRIPT LANGUAGE="VBScript">
Sub Window_OnLoad
On Error Resume Next
Monitor.ShowValueBar = False
Monitor.ShowHorizontalGrid = True
Monitor.Counters.Add("\Process(*)\% Processor Time")
Monitor.DisplayType=sysmonLineGraph
Monitor.GraphTitle="System Performance Overview"
End Sub
</SCRIPT>
</BODY>
</HTML>