[SQL] 열 이름을 가져옵니다

열 이름을 가져옵니다

나는 사람이에 대한 해결책이 있는가, 검증을 위해 그들을 통해 VBA 또는 Access SQL 및 반복 처리를 사용하여 테이블의 열 이름을 모두 얻을 필요가, 나는 아무 소용이 구글을 검색했다.

해결법

1. ==============================

   1.이 작동합니다

   이 작동합니다

   Set db = CurrentDb()
   Set rs1 = db.OpenRecordset("Table1")
   Dim fld As DAO.Field
   For Each fld In rs1.Fields
       MsgBox (fld.Name)
   Next
   Set fld = Nothing
   

2. ==============================

   2.

   Dim l As Integer
   
   For l = 0 To CurrentDb.TableDefs("tbl_Name").Fields.Count - 1
     Debug.Print CurrentDb.TableDefs("tbl_Name").Fields(l).name
   Next l
   

from https://stackoverflow.com/questions/3343922/get-column-names by cc-by-sa and MIT license