Test Foro de elhacker.net SMF 2.1

Programación => Scripting => Mensaje iniciado por: sisti en 18 Junio 2009, 11:53 AM

Título: Permisos sobre carpetas y archivos vbs
Publicado por: sisti en 18 Junio 2009, 11:53 AM
Hola,

estoy haciendo un script con lo siguiente:

Introduzco un numero de proyecto en una InputBox y me crea una carpeta. Despues de esa carpeta creo unas subcarpetas. A esas subcarpetas quiero ponerles permisos individuales, como el no poder las carpetas ni borrarlas

como podria hacer esto?
Título: Re: Permisos sobre carpetas y archivos vbs
Publicado por: Novlucker en 18 Junio 2009, 13:41 PM
Permisos? o atributos de archivo?

Atributos
Código (vb) [Seleccionar]
Set objfso = createobject("scripting.filesystemobject")
Set fol = objfso.getfolder("C:\Carpeta") 'obtenemos el control sobre la carpeta
fol.attributes = 1 'solo lectura


Donde el valor de atributo puede ser alguno de los siguientes

Valor
0
1
2
4
8
16
32
64
128
Atributo
Normal
Solo Lectura
Oculto
Sistema
Letra de disco
Carpeta/directorio
Archivo
Link o acceso directo
Comprimido
Permisos
Para los permisos puedes hacer uso del comandos CACLS de ms-dos
http://support.microsoft.com/kb/162786/es

Saludos