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>WBEM VBScript Example</TITLE>
<SCRIPT FOR="mysink" EVENT="OnObjectReady(objObject, objAsyncContext)" LANGUAGE="VBScript"> document.all.info.innerText = objObject.TargetInstance.Message </SCRIPT>
<SCRIPT LANGUAGE="VBScript"> <!--
Sub window_onLoad Set Service = Locator.ConnectServer() Service.Security_.ImpersonationLevel=3 Service.ExecNotificationQueryAsync mysink, _ "select * from __instancecreationevent where targetinstance isa 'Win32_NTLogEvent'" end sub --> </SCRIPT> </HEAD> <BODY> <SPAN ID="info"> No event received yet </SPAN>. <OBJECT ID="Locator" CLASSID="CLSID:76A64158-CB41-11D1-8B02-00600806D9B6"></OBJECT> <OBJECT ID="mysink" CLASSID="CLSID:75718C9A-F029-11d1-A1AC-00C04FB6C223"></OBJECT> </BODY> </HTML>
|