<HTML>
<HEAD>
<TITLE>WBEM VBScript Example</TITLE>

<SCRIPT FOR="document" EVENT="onclick()" LANGUAGE ="VBScript">
		dateNow = Now ()
		datetime.SetVarDate (dateNow)
		document.all.info.innerText = datetime.Value
		document.all.info2.innerText = datetime.GetVarDate ()
		document.all.info3.innerText = datetime.GetVarDate (false)
		document.all.info4.innerText = datetime.GetFileTime ()
		document.all.info5.innerText = datetime.GetFileTime (false)
</SCRIPT>

</HEAD>
<BODY>
The current time in DMTF-speak is  
<SPAN ID="info">
unknown
</SPAN>.
<BR/>
The current time in Variant-speak is  
<SPAN ID="info2">
unknown
</SPAN>.
<BR/>
The nonlocal time in Variant-speak is  
<SPAN ID="info3">
unknown
</SPAN>.
<BR/>
The nonlocal time in FILETIME-speak is  
<SPAN ID="info4">
unknown
</SPAN>.
<BR/>
The local time in FILETIME-speak is  
<SPAN ID="info5">
unknown
</SPAN>.
<OBJECT ID="datetime" CLASSID="CLSID:47DFBE54-CF76-11d3-B38F-00105A1F473A"></OBJECT>
</BODY>
</HTML>