From 08391a2638d1d47aa8a88b5c33d5a1922e2556eb Mon Sep 17 00:00:00 2001
From: Kevin Nowaczyk <beakerboy99@yahoo.com>
Date: Thu, 16 Oct 2025 16:25:28 -0400
Subject: [PATCH] Refactor SQLDatabase class for improved clarity

---
 src/ClassModules/SQLDatabase.cls | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/ClassModules/SQLDatabase.cls b/src/ClassModules/SQLDatabase.cls
index 0a04639..d115202 100644
--- a/src/ClassModules/SQLDatabase.cls
+++ b/src/ClassModules/SQLDatabase.cls
@@ -72,7 +72,7 @@ Public Function Execute(oSQL As iSQLQuery, Optional return_column = "")
     cnt.ConnectionString = MakeConnectionString()
     cnt.OpenConnection
     
-    rst.OpenwsRecordset sSQL, cnt              'Execute the query
+    rst.OpenRecordset sSQL, cnt              'Execute the query
     If return_column <> "" Then
         If rst.EOF Then
             Execute = False
@@ -123,3 +123,4 @@ Private Function PrepareInsert(ByVal oSQL As SQLInsert, return_column)
             Set PrepareInsert = MySQLGroup
     End Select
 End Function
+