社区
数据库(包含打印,安装,报表)
帖子详情
ADO 菜问……
SetMeFree
2004-10-27 06:23:01
有一个未知 Jet 数据库,但确定是数据库,如何用 VB 的ADO 获取其包含的表的数量和表名?对于其他数据库是不是一样的方法?
我苦思未解,或者 ADO 不支持此法?
类似于 Data View,只要设置 ConnectionString,再执行 Open,即可获取Table的目录树。
...全文
154
14
打赏
收藏
ADO 菜问……
有一个未知 Jet 数据库,但确定是数据库,如何用 VB 的ADO 获取其包含的表的数量和表名?对于其他数据库是不是一样的方法? 我苦思未解,或者 ADO 不支持此法? 类似于 Data View,只要设置 ConnectionString,再执行 Open,即可获取Table的目录树。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
14 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
lyxhappy
2004-11-03
打赏
举报
回复
UP
yongming520
2004-11-03
打赏
举报
回复
建议楼主去http://access911.net看看,那里有你想要的东西,给你一个QQ号码,3103919,你可以问他们!
officecn
2004-10-28
打赏
举报
回复
使用ADOX来查询数据库结构,如果你事先并不知道是什么数据库,
那你可以写一个连接数据库的界面,
连接类型分两种:Access,其他类型的数据库都放在ODBC连接类型里
这样你的连接字符串不就确定了?
leigang358
2004-10-28
打赏
举报
回复
被daisy8675(莫依)给抢先了
55555
SetMeFree
2004-10-28
打赏
举报
回复
还有,要用纯ADO的方式。
SetMeFree
2004-10-28
打赏
举报
回复
各位朋友的热心帮助让小弟我感激不尽……
daisy8675(莫依)的那个方法我试过,rstSchema!TABLE_NAME返回字符串"MSysAccessObjects",并不是我要的表的名字。而rstSchema!TABLE_TYPE是可以返回"Access_Table"样的字串。而且这个Loop好久都没停下来,那个out字串变量里存了好多好多东西。我用来验证的数据库只有2个表啊。
也许有些朋友还未明白我的意图,小弟再说明一下:
有一个Access数据库(.mdb),里面有两个表,一个名为"学生档案",另一个是"教师档案"。而现在我并不知道这个数据库里面有多少个表,更不知道表的名字。用Data View或者Data Environment都可以很简单地看到。我想做的并不是借助其他工具来看,我要用代码的方式把表的名字列出来!
关键:不知道有多少个表更不知道表的名字!要用代码!
为这个,进程已经拖了几天了,55555……
chenyu5188
2004-10-28
打赏
举报
回复
out还用问嘛当然是字符型的啊!
chenyu5188
2004-10-28
打赏
举报
回复
rstSchema as new adodb.recordset
我帮她帮齐!
SetMeFree
2004-10-28
打赏
举报
回复
daisy8675(莫依):
原犸第三行:strSchema 何解?
out = out &.....out 是什么类型的?
sloven
2004-10-27
打赏
举报
回复
看看也长经验~~呵呵
daisy8675
2004-10-27
打赏
举报
回复
Private Sub Form_Load()
Dim adoCN As New ADODB.Connection '定义数据库的连接存放数据和代码Dim rstSchema
Dim strCnn As New ADODB.Recordset
Dim strConn As String
strConn = " Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=pubs;Data Source=JOHN"
adoCN.Open strConn
Set rstSchema = adoCN.OpenSchema(adSchemaTables)
Do Until rstSchema.EOF
out = out & "Table name: " & _
rstSchema!TABLE_NAME & vbCr & _
"Table type: " & rstSchema!TABLE_TYPE & vbCr
rstSchema.MoveNext
Loop
rstSchema.Close
adoCN.Close
Debug.Print out
End Sub
有哥
2004-10-27
打赏
举报
回复
如果是access数据库可以打开系统表看看,visdata中让它们显示出来,你就清楚了
有哥
2004-10-27
打赏
举报
回复
如何是access数据库可以打开系统表看看
victorycyz
2004-10-27
打赏
举报
回复
用ADOX可以得到。
不过,连接的字符串肯定是不通用的,如果不知道是什么数据库,恐怕很难连接上。
小
菜
编程成长记
小
菜
今年计算机专业大四了,学了不少软件开发方面的东西,也学着编了些小程序,踌躇满志,一心要找一个好单位。当投递了无数份简历后,终于收到了一个单位的面试通知,小
菜
欣喜若狂。到了人家单位,前台小姐给了他一...
三层架构详解(服务员-厨师-采购员)
三层架构详解 1,什么是三层? 2,为什么使用三层? 3,三层与以往使用的两层相比...还记得大话设计模式里第23章大鸟和小
菜
吃羊肉串的故事——由在小摊吃到饭店吃引来的一个命令模式(当然今天不是研究命令模式)。...
免费给你打工
很想有更多的软件开发实战,学校里学的东西,那个叫做 “无语”…… 现在偶已经学过,简单VB(基本上没怎么用,忘了)语言,C++语言(一般),C#语言(满感兴趣,自己努力在学),还有
ADO
.net技术,SQL SERVER ...
SharePoint 错误0x80040E14解决(续)
登陆到服务器上发现又是数据库膨胀导致系统盘空间满了,这回与上次情况(可以参看这里)不同,原因引起是由于SharePoint_Config数据库的日志文件膨胀到很大,17G,导致磁盘没有空间,打开后剩余空间为0字节……居然...
delphi Sqlite
在Delphi中,有大量的组件可以操作SQLite数据库,如UniDAC就是其中一个比较优秀的,当然还有ASQLite3Components,也有SQLite3版的ODBC驱动,可直接用
ADO
操作。本文简要说明SynopseSQLite3读写二进制字段,先说下...
数据库(包含打印,安装,报表)
1,216
社区成员
55,954
社区内容
发帖
与我相关
我的任务
数据库(包含打印,安装,报表)
VB 数据库(包含打印,安装,报表)
复制链接
扫一扫
分享
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章