Copiar archivos en RED LAN

[Roger]

Amigos del foro deseo poner botón donde pueda copiar archivos del servidor a otro punto de la red LAN como respaldo del sistema.

intente con estos comandos

MOVE "\\Roger-pc\d\VET-SALVADOR\debug\*.dat" TO RUTA-INICIAL.
MOVE "\\Desktop-skgdvut\d\VET-SALVADOR\debug" TO RUTA-RESPALDO.
CALL "CBL_COPY_FILE2" USING RUTA-INICIAL RUTA-RESPALDO RETURNING STATUS-CODE.

no funciona

[Kuk]

Roger, intenta con:


MOVE "\\Roger-pc\d\VET-SALVADOR\debug\*.dat" & X"00" TO RUTA-INICIAL.
MOVE "\\Desktop-skgdvut\d\VET-SALVADOR\debug" & X"00" TO RUTA-RESPALDO.
CALL "CBL_COPY_FILE2" USING RUTA-INICIAL RUTA-RESPALDO RETURNING STATUS-CODE.

[Roger]

No logro que funcione probe de esa forma y nada.

[Kuk]

Roger, joe me acabo de dar cuenta que tienes un asterisco por ahí. ¡Esto es imposible, tienes que copiarlos uno a uno! Haciendo un bucle. Puedes usar el control CmFile para saber cuántos ficheros hay a copiar.

[Hrmcobol]

Hola Amigos, con un comando como:

INVOKE DDE1 "Execute" USING "c:\copiar.bat" POW-SWSHOWMINIMIZED.

Nunca lo probé pero debería andar

Saludos

[Roger]

Probe con la opcion de KUK y Hrmcobol no funciona

logre con esta sintaxix
MOVE "c:\WINDOWS\SYSTEM32\CMD.EXE /C XCOPY /E \\Roger-pc\d\VET-SALVADOR\*.* \\Desktop-skgdvut\d\VET-SALVADOR" TO RUTA.
INVOKE pow-self "execute" USING RUTA POW-SWHIDE.

Hasta ahi todo bien, pero como siempre los clientes hacen la ilogica en uno de ellos el sistema operativo no esta en c:\WINDOWS\SYSTEM32\ sino en F:\WINDOWS\SYSTEM32\ y como por programa pongo C: no lo reconoce por esto no queria usar este comando y buscaba una alternativa, podrian decir cambia de C a F el software esta en un instalador en CD y por lo tanto no se donde lo instalara el cliente.
¿Como hacen ustedes una copia espejo?

[Kuk]

Roger, debes obtener la variable de entorno WINDIR si quieres saber dónde está instalado Widnows. Además, %WINDIR%\system32 está en las rutas priotarias de búsqueda de programas, así que los programas que están en esta carpeta pueden llamarse sin indicar la ruta completa. Con lo cual, debería funcionarte así:


MOVE "CMD.EXE /C XCOPY /E \\Roger-pc\d\VET-SALVADOR\*.* \\Desktop-skgdvut\d\VET-SALVADOR" TO RUTA.
INVOKE pow-self "execute" USING RUTA POW-SWHIDE.