This commit is contained in:
cvaldes1201
2023-11-08 13:50:43 -06:00
parent 19bddaa4f6
commit f57db99170
8 changed files with 571 additions and 19 deletions

View File

@@ -32,8 +32,8 @@ Sub Process_Globals
Public SharedFolder As String 'Para actualizar apk
Dim cedisLocation As Location
Dim reqManager As DBRequestManager
Dim server As String = "http://187.189.244.154:1782"
' Dim server As String = "http://11.0.0.253:1782"
Dim server As String = "http://187.189.244.154:1781"
' Dim server As String = "http://11.0.0.60:1782"
Dim muestraProgreso = 0
Dim c As Cursor
End Sub
@@ -54,9 +54,9 @@ Sub Service_Create
' ToastMessageShow("Error enabling Bluetooth adapter.", True)
' Else
' ToastMessageShow("Enabling Bluetooth adapter...", False)
' End If
' End Ifate = True
' Else
' BluetoothState = True
' BluetoothSt
' End If
' reqManager.Initialize(Me, Main.server)
Timer1.Initialize("Timer1", Interval * 1000)