[ms-access] MS Access 데이터베이스에서 테이블 이름을 얻으려면 어떻게해야합니까?



2 Answers

Access에서 스키마를 사용할 수 있습니다.

Sub ListAccessTables2(strDBPath)
   Dim cnnDB As ADODB.Connection
   Dim rstList As ADODB.Recordset

   Set cnnDB = New ADODB.Connection

   ' Open the connection.
   With cnnDB
      .Provider = "Microsoft.Jet.OLEDB.4.0"
      .Open strDBPath
   End With

   ' Open the tables schema rowset.
   Set rstList = cnnDB.OpenSchema(adSchemaTables)

   ' Loop through the results and print the
   ' names and types in the Immediate pane.
   With rstList
      Do While Not .EOF
         If .Fields("TABLE_TYPE") <> "VIEW" Then
            Debug.Print .Fields("TABLE_NAME") & vbTab & _
               .Fields("TABLE_TYPE")
         End If
         .MoveNext
      Loop
   End With
   cnnDB.Close
   Set cnnDB = Nothing
End Sub

보낸 사람 : http://msdn.microsoft.com/en-us/library/aa165325(office.10).aspx

Question

Microsoft SQL Server 및 MySQL에는 쿼리 할 수있는 INFORMATION_SCHEMA 테이블이 있습니다. 그러나 MS Access 데이터베이스에는 존재하지 않습니다.

사용할 수있는 동급 제품이 있습니까?




SELECT 
Name 
FROM 
MSysObjects 
WHERE 
(Left([Name],1)<>"~") 
AND (Left([Name],4) <> "MSys") 
AND ([Type] In (1, 4, 6)) 
ORDER BY 
Name





Related



Tags

ms-access