La Web del Programador: Comunidad de Programadores
 
    Pregunta:  40538 - XCOPY EN POWER BUILDE
Autor:  Elkin Rios
Buenos Dias.
Le pido el favor me colaboren con lo siguiente, necesito hacer que en un programa de power buider pueda copyar todo un directori con su contenido de un lugar a otro pero que sea desde windows y no por DOS

Gracias

  Respuesta:  Jesus Chem
No se que versión de powerbuilder estes utilizando, pero puedes usar las funciones CreateDirectory() y Filecopy() en la versión 8

  Respuesta:  Victor
Hola Elkin:

Este es un ejemplo que encontre de como copiar archivos desde Windows:

Declare:Global Function Externa
FUNCTION Boolean CopyFileA(String lpExistingFileName, String lpNewFileName, &
Boolean bFailIfExists) Library "kernal32"

y Agrega el sig. Script:

boolean lb_Success

string ls_FromFile, ls_ToFile

ls_FromFile = "C:\temp\origen.txt"

ls_ToFile = "C:\otro_dir\destino.txt" o el mismo nombre de archivo

lb_Success = CopyFileA(ls_FromFile, ls_ToFile, False)

IF not lb_Success THEN
// function call failed
END

Espero te sirva, si son varios archivos usa listbox para leer todos los archivos y haz un ciclo.
attte.