Pegar Ip ... Urgente

vfc · Setembro 3, 2004

eu preciso de alguma coisa q retorne uma string do IP externo ( o ip q você recebe quando entra na net ) do pc q ta rodando o programa !!!

me ajudem !!!!!

vlwwwwwwwww

lxl_igor_lxl · Setembro 3, 2004

não sei se e esse o ip que você quer mas tente , ai vai o codigo

Private Sub Form_Load()
Label1.Caption = Winsock1.LocalIP
End Sub

não esqueca que você precisa do componente winsock no seu form

rodfraga · Setembro 3, 2004

Para retornar uma string(como você pediu):

Dim varIP As String
varIP = CStr(Winsock.LocalIP)

E como o Igor disse, não esqueça de adicionar o Winsock ao projeto.

William Rodrigues · Setembro 4, 2004

Aí vfc...

Seja bem vindo ao fórum....Somos todos uma família cara...

Fique a vontade para postar, mandar PM, EMail e etc.

Boa brothers (lxl_igor_lxl, aragorn13)

Abraços,

William Rodrigues

Pergunta