Frage zu Packagesending und IP Adresse

[FoGzone]

Folgendes:
Ich bin momentan dran ein kleines Tool zu schreiben (D3), in dem ich Packagesending benutze. Jetzt ist es aber so, sobald ich die Lobby verlasse und ein neues Spiel betrete sich die IP Adresse verändert, da sich der Client ja immer wieder auf unterschiedliche Server verbindet.

Gibt es also eine Funktion/Methode mit der ich die aktuelle IP Adresse eines Fensters/Prozesses auslesen und in einer Variablen speichern kann? Manuell komme ich ganz leicht ran.

Alles was ich bis jetzt zu dem Thema Packagebots etc gefunden habe, bezog sich auf feste IP Adressen, da sie für Browsergames konzipiert wurden.

[YatoDev]

Server haben auch feste ip adressen user auch ....
Pinge diese einfach an wie du den host rausfinden kannst kann ich dir nicht sagen und du hast damit sowieso keinen erfolg

[FoGzone]

Originally Posted by »FlutterShy™

Server haben auch feste ip adressen user auch ....
Pinge diese einfach an wie du den host rausfinden kannst kann ich dir nicht sagen und du hast damit sowieso keinen erfolg

entweder ich verstehe nich, was du mir mit deiner Antwort sagen willst oder du hast nicht verstanden was mein Problem ist.

Nochmal:
Ich starte das Spiel und logge mich -> Ich berete den Lobby Server
Anschließend betrete ich ein Spiel -> Ich betrete einen von 1000... Gameservern. (wird automatisch zugewiesen, welchen ich betrete und ist somit nicht immer der gleiche)

Und jetzt brauche ich die IP Adresse des Gameservers und da jeder dieser 1000... Gameservern eine eigene IP hat muss ich die bei jedem erneuten Betreten neu herausfinden und abspeichern.

Manuell bekomme ich ja die IP über CMD -> netstat -n und dann eben die richtige Zeile finden

[Achat]

#include <Array.au3>

_Netstat()

Func _Netstat()
	Local $iPID = Run(@ComSpec & ' /C netstat /n', @WindowsDir, @SW_HIDE, 3), $sStdOut = '', $aRegExp
	While 1
		$sStdOut &= StdoutRead($iPID)
		If @error Then ExitLoop
	WEnd
	ClipPut($sStdOut)
	While StringInStr($sStdOut, 'Status')
		$sStdOut = StringTrimLeft($sStdOut, 10)
	WEnd
	$aRegExp = StringRegExp($sStdOut, '(.[^\s]*+)\s+(.[^\s]*+)\s+(.[^\s]*+)\s+(.[^\s]*+)\s*', 3)
	Local $aNetStat[UBound($aRegExp) / 4][4] ; Protokoll|Lokale Adresse|Remoteadresse|Status

	For $i = 0 To UBound($aRegExp) - 4 Step 4
		$aNetStat[$i / 4][0] = $aRegExp[$i]
		$aNetStat[$i / 4][1] = $aRegExp[$i + 1]
		$aNetStat[$i / 4][2] = $aRegExp[$i + 2]
		$aNetStat[$i / 4][3] = $aRegExp[$i + 3]
	Next
	_ArrayDisplay($aNetStat, 'netstat /n')
EndFunc   ;==>_Netstat

MfG