Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];

Вниз

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

 
Сатир   (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? в доке по ораклу не нашёл...


 
Kerk ©   (2006-02-28 19:24) [7]

Сатир   (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;

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

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



Страницы: 1 вся ветка

Форум: "Прочее";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.042 c
2-1141927658
Хрюша
2006-03-09 21:07
2006.03.26
Запуск файлов


15-1141390901
keal
2006-03-03 16:01
2006.03.26
8 марта


15-1141127501
ISP
2006-02-28 14:51
2006.03.26
Ну что, пора и на мобилы антивирус ставить....?


1-1140796941
pasha_golub
2006-02-24 19:02
2006.03.26
Граф, но не дерево???


2-1141880160
Rado
2006-03-09 07:56
2006.03.26
dbgrid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский