' File.Delete(SQLDataBasePath, SQLDateBaseName) ' only for testing, removes the database
'check if the database already exists
If File.Exists(SQLDataBasePath, SQLDateBaseName) = False Then
'copy the default DB
File.Copy(File.DirAssets, SQLDateBaseName, SQLDataBasePath, SQLDateBaseName)
End If
SQL1.Initialize(SQLDataBasePath, SQLDateBaseName, True)