Leer Atributos de un archivo Visual Basic .NET Usando GetAttributes de System.IO: "Private Sub Cargar_info_Arc()
Dim Info As FileInfo = My.Computer.FileSystem.GetFileInfo(txtUbicacion.Text)
lblTamano.Text = 'Tamaño: ' + Info.Length.ToString()
lblCreado.Text = 'Creado:' + Info.CreationTime
lblAcceso.Text = 'Ultimo Acceso: ' + Info.LastAccessTime
If (File.GetAttributes(txtUbicacion.Text) And FileAttributes.ReadOnly) = FileAttributes.ReadOnly Then
chkSoloLectura.Checked = True
End If
If (File.GetAttributes(txtUbicacion.Text) And FileAttributes.Hidden) = FileAttributes.Hidden Then
chkOculto.Checked = True
End If
If (File.GetAttributes(txtUbicacion.Text) And FileAttributes.System) = FileAttributes.System Then
chkSistema.Checked = True
End If
End Sub"
No hay comentarios:
Publicar un comentario