Hi,
ich habe zu erst mit Hilfe von
Luckies CheckFileAccess
http://www.michael-puff.de/Programmi...leAccess.shtml
Und dann mit der
JEDI variante probiert.
Delphi-Quellcode:
function CheckAccessToFile(
DesiredAccess: DWORD; const FileName: WideString): Boolean;
var FileObject : TJwSecureFileObject;
begin
FileObject := TJwSecureFileObject.Create(FileName);
try
result := FileObject.AccessCheck(DesiredAccess);
finally
FileObject.Free;
end;
end;
Jedoch funktioniert beides nicht.
Auf einem Windows 2003 Server R2 befindet sich ein Verzeichnis auf einer Freigabe mit besonderen Rechten für einen Domänen-Benutzer.
Versuche ich jetzt auf einem Rechner (Windows 7 Ultimate oder WinXP SP3) im Netzwerk mit einem lokalen Benutzer
(Benutzername & Passwort ist gleich wie beim Domänen-Benutzer) die Rechte abzufragen bekomme ich
als Antwort das keine Rechte gesetzt sind. Merkwürdig wird es versuche ich die Abfrage auf einem anderen
Unterverzeichnis auf der Freigabe erhalte ich die Informationen über die Rechte.
Abfrage mit lokalem Benutzer
\\server\share\Test <- Keine Rechte
\\server\share\Docs <- Rechte sind gesetzt
Abfrage mit Domänen-Benutzer
\\server\share\Test <- Rechte sind gesetzt
\\server\share\Docs <- Rechte sind gesetzt
Melde ich mich mit dem Domänen-Benutzer an den Rechnern an dann klappt alles und ich erhalte als
Antwort das die Rechte gesetzt sind. Auch wenn mein Programm meldet das keine Rechte gesetzt sind
ins Verzeichnis rein gehen, Dateien erstellen oder löschen usw. ist alles dennoch möglich.
Hat irgendjemand eine Idee was das soll?