Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 3 Próxima »

Retorna o conteúdo de um arquivo do tipo texto.

Sintaxe

MemoRead( < cFile >, [ lChangeCase ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cFile

caractere

Indica o caminho completo (diretório + nome) do arquivo que será lido, do tipo texto.

X

 

lChangeCase

lógico

Indica se altera o caminho apontado por cFile para letras minúsculas ou não.

 

 

Retorno

Nome

Tipo

Descrição

lRet

lógico

Retorna o conteúdo do arquivo texto, ou uma string vazia ("") em caso de erro.

Observações

  • A função lê arquivos texto (string terminada com caracter 0) no server e no client.
  • A leitura terá limite de tamanho de 65535 bytes.
  • Se o parâmetro <lChangeCase> estiver com o valor .T., o nome do arquivo em <cFile> será colocado em letra minúscula, caso contrário, será mantido o valor.
  • O valor padrão de lChangeCase é .T.. A partir da build 7.00.121227A, o valor padrão de lChangeCase para Logix é .F..
  • A partir da build 7.00.120420A, o valor padrão de lChangeCase, para Linux, pode ser sobrescrito modificando o valor da chave CaseSensitive, na seção General, do arquivo ini do TOTVS | Application Server. Essa mudança impacta outras funções que também tratam arquivos.
  • Em ambiente Windows, os nomes de arquivos não possuem diferenciação entre maiúsculo e minúsculo, logo, a função conseguirá abrir o arquivo <cFile> independente do valor definido no parâmetro <lChangeCase>. Em ambiente Linux ou Mac, o nome dos arquivos respeita a diferenciação.
  • Em caso de erro, utilize a função FError para maiores detalhes.

Exemplos

Exemplo 1
User Function Teste
  // Retorna conteúdo do arquivo TXT
  Local cLine := MemoRead( "c:\dir\test.txt" )
  
  // Verifica o número de linhas no texto
  Local nLines := MLCount( cLine )
  
  // Varre todas as linhas do texto
  For nX := 1 To nLines
    MsgAlert( MemoLine( cLine, , nX ) )
  Next nX
Return

Abrangência

Microsiga Protheus 8.11, Protheus 10, TOTVS Application Server 10, ByYou Application Server

Veja também

 

  • Sem rótulos