From fd478d91b963d8822e535a97b8aab8077a6e9186 Mon Sep 17 00:00:00 2001
From: gambas <g4mba5@gmail.com>
Date: Tue, 24 Nov 2020 21:42:02 +0100
Subject: [PATCH] SQLRequest: Do not quote "*" field name in Select() method.

[GB.DB]
* NEW: SQLRequest: Do not quote "*" field name in Select() method.
---
 main/lib/db/gb.db/.src/SQLRequest.class | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/main/lib/db/gb.db/.src/SQLRequest.class b/main/lib/db/gb.db/.src/SQLRequest.class
index c827c910e..d1dade8ce 100644
--- a/main/lib/db/gb.db/.src/SQLRequest.class
+++ b/main/lib/db/gb.db/.src/SQLRequest.class
@@ -132,9 +132,11 @@ Public Function _call() As String
     
     For I = 0 To $aField.Max
       If I Then sReq &= ","
-      aScan = Scan($aField[i], "* AS *")
+      aScan = Scan($aField[I], "* AS *")
       If aScan.Count = 2 And If InStr(aScan[1], " ") = 0 Then
         sReq &= $aField[I]
+      Else If $aField[I] = "*" Then
+        sReq &= "*"
       Else
         sReq &= $hConn.Quote($aField[I])
       Endif