Hi
I have the following code running on b4a but am struggling to see how to achieve this in b4i. There are two issues:
1) ihttp doesn't seem to have ihttpjob etc
2) I am not sure what the b4i parallels are for directories DirDefaultExternal, DirInternal etc
Any ideas how I can achieve what I need?
Thanks
John
Dim aquariumjob As HttpJob
aquariumjob.Initialize("aquariumjob",Me)
aquariumjob.Download(aquariumurl)
Sub JobDone (Job AsHttpJob)
If Job.Success = TrueThen
Select Job.JobName
Case"aquariumjob"
Dim out AsOutputStream
out = File.OpenOutput(File.DirDefaultExternal, "aquarium.mp4", True)
File.Copy2(Job.GetInputStream, out)
out.Close
End Select
End If
Job.Release
End Sub
I have the following code running on b4a but am struggling to see how to achieve this in b4i. There are two issues:
1) ihttp doesn't seem to have ihttpjob etc
2) I am not sure what the b4i parallels are for directories DirDefaultExternal, DirInternal etc
Any ideas how I can achieve what I need?
Thanks
John
Dim aquariumjob As HttpJob
aquariumjob.Initialize("aquariumjob",Me)
aquariumjob.Download(aquariumurl)
Sub JobDone (Job AsHttpJob)
If Job.Success = TrueThen
Select Job.JobName
Case"aquariumjob"
Dim out AsOutputStream
out = File.OpenOutput(File.DirDefaultExternal, "aquarium.mp4", True)
File.Copy2(Job.GetInputStream, out)
out.Close
End Select
End If
Job.Release
End Sub