19/9/23 - Listview de servidores por customListView y servidor de Azure

- Se cambio el oistview de los servidores predeterminados por un customListView.
- Se agrego el servidor de Azure a la lista de servidores predeterminados..

B4A/C_Subs.bas

@@ -20,7 +20,6 @@ Sub Class_Globals
 	Private subsLogs As Boolean = False
 End Sub
 
-
 'You can add more parameters here.
 Public Sub Initialize As Object
 	Return Me
@@ -414,7 +413,7 @@ Sub CreateNotification (Body As String) As Notification
 	Dim notification As Notification
 	notification.Initialize2(notification.IMPORTANCE_LOW)
 	notification.Icon = "icon"
-	notification.SetInfo("Tester", Body, Main)
+	notification.SetInfo("Activo", Body, Main)
 	Return notification
 End Sub
 
@@ -445,4 +444,5 @@ Sub notiLowReturn(title As String, Body As String, id As Int) As Notification 'i
 	notification.Notify(id)
 '	Log("notiLowReturn SetInfo")
 	Return notification
-End Sub
+End Sub
+