Hallo!
Ich habe da eine Funktion damit ich herausfinden kann ob auf einem PC VNC läuft.
Spoiler anzeigen
[autoit]
Func PortScan($port, $ip)
TCPStartUp()
Opt("TCPTimeout",50)
$socket = TCPConnect($ip, $port)
If $socket = -1 Then
$c = "0x000000"
$reg = ""
Return $c
Else
TCPCloseSocket($socket)
$c = "0x00bf00"
Return $c
EndIf
TCPShutdown()
EndFunc
Es funktioniert auch, nur wenn man auf einen PC gelangt, der den Dienst nicht ausführt, braucht es ewig bis das Script zum nächsten PC weiter geht.
Meine Frage lautet, wie kann ich das beschleunigen, bzw. gibt es eine andere (einfache) Lösung, um herauszufinden ob ein Dienst (VNC) auf einem PC im Netzwerk läuft?
Danke im Vorhinein