- Operating mode in Windows Vista (and later)
- Equivalence
- Equivalence
fSaveText (Function) In french: fSauveTexte Syntax
<Result> = fSaveText(<Name and path of the text file> , <Content>)
<Result>: Boolean - True if the operation was successful,
- False otherwise. To find out the error details, use ErrorInfo associated with the errMessage constant.
<Name and path of the text file>: Character string (with quotes) Name and full (or relative) path of text file to create. A UNC path can be used.
Versions 15 and later New in version 15
Versions 17 and later New in version 17 <Content>: Character string (with quotes) String containing the content of the file.
This page is also available for…
|
|
|
| |
| | https://youtu.be/ygTOfO7xjcU
https://windevdesenvolvimento.blogspot.com/2019/05/dicas-2122-windev-webdev-mobile-xml-23.html
FOR EACH ROW OF TABLE_NOTAS_MANIFESTO IF TABLE_NOTAS_MANIFESTO.COL_11_Xml_Nota<>"" THEN conteudo_xml is string=TABLE_NOTAS_MANIFESTO.COL_11_Xml_Nota arquivo_nome is string="C:\TEMP\XML_"+TABLE_NOTAS_MANIFESTO.COL_02_NUMERO_NOTA+".XML" fSaveText(arquivo_nome,conteudo_xml) END END
|
|
|
|
| |
| |
| |
|
| abrir,modificar,gravar e Fechar Texto |
|
| abrir,modificar,gravar e Fechar Texto
EDT_Text1="" _arquivo is string="E:\ALEVA\TESTE\AMARILDO.TXT" _arquivo_id is int=fOpen(_arquivo,foReadWrite) IF _arquivo_id<>-1 THEN slinha is string="" LOOP slinha=fReadLine(_arquivo_id) IF slinha=EOT THEN BREAK ELSE EDT_Text1+=slinha+CR END END END fClose(_arquivo_id)
//Salvar Arquivo
_arquivo is string="E:\ALEVA\TESTE\AMARILDO.TXT" fSaveText(_arquivo,EDT_Text1)
//Blog com Video e exemplo http://windevdesenvolvimento.blogspot.com.br/2016/09/curso-windev-arquivos-015-arquivos_8.html https://www.youtube.com/watch?v=H9ZgfJ-vQ3s
|
|
|
|
| |
| |
| |
|
| Ler Tabela Cliente e Gravar Txt Mobile |
|
| Ler Tabela Cliente e Gravar Txt Mobile
//Nessa aula vou ensinar como ler tabela cliente e gravar em txt no Mobile //This class will teach how to read and write customer table in txt in Mobile //Cette classe vous apprendra à lire et à écrire la table des clients dans txt à Mobile
s_nome_arquivo is string=CompleteDir(fCurrentDir())+"nome_arquivo.txt" n_arquivo is int=fCreate(s_nome_arquivo) //ver se arquivo deu erro IF n_arquivo=-1 THEN Info("erro na criação arquivo",ErrorInfo()) RETURN END s_monta is string="" FOR EACH ROW OF TABLE_Cliente HReadSeekFirst(cliente,id_cliente,TABLE_Cliente.COL_Id_cliente) s_monta+="DADOS|" s_monta+=cliente.id_cliente+"|" s_monta+=cliente.razao_social_nome+"|" s_monta+=cliente.telefone+CR END s_monta+="FIM|" EDT_Texto_importar=s_monta fSaveText(s_nome_arquivo,s_monta)
//proxima aula vou ler o txt e gravar no arquivo //next class will read the .txt and write to the file //la classe suivante va lire le .txt et écrire dans le fichier
//Blog com Video e Exemplo http://windevdesenvolvimento.blogspot.com.br/2016/06/windev-mobile-65-matos-pedido-20-ler.html https://www.youtube.com/watch?v=WQa93EJSGyE
|
|
|
|
| |
| |
| |
| |
| |
| |
| | |
|