7015
社区成员
2.8w+
社区内容
- 主页
怎样获取access数据表的列名
怎样获取access数据表的所有列名，比如我创建的表tb_data中有三列name，age，sex。获取这些名称的SQL语言怎么写？谢谢？
...全文
wanghonghua123 2010年04月08日
正在学习中。。。
有心人问道 2010年04月07日
请问netcellsoft兄用的什么？介绍一下啊！我用的是c#，想学习一下。
netcellsoft 2009年12月24日
还有这么多人用ACCESS呀.
ACMAIN_CHM 2009年12月21日
wwwwb 2009年12月21日
OR
DAO
ADOX:
Dim ff As New ADOX.Catalog
ff.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\zz\db3.mdb;Persist Security Info=False"
For Each ff21 In ff.Tables
If ff21.Type = "TABLE" Then
For Each dr1 In ff21.Columns
MsgBox dr1.Name & " 123 " & dr1.DefinedSize & " 456 " & dr1.Type
NEXT
END IF
NEXT
DAO
ADOX:
Dim ff As New ADOX.Catalog
ff.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\zz\db3.mdb;Persist Security Info=False"
For Each ff21 In ff.Tables
If ff21.Type = "TABLE" Then
For Each dr1 In ff21.Columns
MsgBox dr1.Name & " 123 " & dr1.DefinedSize & " 456 " & dr1.Type
NEXT
END IF
NEXT
wwwwb 2009年12月21日
OR
DAO
ADOX:
Dim ff As New ADOX.Catalog
ff.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\zz\db3.mdb;Persist Security Info=False"
For Each ff21 In ff.Tables
If ff21.Type = "TABLE" Then
For Each dr1 In ff21.Columns
MsgBox dr1.Name & " 123 " & dr1.DefinedSize & " 456 " & dr1.Type
NEXT
END IF
NEXT
DAO
ADOX:
Dim ff As New ADOX.Catalog
ff.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\zz\db3.mdb;Persist Security Info=False"
For Each ff21 In ff.Tables
If ff21.Type = "TABLE" Then
For Each dr1 In ff21.Columns
MsgBox dr1.Name & " 123 " & dr1.DefinedSize & " 456 " & dr1.Type
NEXT
END IF
NEXT
wwwwb 2009年12月21日
没有这样的SQL语句，用ADO、ADOX来取得
发动态
发帖子
Access
创建于2007-09-28
加入
Microsoft Office Access是由微软发布的关系数据库管理系统。它结合了 MicrosoftJet Database Engine 和 图形用户界面两项特点。
社区公告
暂无公告