Número De Linhas De Um Arquivo De Texto

[igorSM]

Como posso saber o número de linhas de um arquivo de texto? e de um arquivo salvo em binário(como uma imagem(jpg acho))?

Igor

[Graymalkin]

Para um arquivo texto você fazer pode duas coisas: abri-lo e ler linha por linha até o final do mesmo (usando um contador para saber a quantidade de linhas) ou abri-lo, ler o conteúdo dele todo para uma variável e dividir a variável pelo ENTER para um vetor, daí pegar o último índice do vetor e somar +1 (daí você terá a quantidade de linhas).

E, arquivos binários não tem linhas, porque não existe um separador (que, no caso do arquivo texto, é o ENTER). Com arquivos binários geralmente se utiliza apenas o tamanho (em bytes) dos mesmos.

Abraços,

Graymalkin

[igorSM]

Então como eu faria para ler o conteúdo inteiro de um arquivo em binário para uma variável... eu li um post seu sobre usar o comando Get, mas como eu uso ele?

[Graymalkin]

Para ler um arquivo inteiro você pode fazer assim:

n=freefile()
open "arquivo.ext" for binary as #n
conteúdo = input(lof(n), n)
close #n

Na variável "conteúdo" você terá todo o arquivo. O mesmo vale para arquivos texto, basta trocar o Binary por Input.

Abraços,

Graymalkin

[igorSM]

Obrigado. Funcionou direitinho