DateLastAccessed (Propiedad)

           

Descripción

Devuelve la fecha y hora a la que se produjo un acceso a una carpeta o archivo especificados por última vez. Sólo lectura.

Sintaxis

objeto.DateLastAccessed

El objeto es siempre un objeto File o Folder.

Comentarios

El código siguiente demuestra la utilización de la propiedad DateLastAccessed con un archivo:

Sub ShowFileAccessInfo(filespec)
    Dim fs, f, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFile(filespec)
    s = UCase(filespec) & vbCrLf
    s = s & "Creado: " & f.DateCreated & vbCrLf
    s = s & "Último acceso: " & f.DateLastAccessed & vbCrLf
    s = s & "Última modificación: " & f.DateLastModified  
    MsgBox s, 0, "Información de acceso al archivo"
End Sub

Importante   El comportamiento de este método depende del sistema operativo. Si el sistema operativo no proporciona información de la hora o la fecha, no se devolverá ninguna información.