ذخیره بانک در گوشی

سلام

من یه برنامه دارم که میخوام با زدن روی یک دکمه بانک اطلاعاتیش در گوشی ذخیره بشه و با زدن یه دکمه دیگه بانک ذخیره شده جایزگین بشه

میشه کمکم کنید کدهاشو بزنم؟
هر چی تلاش میکنم درست نمیشه
اگر سورسی چیزی هم باشه که کمک بده که عالیه

این کد رو برای زدم اما وقتی کاربر برای اولین بار روی ذخیره کردن بانک در حافظه کلیک می کنه برنامه بسته میشه

Try
ahn.CloseDrawer2(ahn.GRAVITY_RIGHT)
Select Value
Case 1
If rp.Check(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)=False Then
rp.CheckAndRequest(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
Else
File.copy(File.dirinternal,”cards_db.db”,File.dirrootexternal,”cards_db.db”)
End If

ToastMessageShow(“پشتیبان‌گیری انجام شد”,False)

Case 2
If File.Exists(File.dirrootexternal,”cards_db.db”)=False Then
Msgbox(“فایل پشتیبانی اطلاعات برنامه موجود نیست!”,”خطا!”)
Else
File.Delete(File.dirinternal,”cards_db.db”)
File.Copy(File.dirrootexternal,”cards_db.db”, File.DirInternal,”cards_db.db”)
ToastMessageShow(“اطلاعات مورد نظر جایگزین شد”,True)
End If

Catch
Log(LastException)
End Try