Sub Activity_Create(FirstTime As Boolean)
ab.initialise
dbutils.CopyDBFromAssets("birdrefaust.db")
If File.Exists(DBFilePath, DBFileName) = False Then
If FirstTime Then
SQL1.Initialize(DBFilePath, DBFileName, True)
GPS2.Initialize("GPS")
GPS2.stop
GPS2.start(0,0)
End If
Else
If FirstTime Then
SQL1.Initialize(DBFilePath, DBFileName, True)
GPS2.Initialize("GPS")
GPS2.stop
GPS2.start(0,0)
End If
End If