Enviar archiovo a una dirección URL

[Armando]

Hola Amigos:

con el siguiente código de VB se envía un archivo (fichero) a una dirección URL

Code: Select all | Expand

My.Computer.FileSystem.CopyFile("Ready/RYS01J-" + txtFolio.Text + ".txt", "\\10.25.60.8\Intermedios\RYS01J-" + txtFolio.Text + cont.ToString + ".txt", True)
 

Con que código de Harbour/FWH puedo hacer lo mismo????
Algún hilo por donde deba yo tirar?

Saludos

[nageswaragunupudi]

This is how to use filesystem in (x)Harbour

Code: Select all | Expand

oFs   := CreateObject( "Scripting.FileSystemObject" )
oFs:CopyFile( cSource, cDestination )
 

[Armando]

Mr. Rao:

Thanks a lot, I'll try your sample.

Regards