Página 1 de 1
Pessoal tem como saber o IP da maquina
Enviado: 30 Nov 2007 18:30
por helio
Pessoal estou querendo saber o IP da maquina que estar sendo rodando o sistema.
Valeu antecipadamente,
Helio Beltrao Jr.
helio@hrbinfo.com.br
Enviado: 30 Nov 2007 20:39
por sygecom
Código: Selecionar todos
PROCEDURE GetIp()
LOCAL aHosts
LOCAL cName
Local cEstacao:=netname(.f.)
InetInit()
aHosts := InetGetHosts( cEstacao )
IF aHosts == NIL
aHosts := InetGetAlias( cEstacao )
ENDIF
IF Empty(aHosts)
aHosts := InetGetAlias( cEstacao )
ENDIF
InetCleanup()
RETURN ahosts[1 ]
Enviado: 30 Nov 2007 20:57
por helio
Valeu pela forca funcionou Beleza.
Um Abraco,
Enviado: 01 Dez 2007 18:36
por sygecom
qualquer coisa prende o grito !!!
Pessoal tem como saber o IP da maquina
Enviado: 26 Dez 2011 22:29
por alberto_dias
Sygecom,
Boa noite,
Estou precisando do ip da máquina local
e usei o seu exemplo mas ao compilar,
esta dando um erro uresolved external
_hb_fun_inetinit, _hb_fun_inetgethosts,
_hb_fun_inetgetalias, _hb_fun_inetcleanup
vc poderia me dar uma dica do que preciso
fazer,
Muito obrigado,
ALBERTO DIAS
Pessoal tem como saber o IP da maquina
Enviado: 29 Dez 2011 22:40
por alberto_dias
Sygecom, boa noite,
Seu exemplo está perfeito, está funcionando,
)
Perfeito,
Atenciosamente,
ALBERTO DIAS
Pessoal tem como saber o IP da maquina
Enviado: 06 Jan 2012 15:56
por Mário Isa
vc colocou algum include ou .lib ?
Pessoal tem como saber o IP da maquina
Enviado: 06 Jan 2012 16:45
por Pablo César
Acredito que teria que linkar com xhb.
Em MiniGui é muito fácil isso. Coloquei aqui dois exemplo compilado e com os fontes que pertencem ao C:\MiniGUI\samples\BASIC\IPADDRESS do HMG Extended.