Ms-Dos - ¿Có hago para copiar un archivo y/o una carpeta mediante un .vbs?

 
Vista:

¿Có hago para copiar un archivo y/o una carpeta mediante un .vbs?

Publicado por dxedwxb (1 intervención) el 28/06/2017 04:03:35
¿Cómo puedo hacer un .vbs que me permita elegir entre copiar y mover un archivo o carpeta de un lugar a otro y que al final me permita elegir si quiero renombrar el archivo copiado?

Pensé que podría hacerlo así:

1
2
3
4
5
6
7
8
9
Set ShellApp = CreateObject("Shell.Application")
Set Ret = ShellApp.BrowseForFolder(0, "Seleccione la Carpeta a copiar", 16384)
Set Fin = ShellApp.BrowseForFolder(0, "Seleccione el destino", 16384)
 
rem para carpetas
xcopy (Ret.Self.Path) (Fin.Self.Path)
 
rem para archivos
copy (Ret.Self.Path) (Fin.Self.Path)

Pero me sale error.

Gracias de antemano!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder