Hola.
He creado un módulo de código y en él he situado el siguiente código:
El correspondiente JobDone lo he colocado en el módulo Main, por eso lo de job.Initialize(nombre, Main)
Mi duda es si el JobDone puedo trasladarlo también al módulo de código. En ese caso no sé qué habría de colocar en en lugar de Main en el código job.Initialize(nombre, Main).
Gracias.
He creado un módulo de código y en él he situado el siguiente código:
B4X:
'Esto está en un módulo de código
Sub CargaArchivo (nombre As String )
Dim job As HttpJob
job.Initialize(nombre, Main) 'nombre del archivo pasado como parámetro
job.Download("http://www.miservidor/" & archivo)
End Sub
El correspondiente JobDone lo he colocado en el módulo Main, por eso lo de job.Initialize(nombre, Main)
B4X:
'Eso está en el módulo Main
Sub JobDone(Job As HttpJob)
If Job.Success Then
Dim out As OutputStream
out = File.OpenOutput(File.DirDefaultExternal,Job.JobName,False )
File.Copy2(Job.GetInputStream, out)
out.Close
Log ("*** Cargado " & Job.JobName)
Else
Log("### No Cargado " & Job.JobName)
End If
Job.Release
End Sub
Mi duda es si el JobDone puedo trasladarlo también al módulo de código. En ese caso no sé qué habría de colocar en en lugar de Main en el código job.Initialize(nombre, Main).
Gracias.