ADOX - таблицы в схеме SQL Server не указаны

Question

Я получаю имена таблиц, используя ADOX, но любые таблицы, которые находятся в схеме, отличной от DBO, не перечислены.

Sub ListTablesADOX()
  Dim Conn As New ADODB.Connection

  'Open connection you want To get database objects
  Conn.Provider = "MSDASQL"
  Conn.Open "DSN=...;Database=...;", "UID", "PWD"

  'Create catalog object
  Dim Catalog As New ADOX.Catalog
  Set Catalog.ActiveConnection = Conn

  'List tables And columns
  Dim Table As ADOX.Table
  For Each Table In Catalog.Tables
      Debug.Print Table.Name
  Next
End Sub 

Answer 1

Я отказался от использования ADOX, перекодировал все свои процедуры получения информации каталога, используя вместо этого методы ADO OpenSchema, я не мог получить ADOX ни к чему, кроме схемы dbo.