FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Enviar archiovo a una direcci贸n URL
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Enviar archiovo a una direcci贸n URL
Posted: Thu Jan 25, 2018 07:43 PM
Hola Amigos:

con el siguiente c贸digo de VB se env铆a un archivo (fichero) a una direcci贸n URL
Code (fw): Select all Collapse
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
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Enviar archiovo a una direcci贸n URL
Posted: Thu Jan 25, 2018 11:54 PM
This is how to use filesystem in (x)Harbour
Code (fw): Select all Collapse
oFs   := CreateObject( "Scripting.FileSystemObject" )
oFs:CopyFile( cSource, cDestination )
Regards



G. N. Rao.

Hyderabad, India
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Enviar archiovo a una direcci贸n URL
Posted: Fri Jan 26, 2018 12:56 AM

Mr. Rao:

Thanks a lot, I'll try your sample.

Regards

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

Continue the discussion