Hey,
indem folgenden Source wird immer nur der erste Server abgeragt
indem folgenden Source wird immer nur der erste Server abgeragt
VB.NET-Quellcode
- Private Sub servercheck()
- If My.Computer.Network.Ping(Server1) = True Then
- Server = Server1
- MsgBox(Server)
- ElseIf My.Computer.Network.Ping(Server2) = True Then
- Server = Server2
- MsgBox(Server)
- ElseIf My.Computer.Network.Ping(Server3) = True Then
- Server = Server3
- MsgBox(Server)
- Else
- Timer1.Start()
- End If
- End Sub