Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

MS SQL Определение логина пользователя

well © (2007-06-15 15:49:00)
Программа использует базу MS SQL. Пользователь подключается под своим логином и паролем, прописанным в MS SQL.
Подключение к программе производится с помощью ADO компонентов (ADOConnection).

Как определить во время работы программы, какой именно пользователь подключился? Тоесть его Логин и возможно пароль.

Anatoly Podgoretsky (2007-06-18 19:07:00) [1]
> Reindeer Moss Eater (18.06.2007 17:43:06) [6]

А вот отдаст ли Борланд - это большой вопрос.

sniknik (2007-06-18 18:01:00) [2]
> но SELECT suser_sname() мне больше нравиться.
правильно, оно универсальнее, а анализ строки (который в принципе не обязателен т.к. есть вариант [1]) не пройдет с вариантом строки приведенным в [2].

Reindeer Moss Eater (2007-06-18 17:43:00) [3]
Эта команда SQL... А как мне получить результат в Борланде?

Выполнить команду и результат "придет в Борланд"

well (2007-06-18 17:40:00) [4]

>
> well (15.06.07 15:49)
> SELECT suser_sname()

Эта команда SQL... А как мне получить результат в Борланде?

Вообще пароль мне не нужен :).
Логин я получил путём анализа строки подключения, но SELECT suser_sname() мне больше нравиться.
Подскажите, как мне выполнить эту команду и получить результат?
Команду я полагаю с помощью компонента ADOCommand. А вот результат?

Ega23 (2007-06-15 16:50:00) [5]

> suser_sname()

Блин. Точно. А я всё вспоминаю-вспоминаю...

Anatoly Podgoretsky (2007-06-15 16:41:00) [6]
> sniknik (15.06.2007 16:12:02) [2]

И неперехватываемым

sniknik (2007-06-15 16:12:00) [7]
Ega23 © (15.06.07 15:56) [1]
попробуй эту строку подключения... (для локального MSSQL, для другого компа нужно его указать)
Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False

well (15.06.07 15:49)
SELECT suser_sname()

пароль принципиально "неузнаваем"

Ega23 (2007-06-15 15:56:00) [8]
Login := ADOConnection.Properties['User ID'].Value
Password := ADOConnection.Properties['Password'].Value;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »