Dim obj4Url As Object
If ph.SdkVersion < 24 Then
Dim uri As Uri
uri.Parse("file://" & File.Combine(imageFolder, "iv1.jpg"))
obj4Url = uri
Else
Dim FileProvider As JavaObject
Dim context As JavaObject
context.InitializeContext
FileProvider.InitializeStatic("android.support.v4.content.FileProvider")
Dim fileObj As JavaObject
fileObj.InitializeNewInstance("java.io.File", Array(imageFolder, "iv1.jpg"))
obj4Url= FileProvider.RunMethod("getUriForFile", Array(context, Application.PackageName & ".provider", fileObj))
End If
Dim i4Cam As Intent
i4Cam.Initialize("android.media.action.IMAGE_CAPTURE","")
i4Cam.PutExtra("output", obj4Url)
returnFrom="Camera"
StartActivity(i4Cam)