Dim localdb As String :localdb="MyApp/data/wlife.db"
File.MakeDir(File.DirDocuments,"MyApp/data")
If File.Exists(File.DirDocuments,"MyApp/data/wlife.db") = False Then
File.Copy(File.DirAssets,"wlife.db",File.DirDocuments,localdb)
Log("cannot find db, copy")
Else
Log("find db, ")
End If