| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как удалить пароль из Paradox-таблицы? [D5, Paradox]
nikolo © (2002-10-16 12:55:00)Привет! Как добавить пароль знаю, а вот как его удалить из Paradox-таблицы?
nikolo (2002-10-17 11:28:00) [1]Всем спасибо, проблему сам решил. Нужно заменить
bProtected := RESTRUCTURE_TRUE;
на
if Trim(PWord) > "" then bProtected := RESTRUCTURE_TRUE
else bProtected := False;
ВОПРОС СНЯТ!
nikolo (2002-10-17 10:58:00) [2]Да, насчет универсальных паролей - это круто!
Но проблема у меня не с хакерским взломом Paradox-таблиц, а просто мне надо, чтобы в моей проге я мог установить пароль на таблицу и удалить его. Установить могу, вот код:
Procedure AddMasterPassword(Tbl: TTable; PWord: string);
Const
RESTRUCTURE_TRUE = WordBool(1);
Var
TblDesc: CRTblDesc;
hDb: hDBIDb;
Begin
Tbl.Close;
Tbl.Exclusive := True;
try
Tbl.Open;
except
raise EDatabaseError.Create("Ошибка открытия таблицы!");
end;
FillChar(TblDesc, SizeOf(CRTblDesc), #0);
with TblDesc do begin
StrPCopy(szTblName, Tbl.TableName);
StrCopy(szTblType, szPARADOX);
StrPCopy(szPassword, PWord);
bProtected := RESTRUCTURE_TRUE;
end;
Check(DbiGetObjFromObj(hDBIObj(Tbl.Handle), objDATABASE, hDBIObj(hDb)));
Tbl.Close;
Check(DbiDoRestructure(hDb, 1, @TblDesc, nil, nil, nil, False));
Session.AddPassword(PWord);
End; {- AddMasterPassword -}
А как удалить пароль из таблицы?
Anatoly Podgoretsky (2002-10-16 21:01:00) [3]nikolo © (16.10.02 12:55)
Если это вообще возможно, то это надо делать через DbiDoRestructure
Покажи как добавляешь пароль, возможно ответ здесь
Дремучий (2002-10-16 20:39:00) [4]если надо открыть запароленную таблицу -
открывай ее с универсальным паролем
из ФАК
http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=988623247&n=14
nikolo (2002-10-16 17:23:00) [5]Народ! Помогите! Очень нужно!
nikolo (2002-10-16 16:48:00) [6]Нет, пустой пароль игнорирует, считает, что если подан пустой пароль, то типа ничего делать не надо, оставляет старый :(
bpv (2002-10-16 16:37:00) [7]а назначить пустой пароль не получается?
nikolo (2002-10-16 16:35:00) [8]> Mike Kouzmine, то что в Десктопе можно удалить это понятно, а как удалить програмно?
Mike Kouzmine (2002-10-16 14:01:00) [9]Открой в десктопе и удали
nikolo (2002-10-16 13:30:00) [10]Братцы, помогите!
| |
