Clipper On Line • Ver Tópico - Pegar número do IP

Pegar número do IP

Projeto Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

 

Pegar número do IP

Mensagempor Poka » 14 Out 2017 11:26

Olá a todos.

Esta função pega o numero do IP
O problema que executando do terminal da erro. ele pega do terminal não do servidor.
Como fazer para do terminal pegar o ip do servidor.
pensei em gravar um arquivo para salvar, mas aí volto a fazer como fazia antes.

func ip_pega
    local aHosts:={}
            local cName:="" 
            local cStation:=netName(.f.)
            inetInit()
            aHosts:=inetGetHosts(cStation)
            if aHosts == nil
               ahosts:=inetGetAlias(cStation)
            endif
            if empty(aHosts)
               aHosts:=inetGetAlias(cStation)
            endif
            inetCleanup()
retu aHosts[1]                        


Poka
Avatar de usuário

Poka
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 509
Data de registro: 25 Out 2004 21:26
Cidade/Estado: Leme/SP
Curtiu: 0 vez
Mens.Curtidas: 23 vezes



Retornar para Harbour

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 6 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro