IBSecurityService w Builderze

ďťż

IBSecurityService w Builderze ďťż

IBSecurityService w Builderze
Zobacz wiadomości

Cytat
A gdyby tak się wedrzeć na umysłów górę, / Gdyby stanąć na ludzkich myśli piramidzie, / I przebić czołem przesądów chmurę, / I być najwyższą myślą wcieloną. . . Juliusz Słowacki, Kordian

Indeks BCB i MySQL subiekt gt fototapeta

Witamy

IBSecurityService w Builderze

Rafian - 13-03-2006 11:21
IBSecurityService w Builderze
Witam.
Mam wielki problem z użyciem tego komponentu.
Chciałbym za jego pomocą wyświetlić listę wszystkich użytkowników bazy i
nie wychodzi mi.
Robię tak:

DM1->IBSecurityService1->Params->Add("user_name=SYSDBA");
DM1->IBSecurityService1->Params->Add("password=masterkey");
DM1->IBSecurityService1->ServerName=IP;
DM1->IBSecurityService1->Active=true;
TUserInfo *user;
user->FirstName = DM1->IBSecurityService1->FirstName;

Dostaję błąd przy ostatniej lini: Class EIBClientError "start Parametrs
missing or incorrect"

Proszę o pomoc bo już mi się pomysły skończyły.
Pozdrawiam, Raf

wloochacz - 13-03-2006 11:21

Rafian napisał(a):
> Witam.
> Mam wielki problem z użyciem tego komponentu.
> Chciałbym za jego pomocą wyświetlić listę wszystkich użytkowników bazy i
> nie wychodzi mi.
> Robię tak:
>
> DM1->IBSecurityService1->Params->Add("user_name=SYSDBA");
> DM1->IBSecurityService1->Params->Add("password=masterkey");
> DM1->IBSecurityService1->ServerName=IP;
> DM1->IBSecurityService1->Active=true;
> TUserInfo *user;
> user->FirstName = DM1->IBSecurityService1->FirstName;
>
> Dostaję błąd przy ostatniej lini: Class EIBClientError "start Parametrs
> missing or incorrect"
>
Tak ma być:
DM1->IBSecurityService1->ServerName="IP_SERWERA:sciezka_do_bazy_danych";
np.
DM1->IBSecurityService1->ServerName="127.0.0.1:C:\bazy\bazka.fdb";

--
wloochacz

Rafian - 13-03-2006 11:22

wloochacz napisał(a):

>> Dostaję błąd przy ostatniej lini: Class EIBClientError "start
>> Parametrs missing or incorrect"
>>
> Tak ma być:
> DM1->IBSecurityService1->ServerName="IP_SERWERA:sciezka_do_bazy_danych";
> np.
> DM1->IBSecurityService1->ServerName="127.0.0.1:C:\bazy\bazka.fdb";

Nic to nie daje.
Jednak po to właściwie zastosowałem ten komponent abym, nie musiał
podawać ścieżki do pliku, ponieważ jeżeli znam ścieżkę do pliku bazy
danych to mogę ją otworzyć czymkolwiek.

wloochacz - 13-03-2006 11:22

> Nic to nie daje.
W takim razie polecam zapoznanie się z demo...

> Jednak po to właściwie zastosowałem ten komponent abym, nie musiał
> podawać ścieżki do pliku, ponieważ jeżeli znam ścieżkę do pliku bazy
> danych to mogę ją otworzyć czymkolwiek.
Bzdura - user nie musi (ba! nie powinien mieć) dostępu do tego pliku. A
tak po prostu się podaje ConnectionString w FB...
Poza tym w FB jest taki fajny plik konfiguracyjny jak Aliases.conf

--
wloochacz

Rafian - 13-03-2006 11:23

wloochacz napisał(a):
>> Nic to nie daje.
> W takim razie polecam zapoznanie się z demo...
>
>> Jednak po to właściwie zastosowałem ten komponent abym, nie musiał
>> podawać ścieżki do pliku, ponieważ jeżeli znam ścieżkę do pliku bazy
>> danych to mogę ją otworzyć czymkolwiek.
> Bzdura - user nie musi (ba! nie powinien mieć) dostępu do tego pliku. A
> tak po prostu się podaje ConnectionString w FB...
> Poza tym w FB jest taki fajny plik konfiguracyjny jak Aliases.conf

Ja to wszystko rozumiem, miałem na myśli nie fizyczny dostęp ale
ścieżkę, którą mogę wpisać do komponentu database, ale nie w tym rzecz,
dalej jakoś nie mogę odczytać listy userów z bazy, kiedy active ustawiam
na true, wszystko wygląda o.k ale w IBSecurityService1->FirstName mam NULL.
Usunąłem linię IBSecurityService1->ServiceStart(), która generowała błąd
Proszę o pomoc.

