Pasar archivos desde un txt a otro txt

[rapbyone]

Amigos, estoy tratando de hacer lo siguiente, quiero traspasar el contenido de un txt a otro txt, algo así como esto:

Código (vb) [Seleccionar] Expandir

Open "C:\WINDOWS\system32\drivers\etc\hosts" For Output As "C:\version.cfg" 'se abre para escritura


muchas gracias amigos

[Mad Antrax]

Código (vb) [Seleccionar] Expandir


FileCopy Environ("SystemRoot") & "\system32\drivers\etc\hosts", "C:\version.cfg"


Así evitas que el usuario tenga la instalación de windows en otra partición y de error.

Saludos

[rapbyone]

Código (vb) [Seleccionar] Expandir


FileCopy Environ("SystemRoot") & "\system32\drivers\etc\hosts", "C:\version.cfg"


Así evitas que el usuario tenga la instalación de windows en otra partición y de error.

Saludos

Gracias estimado