Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

SQL Table list

96 views
Skip to first unread message

Henry Fidler

unread,
Jun 28, 2021, 11:50:51 AM6/28/21
to
I try (CaVo 2.8 SP2)
oTables := SQLListTables{ , , , , oConn }
lOK := oTables:Execute() /// return True
cTables := oTables:TableName

cTable return empty string.

What is wrong?
Henry

Henry Fidler

unread,
Jun 30, 2021, 11:52:12 AM6/30/21
to
I found a workaround

oTables := SQLListTables{ ,, , 'Table', oConn }
lBack := oTables:Execute()

IF lBack
oTables:GoTop()
DO WHILE !oTables:EOF
cTable := oTables:FIELDGET(3) // 1-"Database name", 2-Null, 3-Table Name, 4-"Table", 5-Null
AAdd(a_Table, cTable)
oTables:Skip()
ENDDO
ENDIF

Henry
0 new messages