Quote:
Originally Posted by HackTec
Pings :
| | | Pingurl(0) = "205.251.197.89" | | Pingurl(1) = "205.251.198.207" | | Pingurl(2) = "205.251.194.62" | | Pingurl(3) = "205.251.193.250" | | Pingurl(4) = "205.220.178.52" | | Pingurl(5) = "205.220.166.52" | | Pingurl(6) = "148.78.116.4" | | Pingurl(7) = "148.78.112.4" | | Pingurl(8) = "148.78.113.4" | | Pingurl(9) = "148.78.114.4" | | Pingurl(10) = "199.255.40.41" | | Pingurl(11) = "157.197.176.16" | | Pingurl(12) = "93.186.137.138" | | Pingurl(13) = "93.186.137.224" | | Pingurl(14) = "93.186.137.250" | | Pingurl(15) = "52.119.232.134" | | Pingurl(16) = "35.71.102.101" | | Pingurl(17) = "35.71.117.101" | | Pingurl(18) = "35.71.64.119 " | | Pingurl(19) = "35.71.119.100" | | Pingurl(20) = "13.248.73.78 " | | Pingurl(21) = "35.71.75.0 " | | Pingurl(22) = "35.71.111.128" | | Pingurl(23) = "35.71.101.100" | | Pingurl(24) = "35.71.105.131" |
sind noch nicht alle dabei aber die eu-w server sollten alle dabei sein.
den rest der daten zieht er aus
Small Update
|
If you know the Ports, you can use this code:
Code:
Dim LoginServer As New TcpClient
Try
' Ip and Port
LoginServer.Connect(svrip, svrport)
' Server Online
lblSvrStatus.Text = "Server Online"
lblSvrStatus.ForeColor = Color.Lime
Catch Excep As Exception
' Server Offline
lblSvrStatus.Text = "Server Offline"
lblSvrStatus.ForeColor = Color.Red
End Try
With this code, you are directly communicating with the "GameServer" not just with the IP.