[已解决]关于Dim MyTable As ADOX.Table的问题?

zjszjs27 · 发表于 2012-8-21 15:05

本帖最后由 zjszjs27 于 2012-8-22 13:04 编辑

Dim MyTable As ADOX.Table
dim m as long
dim aaa(1000) as string
tableName="table1"
Set MyTable = CurrentProject.Connection.Tables(tableName)
m = MyTable.Columns.Count - 1
'获取所有列名
For j = 0 To m
aaa(i)=CurrentProject.Connection.Tables(tableName).Columns.Item(j) Exit
End If
每次运行到
Dim MyTable As ADOX.Table
就提示编译错误：用户定义类型未定义。
我在工具-引用中增加了microsoft activex data objects 2.1 library。但仍然不行。请问是什么问题啊？另外能帮我写下读取一个表中的所有列名的代码吗？

zjszjs27 · 发表于 2012-8-21 16:52

各位老师帮帮忙啊。。在线等

ly · 发表于 2012-8-21 17:33

在工具中-引用增加Microsoft ADO Ext. 2.8 for DDL and Secruity。（注：可能版本不一样）

zjszjs27 · 发表于 2012-8-21 20:12

ly 发表于 2012-8-21 17:33
在工具中-引用增加Microsoft ADO Ext. 2.8 for DDL and Secruity。（注：可能版本不一样）

这个好使了，谢谢老师

		自动登录	找回密码
密码			免费注册

[已解决] [已解决]关于Dim MyTable As ADOX.Table的问题?

评分