鱼篮观音传奇全集:VB中用ADODB如何取出所有表名
来源:百度文库 编辑:中科新闻网 时间:2024/05/12 05:44:42
VB中用ADODB如何取出所有表名
????
????
用“opendatabase”函数,在DAO库中
Dim Dat As Database
Set Dat = OpenDatabase("(数据库文件路径)")
Dim tblData As Database
For Each tblData In Dat.TableDefs
Print tblData.Name
Next
SQLserver可以,Access没办法。