Obtendo informações de um arquivo

Discussão em 'Arquivos e Impressoras' iniciado por FernandaSantos, Janeiro 27, 2009.

  1. FernandaSantos

    FernandaSantos Membro Participativo

    Código:
    FILE-INFO:FILE-NAME = "C:\arquivo.txt". 
    
    MESSAGE 'Nome Arquivo..: ':U   FILE-INFO:FULL-PATHNAME SKIP 
            'Pasta.........: ':U   FILE-INFO:PATHNAME      SKIP 
            'Tipo Arquivo..: ':U   FILE-INFO:FILE-TYPE SKIP 
            'Data Criacao..: ':U   FILE-INFO:FILE-CREATE-DATE SKIP 
            'Hora Criacao..: ':U   STRING(FILE-INFO:FILE-CREATE-TIME,'HH:MM:SS':U) SKIP 
            'Data Criacao..: ':U   FILE-INFO:FILE-MOD-DATE SKIP 
            'Hora Criacao..: ':U   STRING(FILE-INFO:FILE-MOD-TIME,'HH:MM:SS':U) SKIP 
            'TAMANHO.....: ':U     FILE-INFO:FILE-SIZE 
            VIEW-AS ALERT-BOX INFO BUTTONS OK. 

Compartilhe esta Página