ViewVC Help

View File | Revision Log | Show Annotations | Revision Graph | Root Listing

root/i-scream/experimental/host/vb_net_test/nettest.frm

Comparing experimental/host/vb_net_test/nettest.frm (file contents):
Revision 1.20 by pjm2, Mon Feb 26 09:12:51 2001 UTC vs.
Revision 1.21 by pjm2, Mon Feb 26 09:23:34 2001 UTC

#	Line 159 | Line 159 | Dim TCPUpdateTime As Integer
159		Dim protocolVersion As String
160		Dim connected As Boolean
161
162	<	'Dim CUpTime As New CUpTime
162	>	Dim CUpTime As New CUpTime
163
164		Dim responseNumber As Integer
165
#	Line 168 | Line 168 | Private Sub Form_Load()
168		protocolVersion = "1.1"
169
170		Status.Caption = "Loading"
171	<	'Form1.Caption = "i-scream Winhost " & protocolVersion & " for " & GetVersion()
171	>	Form1.Caption = "i-scream Winhost " & protocolVersion
172
173	+	Form1.Show
174	+
175	+	CUpTime.Init
176	+
177	+	If CUpTime.isWin9x Then
178	+	x = MsgBox("Sorry, the i-scream host can only be used to monitor servers (i.e. not Win9x)", 48, "Not a server.")
179	+	End
180	+	End If
181	+
182		''''TEMP
183		'filterManagerHostname = "killigrew.ukc.ac.uk"
184		'filterManagerTCPPort = 4567
#	Line 370 | Line 379 | Private Sub Timer1_Timer()
379		End
380		End If
381
382	<	osName = getVersion()
382	>	osName = GetVersion()
383		osVersionMajor = verinfo.dwMajorVersion
384		osVersionMinor = verinfo.dwMinorVersion
385		osBuild = verinfo.dwBuildNumber

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines