|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
20.01.2009, 16:52 | #1 |
Иркутянин!!!
Пользователь
Регистрация: 01.11.2006
Сообщений: 83
|
Access + ADO + Delphi = Поиск по базе
Есть таблица со списком логинов-паролей пользователей компом. Моя програмка при запуске просит у пользователя авторизироваться, чтоб получить дальнейшие привилегии. Помогите осуществить поиск по базе введенного логина и сверки пароля.
Использую DBGrid+ADOTable+DataSource Желательно исходник с комментариями для дальнейшего обсуждения. ПС: Поиск по форуму и гуглу ничего полезного и толкового новичку в работе с СУБД не дал, просьбы туда не посылать. Последний раз редактировалось vicvtor; 20.01.2009 в 16:59. Причина: Добавил немного причинности сего вопроса. |
20.01.2009, 18:14 | #2 |
delphi-ст!
Форумчанин
Регистрация: 02.01.2009
Сообщений: 825
|
а что сложного? сформируйте запросик в sql что то типа "select * from tabl where (login= login and password=pass) и если sql.count<>0 то рулите правами а если нет то очистите все в текстбоксах!!!
вступлю в команду разработчиков ПО на Delphi
|
20.01.2009, 18:16 | #3 |
Иркутянин!!!
Пользователь
Регистрация: 01.11.2006
Сообщений: 83
|
не знаю mySQL((
|
20.01.2009, 18:17 | #4 |
delphi-ст!
Форумчанин
Регистрация: 02.01.2009
Сообщений: 825
|
давайте название таблицы с паролями
вступлю в команду разработчиков ПО на Delphi
|
20.01.2009, 18:31 | #5 |
Иркутянин!!!
Пользователь
Регистрация: 01.11.2006
Сообщений: 83
|
Имя базы base.mdb, в ней таблица Users, состоящая из колонок id,User,Login,Password,Rules. При входе в прогу читаются вводимые пользователем log и pas, далее идел поиск в базе по колонке Login строки log, если такая запись есть, то сверяется пароль, иначе пользователя просят зарегистрироваться)
|
20.01.2009, 18:46 | #6 |
delphi-ст!
Форумчанин
Регистрация: 02.01.2009
Сообщений: 825
|
кинь на форму adoquery
в событии onclick кнопки Код:
Код:
вступлю в команду разработчиков ПО на Delphi
Последний раз редактировалось maladoy; 20.01.2009 в 18:53. |
20.01.2009, 18:49 | #7 |
Форумчанин
Регистрация: 31.10.2008
Сообщений: 500
|
Более правильно было бы через Параметры ...
Skype : UASm1Le.
|
20.01.2009, 18:54 | #8 |
delphi-ст!
Форумчанин
Регистрация: 02.01.2009
Сообщений: 825
|
объясните пожалуйста!!! я послушаю с превеликим удовольствием!!!!
вступлю в команду разработчиков ПО на Delphi
|
20.01.2009, 18:59 | #9 |
Иркутянин!!!
Пользователь
Регистрация: 01.11.2006
Сообщений: 83
|
Немного поболтпв с фЁдОром сделал так....
if form4.ADOQuery1.Locate('login; password', VarArrayOf([log, pas]),[]) then showmessage('Неправильно') и в свойстве sql для adoquery прописал select * from users и поставил active в true. Работает. Теперь возник немного другой вопрос, как мне туда добавить еще незарегистрированных пользователей, посредством все тех же sql запросов? |
20.01.2009, 19:00 | #10 |
Форумчанин
Регистрация: 31.10.2008
Сообщений: 500
|
Код:
Код:
Skype : UASm1Le.
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите пожалуйста сделать поиск по базе данных в форме! Access 2003 | LilijaSt | Microsoft Office Access | 19 | 25.12.2010 10:13 |
access+delphi+ado | aid_013 | БД в Delphi | 2 | 10.07.2010 09:28 |
Delphi <--> ADO <--> Access | acid02 | БД в Delphi | 4 | 09.04.2009 16:29 |
БД Access + Delphi, ADO. по сети | Cyn4uk | БД в Delphi | 4 | 04.01.2008 00:06 |
Delphi+ADO+Access | Turpa | Помощь студентам | 12 | 15.10.2007 23:29 |