Question:
How do I retrieve all the table names from an Access database using ASP?
Answer:
Make sure you have an ODBC DSN to point to your database. Then use this code to output all the tables in the database:
' -- Declare variablesDim objConn, objRS' -- Declare constantsConst adSchemaTables = 20' -- create objectsSet objConn = Server.CreateObject("ADODB.Connection")set objRS = Server.CreateObject("ADODB.Recordset")' -- Open the connection: replace values with ' -- your system's valuesobjConn.Open "DSNName", "UserID", "Password"' -- Get list of tables - ALL tablesset objRS = objConn.OpenSchema(adSchemaTables)' -- Walk the recordsetDo While Not objRS.EOF ' -- output table name and table type Response.write "Table Name = " & objRS("TABLE_NAME") & " Table Type = " & objRS("TABLE_TYPE") & "
" ' -- next record objRS.MoveNextLoop' -- Close all objectsobjRS.Closeset objRS = NothingobjConn.Closeset objConn = Nothing
