Muszę napisać program który po wykryciu połączenia z internetem automatycznie wyśle mój adres ip w pliku tekstowym na serwer ftp. U mnie wszystko jest ok, ale u kumpla który oprócz neostrady ma jeszcze lana nie działa tak jak bym chciał. Dokładniej: Zamiast wysyłać adres neostrady(83.x.x.x) wysyła adres jaki ma przypisany do karty sieciowej(192.x.x.x).
Korzystałem z tego:
var
wVersionRequested:WORD;
wsaData:TWSAData;
p:PHostEnt;
s:array[0..128] of char;
p2:pchar;
GetHostName(@s, 128);
p := GetHostByName(@s);
p2:=iNet_ntoa(PInAddr(p^.h_addr_list^)^);
Co zrobić aby pobierało adres neostrady lub ewentualnie oba adresy?