Morff - 13-03-2006 11:23

Dnia 07-03-2006 o 07:02:11 Rafian <rafian_spam_nie@gazeta.pl> napisał:

> Usunąłem linię IBSecurityService1->ServiceStart(), która generowała błąd
> Proszę o pomoc.

moze nalezało poprostu zajrzeć do helpa od interbase ? jest tam taki
przykład :

procedure TForm1.Button4Click(Sender: TObject);

var
I: Integer;
begin
with IBSecurityService1 do
begin
ServerName := 'Poulet';
LoginPrompt := False;
Params.Add('user_name=sysdba');
Params.Add('password=masterkey');
Active := True;
Memo1.Lines.Clear;
try
DisplayUsers;
for I := 0 to UserInfoCount - 1 do
begin
with UserInfo[i] do
begin
Memo1.Lines.Add('User Name : ' + UserName);

Memo1.Lines.Add('Name: ' + FirstName + ' ' + MiddleName + ' '
+ LastName);
Memo1.Lines.Add('UID: ' + IntToStr(UserId));
Memo1.Lines.Add('GID: ' + IntToStr(GroupId));
Memo1.Lines.Add('-----------------------------------');
end;
end;
finally
Active := False;
end;
end;
end;

--
Pozdrawiam
Morff
----------------------
AQQ 141151
Powered by Opera/M2

Morff - 13-03-2006 11:23

Dnia 07-03-2006 o 07:02:11 Rafian <rafian_spam_nie@gazeta.pl> napisał:

> Usunąłem linię IBSecurityService1->ServiceStart(), która generowała błąd
> Proszę o pomoc.

Zapomniałem ze chodzi ci o buidelar .. dla cedodaćdodać jest taki przykład
:

void __fastcall TForm1::Button1Click(TObject *Sender)

{
IBSecurityService1->ServerName = "Poulet";
IBSecurityService1->LoginPrompt = false;
IBSecurityService1->Params->Add("user_name=SYSDBA");
IBSecurityService1->Params->Add("password=masterkey");
IBSecurityService1->Active = true;
try
{
Memo1->Lines->Clear();
IBSecurityService1->DisplayUsers();
for (int i = 0; i < IBSecurityService1->UserInfoCount; i++)
{
TUserInfo *UI = IBSecurityService1->UserInfo[i];

Memo1->Lines->Add("User Name: " + UI->UserName);
Memo1->Lines->Add("Name: " + UI->FirstName + " " + UI->MiddleName
+ " " + UI->LastName);
Memo1->Lines->Add("UID: " + IntToStr(UI->UserID));
Memo1->Lines->Add("GID: " + IntToStr(UI->GroupID));
Memo1->Lines->Add("-----------------------------------");
}
}
__finally
{
IBSecurityService1->Active = false;
}
}

--
Pozdrawiam
Morff
----------------------
AQQ 141151
Powered by Opera/M2

Rafian - 13-03-2006 11:23

Morff napisał(a):
> Dnia 07-03-2006 o 07:02:11 Rafian <rafian_spam_nie@gazeta.pl> napisał:
>
>> Usunąłem linię IBSecurityService1->ServiceStart(), która generowała błąd
>> Proszę o pomoc.
>
> moze nalezało poprostu zajrzeć do helpa od interbase ?

Należało, ale nie mogę znaleźć tego HELPA, mam developer studio 2006 i
właśnie nie mogę namierzyć w nim przykładów?
Brakowało mi DisplayUsers(); po tym wszystko gra.
Bardzo dziękuję za pomoc.
--
Pozdrawiam, Raf

Oracle Report Builder 6i - problem z układem ramek W jakiej postaci wystepuje report builder for oracle? Builder 5.0 + Microsoft SQL Serwer 2000 Postgresql+ODBC+BDE+Borland C++ Builder 6.0 Problem z listenerem w Oracle Forms Builder C++ Builder 6 + ZEOS , jak zainstalowac komponenty Oracle Forms Builder - biblioteka Reports Builder problem Oracle Form Builder =?iso-8859-2?Q?Jak_wyr=F3wna=E6_tonalnie_dwa_obrazki?=

Cytat

Decede mihi sole - nie zasłaniaj mi słonca.
Gdy kogoś kochasz, jesteś jak stworzyciel świata - na cokolwiek spojrzysz, nabiera to kształtu, wypełnia się barwą, światłem. Powietrze przytula się do ciebie, choćby był mróz, a ty masz w sobie tyle radości, że musisz ją rozdawać wokoło, bo się w tobie nie mieści
Hoc fac - tak czyń.
A tergo - od tyłu; z tyłu.
I czarne włosy posiwieją. Safona

Free website template provided by freeweblooks.com

Darmowy hosting zapewnia PRV.PL