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





3 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

예제 마이크로소프트 오피스

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

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




SQL-92 INFORMATION_SCHEMA에 매우 근접하도록 설계된 스키마 정보는 OLE DB 공급자를 통해 Jet / ACE 엔진 ( '액세스'로 가정하는 것으로 가정)에 대해 얻을 수 있습니다.

만나다:

OpenSchema 메서드 (ADO)

지원되는 스키마 행 집합




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