__CopyFile

Função que Copia arquivos entre dois diretórios.

Exemplo da Rotina:

__CopyFile('arq_origem.txt', 'arq_destino.txt')

Exemplo 1- Copiando arquivo de qualquer diretório para a Protheus Data:

//Bibliotecas
#Include 'Protheus.ch'

/*/{Protheus.doc} zTeste
Função de Teste
@type function
@author Terminal de Informação
@since 13/11/2016
@version 1.0
	@example
	u_zTeste()
/*/

User Function zTeste()
	Local aArea := GetArea()

	//Copia o arquivo
	__CopyFile('E:\teste.txt', '\teste_copiado.txt')

	RestArea(aArea)
Return

Exemplo 2- Copiando arquivo de qualquer diretório para qualquer diretório:

//Bibliotecas
#Include 'Protheus.ch'

/*/{Protheus.doc} zTeste
Função de Teste
@type function
@author Terminal de Informação
@since 13/11/2016
@version 1.0
	@example
	u_zTeste()
/*/

User Function zTeste()
	Local aArea := GetArea()

	//Copia o arquivo
	__CopyFile('E:\teste.txt', 'E:\teste_novo.txt')

	RestArea(aArea)
Return

Exemplo em Vídeo:

Clique nesse link para ver um exemplo em Vídeo da nossa Maratona de Exemplos.

Observações:

– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;

Referências:

Universo AdvPL