Sub chooser_Result (Success As Boolean, Dir AsString, FileName AsString)if Success then
Dim Dir1 AsString = rp.GetSafeDirDefaultExternal("")
Dim bg AsBitmap = LoadBitmapResize(Dir, FileName, Activity.Width, Activity.Height ,True)
File.Copy(Dir,FileName,Dir1, FileName) ------ this line is throwing the error
changed the above as File.Copy(Dir,FileName,Dir1, "123") works well.