B4X:
Sub camera_PictureTaken (Data() As Byte)
Dim out As OutputStream
out = File.OpenOutput(File.DirRootExternal, "MyDirectory/" &"BetaImage.jpg", False)
out.WriteBytes(Data, 0, Data.Length)
out.Close
End Sub
I have seen numerous forums but none that solved my problem, maybe you could succeed in doing so by solving this specific.