Como puedo poner una barra de progreso en una descarga
con la clase turl
FUNC x_( cGUARDAR , cCOMO )
Local oUrl //"http://www.tuservidorweb.com/veract.txt" )
Local oClient
cGUARDAR:=ALLTRIM(cGUARDAR)
cCOMO :=ALLTRIM(cCOMO)
oUrl := tURL():New(cGUARDAR)
oClient := tIPClient():New( oUrl )
oClient:nConnTimeout = 20000
oClient:Open( oUrl )
oClient:ReadToFile( cCOMO ) //"newver.txt" )
oClient:Close()
retu .t.
ME INTERESA FW Y XHB POR SER OPEN SOURCE
