IBM Lotus Symphony


Instrucción SetAttr [Ejecución]

Establece la información de atributo para un archivo especificado.

Sintaxis:

SetAttr NombreArchivo As String, Atributo As Entero

Parámetros:

NombreArchivo: nombre del archivo, incluida la vía de acceso, cuyos atributos desea probar. Si no especifica una vía de acceso, SetAttr busca el archivo en el directorio actual. También puede utilizar la notación de URL.

Atributo: patrón de bits que define los atributos que desea establecer o borrar:

Valor

0: archivos normales

1: archivos de sólo lectura

32: el archivo ha cambiado desde la última copia de seguridad (bit de archivo).

Puede establecer varios atributos combinando los valores respectivos con una sentencia de OR lógico.

Códigos de error

5 Inicio del proceso no válido

53 No se encuentra el archivo

70 Permiso denegado

Ejemplo:

Sub ExampleSetGetAttr

On Error Goto ErrorHandler REM Definir destino para manejador de errores

If Dir("C:\test",16)="" Then MkDir "C:\test"

If Dir("C:\test\autoexec.sav")="" THEN Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav"

SetAttr "c:\test\autoexec.sav" ,0

Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav"

SetAttr "c:\test\autoexec.sav" ,1

print GetAttr( "c:\test\autoexec.sav" )

end

ManejadorError:

Print Error

end

end sub


Comentarios del producto | Documentación adicional | Marcas registradas