Darf das nicht jeder wissen wie es funktioniert oder warum PN?

IPs%=CountHostIPs(GetEnv("localhost"));Anzahl aller verfügbaren IPs auf dem Computer erfassen
For index=1 To IPs%
	DIM_IP%(index-1)=HostIP(index)
	DIM_DotIP$(index-1)=DottedIP(HostIP(index))
Next

For index=1 To IPs%
	ipconfig=ReadFile(path$+"ipconfig.txt")
	While Not Eof(ipconfig)
		Config_txt$=ReadLine(ipconfig)
		If Instr(Config_txt$,LAMA_DotIP$(index-1)) Then
			LAMA_txt$=ReadLine(ipconfig)
			SubMask$=Right(LAMA_txt$,Len(Config_txt$)-Instr(Config_txt$,":")-1)
			CountHostIPs(SubMask$)
			DIM_BroadCastIP%(index-1)=INT_IP(DIM_IP%(index-1) Or (~HostIP(1)))
		EndIf
	Wend
	CloseFile ipconfig
Next
DeleteFile path$+"ipconfig.txt"

IntIP funktion:
Function INT_IP%(IP$)
	Local P1=Instr(IP$,".")
	Local P2=Instr(IP$,".",P1+1)
	Local P3=Instr(IP$,".",P2+1)
	Return (Int(Mid(IP$,1,P1))*16777216)+(Int(Mid(IP$,P1+1,P2-P1))*65536)+(Int(Mid(IP$,P2+1,P3-P2))*256)+Int(Mid(IP$,P3+1,-1))


zu späteren zeitpunkten kann man so alle broadcast-ips die generiert wurden aus dem Dim feld auslesen.
Darunter ist auch die hamachi broadcast ip, die von pc pc verscheiden natürlich auch an einer anderen index-stelle gefunden wurde.

einfach bei einer serversuche an alle broadcast ips senden. Mitsicherheit wird auch derjenige der über hamachi zu erreichen ist auf die nachricht reagieren und antworten.

Der vorteil davon ist, wenn man einen server auf dem pc erstellt, kann er mit hamachi mitgliedern und dem eigenen netzwerk gelichzeitig kommunizieren.

Bei mir klappt diese art und weise seit monaten.

lg Chrise
End Function