2014-01-25 50 views
0

我正在一個asp-classic vbscript網站上工作,並且很好奇是否有方法在數據庫中顯示錶格。我在網上查看了一些例子,但是他們沒有解釋實際對代碼做了什麼。我非常新,所以如果有人可以讓我覺得這很有意思。如何找到數據庫中表的名稱? ASP經典

DBMS:Microsoft SQL Server的

+0

你用什麼DBMS? –

+0

Microsoft SQL Server @ Ekkehard.Horner – user3199543

回答

0

爲了讓您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

+0

感謝您的回覆。什麼是「我的連接字符串」@ Ekkehard.Horner – user3199543

+0

要了解更多關於此,請檢查此答案:http://stackoverflow.com/questions/1569303/how-to-connect-to-a-sql-database-採用經典-ASP – Damien

1
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