Prøver og mekke sånn server check i vb.net
Men trengte litt hjelp med det. Kan noe forklare eller hjelpe meg med koden?
Eller hvorfor koden vil ikke virke?
Imports System.Net.Sockets
Public Class Form1
Private Sub PictureBox1_Click(sender As Object, e As EventArgs) Handles PictureBox1.Click
Dim ServerCheck As New TcpClient()
Try
ServerCheck.Connect("159.81.114.46", 8080)
Catch generatedExceptionName As Exception
Me.picture_ServerCheck.BackColor = Color.Red
End Try
If ServerCheck.Connected Then
Me.picture_ServerCheck.BackColor = Color.Green
ServerCheck.Close()
End If
End Sub
End Class
Koden sier selv at hvis serveren er online vil det vise farge grønt og ved offline vil det vise rødt.
Men det vriker ikke i det hele tatt!
