Получение логина и айпи юзера

← →
Сатир (2006-02-28 14:40) [0]

У меня есть клиент-серверное приложение, написанное на Delphi с использованием TSocketConnection. Нужно в сервере логировать имя пользователя и название такчки в локалке(или её айпи), который залогинился на сервере.
Кто знает, с помощью каких средств это можно сделать?

← →
DSKalugin © (2006-02-28 16:27) [1]

Win32 API
GetUserName()
GetComputerName()

← →
Сатир (2006-02-28 16:59) [2]

> GetUserName()
> GetComputerName()

эти функиции возвращают юзера и имя тачки, на которой запущен сервер, а нужно с той, с которой было подключение

← →
Zeqfreed © (2006-02-28 17:07) [3]

Нужно воспользоваться

> GetUserName()
> GetComputerName()

в клиенте и передать данные на сервер.

← →
DSKalugin © (2006-02-28 18:07) [4]

2 Zeqfreed

Умному и намека достаточно :-)

← →
Сатир (2006-02-28 19:07) [5]

дело в том, что у меня БД Оракл
и в соответсвующие поля значения записываются через системные ф-ции оракла, например
IP_ADDRESS sys_context("USERENV", "IP_ADDRESS")
OS_USER sys_context("USERENV", "OS_USER")
TERMINAL sys_context("USERENV", "terminal")
Вопрос? у кого-то есть описание этих ф-ций и значения параметров, которые можно в них передавать?

← →
Сатир (2006-02-28 19:20) [6]

где находится описание ф-ции sys_context? в доке по ораклу не нашёл...

Сатир (28.02.06 19:20) [6]

По-моему во тут:
http://www.google.com/search?q=sys_context

← →
Сатир (2006-02-28 19:44) [8]

ладно, от использования/модификации sys_context пока решил отказаться
и воспользовался ф-циями
GetUserName()
GetComputerName()
нашел в сети несколько примеров по использовании этих ф-ций и заметил, что пример использования GetComputerName() указан с ошибкой.

var LoggedUser,ComputerName:string;
nsize,nsize2: Cardinal;
ch,ch2 : array[0..1000] of Char;

begin
GetUserName(ch,nsize);
LoggedUser:=ch;
nsize2:=MAX_COMPUTERNAME_LENGTH + 1;
GetComputerName(ch2,nsize2);
ComputerName:=ch2;

Авторы забыли указать выделенную строку, без неё имя компа оперделяется неверно

Всем спасибо за советы.

Получение логина и айпи юзера Найти похожие ветки