Sub Activity_Create(FirstTime As Boolean)
hc.Initialize("hc")
Activity.LoadLayout("1")
hc.Initialize("hc")
Dim req As HttpRequest
req.InitializeGet("http://www.mywebsite.com/modules/boonex/photos/data/files/2.jpg")
hc.Execute(req, 1)
End Sub
Sub hc_ResponseSuccess (Response As HttpResponse, TaskId As Int)
Dim b As Bitmap
b.Initialize2(Response.GetInputStream)
' imageview1.Bitmap = b
Activity.SetBackgroundImage(b)
Response.Release
End Sub