iOS Question Error opening stream? "Operation not permitted"

Sub Cam_Complete (Success As Boolean, Image As Bitmap, VideoPath As String)
    If Success Then

        VideoPlayer1.LoadVideo(VideoPath,"")
        
        Wait For VideoPlayer1_Ready (Success As Boolean)
        If Success Then
            VideoPlayer1.Play 'to start playing automatically
            
            Dim ps() As String = Regex.split("/", VideoPath)
            Dim fileName As String =(ps(ps.Length-1))
            Dim path As String =""
            For i = 0 To ps.Length-2
                path = path & ps(i) & "/"
            Next
            
            Dim p As StringUtils
            
            VideoPath= VideoPath.Replace(fileName,"")
            
            Log(VideoPath & "      " & fileName)
            
            
            Dim g As InputStream=File.OpenInput(VideoPath, fileName)
            
            Dim b() As Byte = Bit.InputStreamToBytes(File.OpenInput(VideoPath, fileName))
            Dim b64As String = p.EncodeBase64(b)
          

    End If
End Sub