Dim j As HttpJob
j.Initialize("", Me)
j.Download(Starter.staticAREdURL & "public/articleImages/" & article.img)
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Dim myBitmap As Bitmap = j.GetBitmap
FillImageToView(myBitmap, pnlCardImage, True)
Starter.kvs.PutBitmap("news_" & article.img, myBitmap)
Else
pnlCardImage.Height = 0
End If