--- projects/cms/source/host/winhost/nettest.frm	2001/02/28 10:45:37	1.29
+++ projects/cms/source/host/winhost/nettest.frm	2001/02/28 12:04:17	1.31
@@ -242,6 +242,10 @@ Private Sub Hide_Click()
     SystemTray.Icon = Val(Form1.Icon)
 End Sub
 
+Private Sub Image1_Click()
+
+End Sub
+
 Private Sub Reconfigure_Click()
     ' establish a TCP connection to a filtermanager
     connected = False
@@ -403,8 +407,7 @@ Private Sub Timer1_Timer()
         ' prepare the contents of the XML packet.
         seqNo = seqNo + 1
         
-        ' Comment this line in the next protocol
-        'machineName = TCPSock.LocalHostName
+        netbiosName = TCPSock.LocalHostName
         
         LocalIP = TCPSock.LocalIP
         packetDate = Date2Num()
@@ -463,6 +466,7 @@ Private Sub Timer1_Timer()
         ' build the contents of the XML packet
         xml = "<packet seq_no=""" & seqNo & """ machine_name=""" & machineName & """ date=""" & packetDate & """ type=""data"" ip=""" & LocalIP & """>" & _
               "<os>" & _
+                "<netbios_name>" & netbiosName & "</netbios_name>" & _
                 "<name>" & osName & "</name>" & _
                 "<version>" & osVersionMajor & "</version>" & _
                 "<release>" & osBuild & "</release>" & _