Dim in As Intent
in.Initialize(in.ACTION_VIEW,"" )
mDownloadFileProvider.SetFileUriAsIntentData(in, mUpdateFile)
If xPhone.SdkVersion >= 24 Then
in.Initialize("android.intent.action.INSTALL_PACKAGE", mDownloadFileProvider.GetFileUri(mUpdateFile))
in.Flags = Bit.Or(in.Flags, 1) 'FLAG_GRANT_READ_URI_PERMISSION
Else
in.Initialize(in.ACTION_VIEW, "file://" & File.Combine(mDownloadFileProvider.gSharedFolder, mUpdateFile))
in.SetType("application/vnd.android.package-archive")
End If
StartActivity(in)
ExitApplication ' Added this line