Version 4.08.18.EP_d la ruta se agrego al fin día para la bitacora GPS

This commit is contained in:
IsR0d
2024-08-22 11:30:45 -06:00
parent cb2290b729
commit 9a3fe60aa7
5 changed files with 27 additions and 21 deletions

View File

@@ -151,7 +151,7 @@ Private Sub B4XPage_Created (Root1 As B4XView)
If File.Exists(ruta, "kmt.db") = False Then
File.Copy(File.DirAssets, "kmt.db", ruta, "kmt.db")
End If
skmt.Initialize(ruta,"kmt.db", True)
skmt.Initialize(File.DirInternal,"kmt.db", True)
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS IMPRESORA (HABILITADA)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS GPS (HABILITADO)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS PROMO_ESP (HVD_CLIENTE)")