Einzelnen Beitrag anzeigen

Ati

Registriert seit: 16. Okt 2003
Ort: Gelsenkirchen
406 Beiträge
 
Delphi 3 Professional
 
#17

Re: Firebird+Roles+Rechte

  Alt 18. Aug 2006, 11:23
Irgendeine Kleinigkeit mache ich wohl noch falsch. Also wenn ich die SP in IBExpert ausführe funktioniert alles. Versuche ich die SP durch mein Delphi/Lazarus-Programm aufzurufen kommt eine Fehlermeldung (s.Anhang). Aber es gibt ja eindeutig diesen User. HAbe zu Testzwecken auch mal einen weiteren angelegt aber auch mit dem klappt es nicht. Hier mal mein Code:
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var user,rolle,pass:String;
begin
  user:=upcase(eduser.Text);
  pass:=edpass.Text;
  qrlog.sql.text:='select * from SP_GETROLESONUSER('''+user+''')';
  qrlog.open;
  label3.Caption:=qrlog.FieldByName('THEROLES').AsString;
end;
Ati
Miniaturansicht angehängter Grafiken
sp2_641.jpg  
Ich weiß das ich nichts weiß

Sokrates
  Mit Zitat antworten Zitat