Listing 2: An excerpt from SysInfo.hta 

<style>
BODY
{
   font-family:Arial;
   width:130;
   height:145;
}
</style>
<SCRIPT language="VBScript">
Public XL
Public objWMIService
Public wmiLocator
Public Row
Public Col
Public strcomputer

Sub Window_Onload
 self.Focus()
        <host name="sidebar"> 
 self.resizeto 180,185 'w,h
End Sub