Nicht angemeldet.
Hier können Sie Ihre eigenen Skripte und UDF's veröffentlichen undanderen zum Download anbieten oder von anderen herunterladen
Func _getipfromhostname($sHostname) Local $sPingPID = Run(@ComSpec & " /c ping " & $sHostname & " /4 /n 1", @SystemDir, @SW_HIDE, 0x8) While True Local $sLine = StdoutRead($sPingPID) If @error Then ExitLoop If StringRegExp($sLine, "\[.*\]") = 1 Then Local $aReturnIP = StringRegExp($sLine, "\[.*\]", 1) Return StringTrimRight(StringTrimLeft($aReturnIP[0], 1), 1) EndIf WEnd Return SetError(0, @extended, -1) EndFunc ;==>_getipfromhostname
Dauerhaft angemeldet bleiben?