[VB6] Conoscere il proprio indirizzo IP

[ranza!!!123]

come posso trovare l'indirizzo ip al quale sono connesso in rete?magari tramite il winsock?
grazie

[oregon]

Per evitare incomprensioni, di quale IP parli?

Puoi essere piu' preciso?

[ranza!!!123]

quello ke ci identifica su internet...diciamo NON quello interno di rete...

[oregon]

Per quello, ho scritto un esempio di codice di poche righe ...

Dim o As Object
Dim IIP As String

Set o = CreateObject("InetCtls.Inet")
IIP = o.OpenURL("http://pchelplive.com/ip.php")
MsgBox ("Internet IP: " & IIP)

Set o = Nothing

... penso possa esserti utile

[ranza!!!123]

in pratica ti manda sul sito e preleva l'IP giusto?
ok funziona...

ps nn c'è un modo + "carino"...cioè qualcosa ke interagisca con windows...oppure qualke API...mi sembra strano ke si possa fare solo così...

cmq grazie

[oregon]

Windows non puo' sapere quale e' l'IP pubblico usato se questo viene nattato (anche piu' di una volta) ...

[ranza!!!123]

scusa l'ignoranza ma cosa vuol dire nattato??
e poi se vado sull'icona della connessione e vado su Stato li me lo dice...cm mai nn c'è modo d prelevarlo da li?

[oregon]

Ecco vedi ... i soliti equivoci ...

Mi hai detto che non volevi l'IP privato (quello interno di rete).

Poi si scopre che sei collegato ad internet NON attraverso una rete locale ma con un IP pubblico ...

Avresti potuto dirlo prima ... no?

[oregon]

Quindi ... se inserisci un controllo Winsock e il codice

MsgBox Winsock1.LocalIP

cosa viene visualizzato?

[ranza!!!123]

mi viene fuori 192.168.0.3 ke è il codice della lan...
ma io sono collegato direttamente a internet tramite modem...a me è quell'IP ke serve sapere...grazie