Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
Pagetitle | ||||
---|---|---|---|---|
|
Função: MemoRead
Retorna
...
o
...
conteúdo
...
de
...
um
...
arquivo
...
do
...
tipo
...
texto.
Sintaxe
Bloco de código | ||
---|---|---|
| ||
MemoRead( <cFile> cFile >, [ lChangeCase ] )--> cText
|
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
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
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
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas