Título da Dica: Checando se um arquivo texto está em branco
Postada em 8/10/2000 por Webmaster
webmaster@vbweb.com.br
'Se o Arquivo ainda esta fechado use: If FileLen("NomeDoArquivo") = 0 Then Arquivo está em branco Else Arquivo tem conteúdo End If
'Se o Arquivo está aberto use: If LOF(ARQ) = 0 Then Arquivo está em branco Else Arquivo tem conteúdo End If