Как найти имя таблицы в базе данных? ASP Classic

Question

Я работаю над asp-classic vbscript-сайтом, и мне любопытно, есть ли способ отображать таблицы в базе данных. Я посмотрел онлайн и увидел несколько примеров, но они не объясняют, что на самом деле делать с кодом. Я ОЧЕНЬ новый, поэтому, если кто-то может сделать для меня это смысл, это было бы потрясающе.

СУБД: Microsoft SQL Server

Answer 1

Чтобы получить Вас started:

Const adSchemaTables =   20 ' 00000014 

    Dim sCS : sCS  = "...your connection string..." 
    Dim oDb : Set oDb = CreateObject("ADODB.CONNECTION") 
    oDb.Open sCS 
    Dim oRs : Set oRs = oDb.OpenSchema(adSchemaTables) 
    Do Until oRs.EOF 
    If oRs("TABLE_TYPE") = "TABLE" Then WScript.Echo oRs("TABLE_NAME") 
    oRs.MoveNext 
    Loop 

[Если вы действительно не знаете о ConnectionStrings, смотрите here.

Answer 2

Set Cat = CreateObject("ADOX.Catalog") 
Cat.ActiveConnection = "Provider=sqloledb;Data Source=myServerAddress;Initial Catalog=myDataBase;User Id=myUsername;Password=myPassword;" 
For Each Table In Cat.Tables 
    WScript.Echo Table.Name 
Next