Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Felder Zugriff - unsichtbar (https://www.delphipraxis.net/57064-felder-zugriff-unsichtbar.html)

needatip 15. Nov 2005 10:21

Datenbank: SQL Server • Version: 2000 • Zugriff über: ADO

Felder Zugriff - unsichtbar
 
Hallo zusammen.

Ich hab folgendes Problem.
Zum einen soll ein User Werte in eine Datenbank eintragen. Anschliessend soll dieser User später diese Daten nicht mehr sehen können.
d.h. er kann sie zwar vorerst eingeben aber später nicht mehr abrufen. (Ich weiss, hört sich paradox an, aber soll ich halt programmieren....)

Mach ich das über die Rechte des SQL Servers, oder muss ich das selbst progammieren ?

etwa so ?

Delphi-Quellcode:
if Username = 'Superuser' then
  //Feld anzeigen
  Field.visible = true
else
  //Feld nicht anzeigen
  Field.visibel = false;
end;
Oder gibt es in SQL Server eine Möglichkeit Feldinhalte je nach Rechtevergabe zu unterdrücken ?

Was wäre hier die beste Lösung ?

freak4fun 15. Nov 2005 10:29

Re: Felder Zugriff - unsichtbar
 
Hallo :hi:,
ob das der Server kann, kann ich dir leider nicht sagen. :( Aber eine kleine Vereinfachung allgemein. ;)

Delphi-Quellcode:
Field.visibel := (Username = 'Superuser');
MfG
freak

needatip 15. Nov 2005 11:09

Re: Felder Zugriff - unsichtbar
 
Danke hilft mir schon ein bisschen weiter, aber funktioniert das auch mit einer
Benutzergruppe von Windows Server ?

Field.visible := (Username = 'Usergruppe');

???

Luckie 15. Nov 2005 11:13

Re: Felder Zugriff - unsichtbar
 
So lange in den Klammer ein gültiger logischer Ausdruck steht, sicher. Aber das hat mit deinem Problem eiegntlich nichst zu tun.

marabu 15. Nov 2005 11:15

Re: Felder Zugriff - unsichtbar
 
Hallo.

SQL Server 2000 verfügt wie alle RDBMS über eine ausgefeilte Rechteverwaltung (GRANT, REVOKE). Dazu kannst du näheres in den SQL Online Books nachlesen, die du zusammen mit den Client-Komponenten installieren konntest. Den Zugriff solltest du über Sichten (CREATE VIEW) organisieren.

Grüße vom marabu


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:43 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz