Undersøge rettigheder på folder-niveau?

Jeg mangler et script eller et program....! --jowns--

Du kan bruge denne funktion, som returnere attributter:

Dim fs, f, s

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folderspec)
At = f.Attributtes

Variablen, At returnere værdier i følge nedenstående specifikation.

Constant Value Description

Normal 0 Normal file. No attributes are set.
ReadOnly 1 Read-only file. Attribute is read/write.
Hidden 2 Hidden file. Attribute is read/write.
System 4 System file. Attribute is read/write.
Volume 8 Disk drive volume label. Attribute is read-only.
Directory 16 Folder or directory. Attribute is read-only.
Archive 32 File has changed since last backup. Attribute is
read/write.
Alias 64 Link or shortcut. Attribute is read-only.
Compressed 128 Compressed file. Attribute is read-only.

Er det nok forklaring. ?

Der har indsneget sig en tyrk-fejl. Det hedder:

At = f.Attributes

Man kan test At på denne måde:

if At and 1 then
  Response.Write("Read-only" & "<br>")
end if

I øvrigt kan At også anvendes til at ændre attributer, hvis man har de nødvendige rettigheder.

Jeg skulle have en liste med hvilke brugere af systemet (folderne) der har hvilke rettigheder!

En folder er en mappe.

Det kan godt ske at der oprettes en folder for hver bruger på en NT - men den indeholder ikke den enkeltes rettigheder.

Tak for hjælpen! Kunne dog ikke bruge din løsning, men du skal selvfølgelig have nogle point alligevel! Du får 100p! Håber det er iorden!

Jeg brugte istedet denne component: http://www.aspuser.com/

--jowns--

tak - selom jeg misforstod.