Sessão do usuário

Delphi

03/04/2006

Boa tarde,

Alguém sabe com fazer para identificar o endereço IP da estação de trabalho de um usuário que está utilizando uma aplicação do banco de dados, no caso Oracle?

Obrigado

Airton


Airoosp

Airoosp

Curtidas 0

Respostas

Paullsoftware

Paullsoftware

03/04/2006

para pegar o IP do Micro vc pode usar:
[b:a8003f3370]uses WinSock[/b:a8003f3370]

var
  p : PHostEnt;
  s : array[0..128] of char;
  p2 : pchar;
begin
  GetHostName(@s, 128);
  p   := GetHostByName(@s);
  p2  := iNet_ntoa(PInAddr(p^.h_addr_list^)^);
 Label1.Caption := p^.h_Nome;//Aqui pego o Nome do Micro da Rede
 Label2.Caption := p2;//Aqui passo o IP do Micro


espero ter ajudado :wink:


GOSTEI 0
Airoosp

Airoosp

03/04/2006

Entendi, acontece que eu preciso saber esta informação utilizando recursos do próprio Oracle, através da view v$session foi possível identificar o nome do usuário que esta utilizando a aplicação mas não o endereço IP da estação deste usuário.
O fórum da SQLMagazine é o mesmo da ClubeDelphi, certo?


Obrigado


GOSTEI 0
POSTAR