Hi alle zusammen, ich arbeite gerade an einen Programm wo alle IP's im Netz geping werden und dann augelistet werden
Spoiler anzeigen
#include <A3LIPAddress.au3>
Global $name = 1
$gui = GUICreate("Network Manager",230,170)
$ipi = _IPAddress_Create($gui,10, 15)
_IPAddress_SetAddressStr($ipi,@IPAddress1)
$label1 = GUICtrlCreateLabel(" - ",148,19, 13, 13)
$ipinput = GUICtrlCreateInput("255" ,167, 15, 44, 20)
$Updown = GUICtrlCreateUpdown(-1)
GUICtrlSetLimit(-1, 255, "1")
$button = GUICtrlCreateButton ("Go",130, 40, 40)
$listview = GUICtrlCreateListView(" IP | Name ",10, 70, 210, 90)
$abcip=StringSplit(@IPAddress1,".")
$label2 = GUICtrlCreateLabel("Ready",20,45,80)
GUISetState(@SW_SHOW)
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $button
$ip2 = $abcip[1] & "." & $abcip[2] & "." & $abcip[3] & "."
While 1
For $x = $abcip[4] to GUICtrlRead($ipinput)
$ip = $ip2 & $x
GUICtrlSetData($label2, $ip)
$ping = Ping ($ip,50)
If $name = 1 Then
If $ip = @IPAddress1 Then
$iptoname = @ComputerName & "(Your PC)|"
EndIf
Else
$iptoname = ""
EndIF
If Not @error Then
GUICtrlCreateListViewItem($ip&"|"&$iptoname, $listview)
EndIf
Next
WEnd
EndSelect
WEnd
Das Problem ist: Es fäng immer erst ab der einenen Ip zu Pingen an und wie mache ich einen "Pause" Button, der die schleife unterbricht bis man sie fortsezt...help
Falls noch jemand Ideen einfallen, plz Schreib es dazu!