Dim extfile As ExternalFile = Storage.FindFile(extfolder, Filename)
If extfile.IsInitialized Then
' read and save map file, need to use the commented lines if targeting API 29 or later
'Dim rp As RuntimePermissions
'Dim out As OutputStream = File.OpenOutput(rp.GetSafeDirDefaultExternal(""), Starter.MapTempFilename, False)
Dim out As OutputStream = File.OpenOutput(File.DirRootExternal, Starter.MapTempDestination, False)
File.Copy2(Storage.OpenInputStream(extfile), out)
out.Close
'...