From 5f62157351cafa8fa013185c682492c158f2925f Mon Sep 17 00:00:00 2001
From: Costa <47926492N@ICO.SCS.local>
Date: Wed, 23 Feb 2022 16:28:49 +0100
Subject: [PATCH] Cambiar a return.

---
 R/sqlConnect.R | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/R/sqlConnect.R b/R/sqlConnect.R
index ed7ef69..5c94232 100644
--- a/R/sqlConnect.R
+++ b/R/sqlConnect.R
@@ -1,9 +1,9 @@
 sqlConnect<-function(file, pass=T){
   sqlInitialize()
   if (pass){
-    dta<-odbcConnectAccess2007(access.file = file,
-                               pwd = .rs.askForPassword("Enter password:"))
+    return(odbcConnectAccess2007(access.file = file,
+                               pwd = .rs.askForPassword("Enter password:")))
   }else{
-    dta<-odbcConnectAccess2007(access.file = file)
+    return(odbcConnectAccess2007(access.file = file))
   }
 }