25/10/2004, 04:12
|
 | | | Fecha de Ingreso: noviembre-2003 Ubicación: Madrid
Mensajes: 849
Antigüedad: 21 años, 5 meses Puntos: 1 | |
| puedes copiar archivos incluso si estan abiertos de esta manera:
Dim Copiado
Dim Archivo
Set Archivo = CreateObject("Scripting.FileSystemObject")
Copiado = Ruta & "\" & Nombre_archivo & ".txt"
Archivo.copyfile Copiado, "c:\BD\" & Nombre_archivo & ".txt"
__________________
El sexo sin amor es una experiencia vacía. Pero como experiencia vacía es una de las mejores.
Woody Allen |