IDalConnectionExt.PasswordExpired

Синтаксис

PasswordExpired: Boolean;

Описание

Свойство PasswordExpired возвращает истек ли срок действия пароля пользователя.

Комментарии

Если свойство возвращает True, то срок действия пароля истек, если False – то пароль действителен. Если данное свойство возвращает True, то нельзя вызывать все методы IDalConnection, следует использовать метод ChangeExpiredPassword для изменения пароля.

Пример

Sub UserProc;

Var

MB: IMetabase;

Driv: IDalDriver;

ConnectDesc: IDalConnectionDescriptor;

ConnectDescParams: IDalConnectionDescriptorParams;

connection_ext : IDalConnectionExt;

connection_ext_desc: IDalConnectionDescriptorExt;

dal_con :IDalConnection;

Begin

MB := MetabaseClass.Active;

Driv := New DalOrcl8Driver.Create;

ConnectDesc := Driv.CreateDescriptor;

ConnectDescParams := ConnectDesc.Params;

ConnectDescParams.Find("User Name").Value := "student_p5";

ConnectDescParams.Find("Password").Value := "student_p5";

ConnectDescParams.Find("Host BSTR").Value := "test";

ConnectDescParams.Find("Schema").Value := "student_p5";

connection_ext_desc := ConnectDesc As IDalConnectionDescriptorExt;

dal_con := connection_ext_desc.CreateConnectionExt(True);

connection_ext := dal_con As IDalConnectionExt;

If connection_ext.PasswordExpired Then

connection_ext.ChangeExpiredPassword("student00");

End If;

End Sub UserProc;

После выполнения примера будет создано подключение к БД, в случае если срок действия пароля пользователя истек, то он будет изменен.

См. также:

IDalConnectionExt