社区
数据库(包含打印,安装,报表)
帖子详情
ADO 菜问……
SetMeFree
2004-10-27 06:23:01
有一个未知 Jet 数据库,但确定是数据库,如何用 VB 的ADO 获取其包含的表的数量和表名?对于其他数据库是不是一样的方法?
我苦思未解,或者 ADO 不支持此法?
类似于 Data View,只要设置 ConnectionString,再执行 Open,即可获取Table的目录树。
...全文
161
14
打赏
收藏
ADO 菜问……
有一个未知 Jet 数据库,但确定是数据库,如何用 VB 的ADO 获取其包含的表的数量和表名?对于其他数据库是不是一样的方法? 我苦思未解,或者 ADO 不支持此法? 类似于 Data View,只要设置 ConnectionString,再执行 Open,即可获取Table的目录树。
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用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可以得到。
不过,连接的字符串肯定是不通用的,如果不知道是什么数据库,恐怕很难连接上。
小
菜
编程成长记
小
菜
今年计算机专业大四了,学了不少软件开发方面的东西,也学着编了些小程序,踌躇满志,一心要找一个好单位。当投递了无数份简历后,终于收到了一个单位的面试通知,小
菜
欣喜若狂。到了人家单位,前台小姐给了他一...
VC访
问
数据库学习总结
VC连接数据库方式 目前Windows系统上常见的数据库接口包括: ODBC(开放数据库互连):访
问
数据库得先配置数据源 ...
ADO
(ActiveX数据对象) ODBC(Open Database Connectivity,开放数据库连接)是
三层架构详解(服务员-厨师-采购员)
三层架构详解 1,什么是三层? 2,为什么使用三层? 3,三层与以往使用的两层相比...还记得大话设计模式里第23章大鸟和小
菜
吃羊肉串的故事——由在小摊吃到饭店吃引来的一个命令模式(当然今天不是研究命令模式)。...
如何使用sql函数平均值、总数、最小值、最大值、总和、标准差
ado
如何使用sql函数呢? 譬如asp程式码rs21.asp,在用户端使用浏览器,浏览执行的结果,显示执行sql函数的结果。 asp程式码rs21.asp如下: set conn1 = server.createobject("
ado
db.connection") conn1....
免费给你打工
很想有更多的软件开发实战,学校里学的东西,那个叫做 “无语”…… 现在偶已经学过,简单VB(基本上没怎么用,忘了)语言,C++语言(一般),C#语言(满感兴趣,自己努力在学),还有
ADO
.net技术,SQL SERVER ...
数据库(包含打印,安装,报表)
1,217
社区成员
55,952
社区内容
发帖
与我相关
我的任务
数据库(包含打印,安装,报表)
VB 数据库(包含打印,安装,报表)
复制链接
扫一扫
分享
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章