Quero demonstrar um exemplo de como copiar um arquivo usando um comando es.abra();
Vamos copiar um arquivo chamado nome.exe para nome_copia.exe, após a operação abra o arquivo cópia e veja que ele é executado como se fosse o original.
veja:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
//primeiro abra o arquivo como leitura binária a = es.abra('nome.exe' , 'leiturabin'); //depois leia o arquivo: se a entao tmp = a:leia("*t"); //o *t faz ler o arquivo todo a:feche(); senao imprima'erro ao tentar abrir arquivo'; fim //abra um arquivo em modo escrita binária b = es.abra( 'nome_copia.exe' , 'escritabin'); //agora copie o conteudo tmp para este arquivo: se b entao b:escreva( tmp ); b:feche(); imprima('arquivo copiado com sucesso!'); senao imprima'erro ao tentar abrir arquivo'; fim |
Troque ‘nome.exe’ pelo nome do seu arquivo alvo que pode ser um vídeo, uma imagem, um som etc.
E isso aí, qualquer dúvida não hesite em perguntar. Até mais!