i'm on vb6 and access database check if table exixts

[luca90]

My experiment...

how to set a variable string in this code, instead a fixed name of table?:

...
Dim TABELLA as String

TABELLA ="NUOVATABELLA"

....

Dim RSSCHEMA As ADODB.Recordset

    Set RSSCHEMA = _
        CON.OpenSchema(adSchemaColumns, Array(Empty, Empty, " & TABELLA & ", Empty))
        
    If RSSCHEMA.BOF And RSSCHEMA.EOF Then
        MsgBox "Table does not exist"
    Else
        MsgBox "Table exists"
    End If
    
    RSSCHEMA.Close
    Set RSSCHEMA = Nothing

[jdc2000]

Have you tried something like this:

Dim strTableName As String

Dim RSSCHEMA As ADODB.Recordset

    Set RSSCHEMA = CON.OpenSchema(adSchemaColumns, Array(Empty, Empty, strTableName, Empty))