From a5b9fd18173e31edd63f9a6e88ec8851f3e11b0a Mon Sep 17 00:00:00 2001
From: Alexis Caraballo <alexis.caraballo@optaris.com>
Date: Sat, 16 Mar 2024 20:57:46 -0300
Subject: [PATCH] =?UTF-8?q?Validar=20si=20recordusers=20est=C3=A1=20vac?=
 =?UTF-8?q?=C3=ADo?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Codigo/FileIO.bas | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/Codigo/FileIO.bas b/Codigo/FileIO.bas
index 977f2dbe..d4ed515c 100644
--- a/Codigo/FileIO.bas
+++ b/Codigo/FileIO.bas
@@ -214,8 +214,12 @@ On Error GoTo error_load_stats
     Debug.Assert FileExist(strFile)
     n = FreeFile()
     Open strFile For Input Shared As n
-    Line Input #n, str
-    RecordUsuarios = val(str)
+    If EOF(n) Then
+        RecordUsuarios = 1
+    Else
+        Line Input #n, str
+        RecordUsuarios = val(str)
+    End If
     Close #n
     
     Exit Sub