Guten Abend
Ich wollte mal fragen ob mir jmd helfen kann,
es geht darum das ich gerne eine ip abfragen möchte und als Lable wieder geben möchte wenn diese off oder on ist
leider weiss ich nicht wie das genau geht
danke im vorraus
Detroit49
Server abfragen
-
- [ gelöst ]
-
Detroit49 -
5. September 2011 um 19:01 -
Geschlossen -
Erledigt
-
-
Hallo Detroit49,
wie wäre es mit
ZitatPing
Pingt einen anderen Computer an und gibt die Laufzeit zurück.
Ping ( "address/hostname" [, timeout] )
Quelle: dt. Hilfe
mfg autoBert
-
ja da habe ich schon versucht geht super,was ich vergessen habe zu sagen ist
das ich auch die ports fragen muss
1 server ip 123.4.56.789:12345
2 server ip 123.4.56.789:12346
3 server ip 123.4.56.789:12347
und da wollte ich den status abfragen -
Das einfachste ist zu verbinden, und wenn ein Fehler kommt, dann ist der Port zu oder der Server offline.
MfG, James
-
ja da weiss ich auch
meine frage ist jetzt aber wie ich die 3 ip´s mit 3 anderen pots in eine abfrage bekomme -
Wieso in eine Abfrage?
Was ist so schlimm an 3 Abfragen? -
weil ich kein port anpingen kann
und mit TCPListen geht es nicht$var = TCPListen("123.456.78.910",250)
If $var Then; Es geht auch If @error = 0 Then ...
Msgbox(0,"Status","Online, Antwortzeit war:" & $var)
Else
Msgbox(0,"Status","Es ist ein Fehler mit der Nummer " & @error & " aufgetreten.")
EndIf -
1. Ich hab nie von Ping geredet.
2. TCPListen erstellt einen Server (siehe Hilfe)
Was ich meinte war 3x TCPConnectMfG, James
-
Es gibt ja auch TCPConnect
Edit: Zu langsam
-
- Offizieller Beitrag
Du musst auch TCPConnect benutzen, nicht TCPListen.
Edit: zu spät.
-
ahh ok danke euch
-
also ich weiss nicht was ich falsch mache aber es geht einfach nicht
egal welche ip ich eingebe ich bekomme immer ein online zurück
[autoit]$var = TCPConnect("999.99.99.999,29999",250)
[/autoit]
If $var Then; Es geht auch If @error = 0 Then ...
Msgbox(0,"Status","Online, Antwortzeit war:" & $var)
Else
Msgbox(0,"Status","Es ist ein Fehler mit der Nummer " & @error & " aufgetreten.")
EndIf
selbst hierlol ich hannes !!!
tcp sollte man ja auch mal starten wa -
[autoit]
[/autoit]
TCPStartup()
TCPConnect($IP_Adresse, $Port)
If @error = 1 Then
; IP Adresse ist offline
ElseIf @error = 2 Then
; Port ist zu
EndIf
TCPShutdown() -
Danke aber dies geht auch nicht
ich bekomme immer das die ip geht
ich kann mir das aber nicht erklären da ich es auch bekomme wenn der server offline isthier das script
[autoit];CLIENT!!!!!!!! Starte zuerst den SERVER!!
[/autoit][autoit][/autoit][autoit]
$IP = "xxxxxxxxx" ;IP
$Port = "56871"
; Startet den TCP Service
;==============================================
TCPStartUp(); Verbindet zu einem lauschenden "SOCKET"
[/autoit]
;==============================================
$socket = TCPConnect( $IP,$Port)
If $socket Then
Msgbox(0,"Status","Online, Antwortzeit war:")
Else
Msgbox(0,"Status","Es ist ein Fehler mit der Nummer " & @error & " aufgetreten.")
EndIf -
- Offizieller Beitrag
Du darfst nicht mit
[autoit]If $socket Then
[/autoit]
prüfen, denn wie bereits in der Hilfe steht:ZitatFailure: Returns -1 or 0 and set @error.
Du erhälst vermutlich "-1" zurück und das wertet AutoIt als TRUE.James1337 hat Dir bereits gezeigt, wie man es richtig macht.
-
ich muss dies jedoch in einem label wieder geben
[autoit]
[/autoit][autoit][/autoit][autoit]
$status0 = " online"
$status1 = "offline"
;########IP RANGE####
$server = "xxx.x.xx.xxxx"$port = "xxxxx"
[/autoit]
TCPStartUp()
$socket = TCPConnect( $server, $port )
If $socket = -1 Then
GUICtrlSetData($Button1,$status1)
Else
GUICtrlSetData($Button1,$status0)
TCPCloseSocket ($socket)
EndIf
WEnd
so geht es wunderbar frage ist nur kann man es noch vereinfachen?