--- experimental/host/vb_net_test/nettest.frm	2001/02/23 17:31:44	1.16
+++ experimental/host/vb_net_test/nettest.frm	2001/02/23 17:37:04	1.17
@@ -2,14 +2,15 @@ VERSION 5.00
 Object = "{248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0"; "MSWINSCK.OCX"
 Object = "{33155A3D-0CE0-11D1-A6B4-444553540000}#1.0#0"; "SysTray.ocx"
 Begin VB.Form Form1 
-   BorderStyle     =   4  'Fixed ToolWindow
+   BorderStyle     =   3  'Fixed Dialog
    Caption         =   "i-scream Winhost"
    ClientHeight    =   5655
    ClientLeft      =   45
-   ClientTop       =   285
+   ClientTop       =   330
    ClientWidth     =   4710
    LinkTopic       =   "Form1"
    MaxButton       =   0   'False
+   MinButton       =   0   'False
    ScaleHeight     =   5655
    ScaleWidth      =   4710
    ShowInTaskbar   =   0   'False
@@ -67,6 +68,23 @@ Begin VB.Form Form1 
       _Version        =   393216
       Protocol        =   1
    End
+   Begin VB.Label Label5 
+      Caption         =   "b e t a"
+      BeginProperty Font 
+         Name            =   "MS Sans Serif"
+         Size            =   24
+         Charset         =   0
+         Weight          =   700
+         Underline       =   0   'False
+         Italic          =   0   'False
+         Strikethrough   =   0   'False
+      EndProperty
+      Height          =   615
+      Left            =   240
+      TabIndex        =   8
+      Top             =   120
+      Width           =   1815
+   End
    Begin VB.Label Label2 
       Alignment       =   1  'Right Justify
       Caption         =   "Next heartbeat:"
@@ -396,7 +414,7 @@ Private Sub Timer1_Timer()
               "</os>" & _
               "<memory><total>" & memTotal & "</total><free>" & memFree & "</free></memory>" & _
               "<swap><total>" & swapTotal & "</total><free>" & swapFree & "</free></swap>" & _
-              ""
+              "</packet>"
         Text4.Text = Text4.Text + xml
 
         ' Use the first winsock control to send a UDP packet.