Descarga ficheros grandes

[jesus_gesdemo]

Hola, tenemos una aplicación en la que los usuarios tienen que descargar manualmente desde el servidor unos archivos en PDF. Estos archivos, en ocasiones son muy grandes, en torno a los 80-100 Mb.

Para descargarlos, tengo un script asi:

Código XOne:

Function DescargarFic(nombreFichero)
Set obj01 = CreateObject("FileManager")
res = obj01.FileExists(cstr(nombreFichero))
if res = 0 then
else
    fic=cstr(appdata.CurrentEnterprise.variables("MAP_WEB_DESCARGA"))+cstr(nombreFichero)
    obj01.Download fic,nombreFichero
end if
Set obj01 = nothing
End function 


El problema, cuando el fichero es muy grande, es que el usuario se queda delante de la tableta, sin dar la sensación de que esta este descargando nada...
He probado a ponerle una barra de descarga, con show-progress-dialog, pero la barra se queda parada hasta que termina de descargar el fichero.

¿Es posible que esta barra se vaya "rellenando" conforme se va descargando un fichero?

No se si me he explicado bien...

Muchas gracias de antemano!
Un saludo!

[Juan Carlos]

Hola, con lo que hay de momento no es posible.

[jesus_gesdemo]

Ok, gracias Juan Carlos.
Hay algo planificado para futuras versiones?

[Juan Carlos]

Existe el método AsyncDownload que te muestra una notificación de descarga, pero este método no detiene el script, porque es asincrónico. Se hace así:

Código:

CreateObject("FileManager").AsyncDownload "http://www.servidor.com/fichero.txt", "nombre-fichero.txt", "Descargando fichero..."