Sub Process_Globals
Dim MYDB As String : MYDB="myfile.db"
Dim MyDir As String
End Sub
Sub Globals
End Sub
Sub Activity_Create(FirstTime As Boolean)
MyDir=File.DirInternal
If Not(File.Exists(MyDir,MYDB)) Then
Log("about to copy from " & File.DirAssets & " to " & MyDir)
File.Copy(File.DirAssets,MYDB,MyDir,MYDB)
End If
......
.....
End Sub