Dim myfdb As String : myfdb = File.DirDefaultExternal& "/Database"
Public DBFileName As String : DBFileName = "miodb.db"
Public DBFileDir As String : DBFileDir = File.DirRootExternal
File.Delete(DBFileDir, DBFileName)
If File.Exists(myfdb , "") = False Then
File.MakeDir(File.DirDefaultExternal, "/Database")
End If
If File.Exists(myfdb,DBFileName) = False Then
File.Copy(File.DirAssets, DBFileName, myfdb, DBFileName)
End If
SQL.Initialize(myfdb , DBFileName, True)