diff --git a/B4A/C_Principal.bas b/B4A/C_Principal.bas
index 8084438..0b4caf6 100644
--- a/B4A/C_Principal.bas
+++ b/B4A/C_Principal.bas
@@ -1196,6 +1196,31 @@ Sub JobDone(Job As HttpJob)
 				skmt.EndTransaction
 			End If
 		End If
+		
+		If Job.JobName = "DBRequest" Then
+			Dim RESULT As DBResult = B4XPages.MainPage.reqManager.HandleJob(Job)
+			If RESULT.Tag = "usuarioA" Then 'query tag
+				Private n As String = "Sin Usuario"
+				For Each records() As Object In RESULT.Rows
+					n = records(RESULT.Columns.Get("USUARIO"))
+				Next
+				Log(n)
+				'Logcolor("**************************"&n, Colors.Green)
+				If n = "OKActivo"  Then
+					Dim cmd As DBCommand
+					cmd.Initialize
+					cmd.Name = "select_ruta_DUR3" 'Se cambio de "select_ruta_DUR2_2"  el 28/5/2024 para poder deshabilitar el query de las versiones anteriores.
+					cmd.Parameters = Array As Object(ALMACEN,e_ruta.text,imei)
+					Log($"${ALMACEN},${e_ruta.text},${imei}"$)
+					reqManager.ExecuteQuery(cmd , 0, "ruta")
+				Else
+					Msgbox("Usuario o password No validos","") 'ignore
+					Starter.skmt.ExecNonQuery("delete from usuarioa")
+					ExitApplication
+				End If
+				'Log("*****************  "&n)
+			End If
+		End If
 
 		If Job.JobName = "DBRequest" Then
 			Dim RESULT As DBResult = reqManager.HandleJob(Job)
@@ -1959,13 +1984,27 @@ Sub connecta_Click
 	cmd.Initialize
 	cmd.Name = "select_version_DUR"
 	reqManager.ExecuteQuery(cmd , 0, "version")
+	
+	c=Starter.skmt.ExecQuery("select USUARIO, PASS from usuarioa")
+	c.Position=0
+	If c.RowCount > 0  And c.GetString("USUARIO") <> "KMTS1" Then
+		Private usrT As String = c.GetString("USUARIO")
+		Private passT As String = c.GetString("PASS")
+		Log(usrT)
+		Log(passT)
+		cmd.Initialize
+		cmd.Name = "select_usuario_guna_DUR"
+		cmd.Parameters = Array As Object(usrT, passT)
+		reqManager.ExecuteQuery(cmd , 0, "usuarioA")
+	End If
+	c.Close
 
-	Dim cmd As DBCommand
-	cmd.Initialize
-	cmd.Name = "select_ruta_DUR3" 'Se cambio de "select_ruta_DUR2_2"  el 28/5/2024 para poder deshabilitar el query de las versiones anteriores.
-	cmd.Parameters = Array As Object(ALMACEN,e_ruta.text,imei)
-	Log($"${ALMACEN},${e_ruta.text},${imei}"$)
-	reqManager.ExecuteQuery(cmd , 0, "ruta")
+'	Dim cmd As DBCommand
+'	cmd.Initialize
+'	cmd.Name = "select_ruta_DUR3" 'Se cambio de "select_ruta_DUR2_2"  el 28/5/2024 para poder deshabilitar el query de las versiones anteriores.
+'	cmd.Parameters = Array As Object(ALMACEN,e_ruta.text,imei)
+'	Log($"${ALMACEN},${e_ruta.text},${imei}"$)
+'	reqManager.ExecuteQuery(cmd , 0, "ruta")
 
 	If e_ruta.Text = "ROOT" Then
 		cargar.Visible = True
diff --git a/B4A/Durakelo.b4a b/B4A/Durakelo.b4a
index bc31957..157f04a 100644
--- a/B4A/Durakelo.b4a
+++ b/B4A/Durakelo.b4a
@@ -1398,7 +1398,7 @@ Version=12.8
 #Region  Project Attributes 
 	#ApplicationLabel: Durakelo
 	#VersionCode: 1
-	#VersionName: 4.05.29
+	#VersionName: 4.06.08
 	'SupportedOrientations possible values: unspecified, landscape or portrait.
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False
diff --git a/B4A/Durakelo.b4a.meta b/B4A/Durakelo.b4a.meta
index bc337e7..803eb71 100644
--- a/B4A/Durakelo.b4a.meta
+++ b/B4A/Durakelo.b4a.meta
@@ -73,6 +73,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=
 ModuleClosedNodes9=
-NavigationStack=C_Cuestionario,r_CheckedChange,118,0,C_Cuestionario,agregaPregunta,98,0,C_Cuestionario,pSombra_Click,115,0,C_Cuestionario,preguntaContestada,112,0,C_Cliente,initialize,167,0,C_Cliente,Class_Globals,163,0,C_Cliente,B4XPage_Created,174,0,C_Cliente,B4XPage_CloseRequest,497,0,C_Cliente,rb_p7no_CheckedChange,1768,0,C_Cliente,cuest_preguntaContestada,1784,0,C_Cliente,B_VENTA_Click,1243,0
+NavigationStack=C_Cliente,initialize,167,0,C_Cliente,Class_Globals,163,0,C_Cliente,B4XPage_Created,174,0,C_Cliente,B4XPage_CloseRequest,497,0,C_Cliente,rb_p7no_CheckedChange,1768,0,C_Cliente,cuest_preguntaContestada,1784,0,C_Cliente,B_VENTA_Click,1243,0,C_Principal,Class_Globals,1,0,C_Principal,connecta_Click,1991,3,C_Principal,JobDone,1218,2
 SelectedBuild=0
 VisibleModules=2,10,4,19,5,6,8,9,11,24