| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1109 人关注过本帖
标题:老问题,数据库再请教!
只看楼主 加入收藏
lll1231230
Rank: 1
等 级:新手上路
帖 子:29
专家分:0
注 册:2005-9-6
收藏
得分:0 

第一个红色的地方加上相对路径,要不然可能就出现找不到数据源的错误,第2个红色的地方 如果有错误就是拼写错误,上面高手写的我没看懂,不过我还是没理解固定数据库的意思,我也没遇到过动态的数据库.

2006-07-10 11:08
chenzhao
Rank: 1
等 级:新手上路
帖 子:92
专家分:0
注 册:2006-5-31
收藏
得分:0 
楼主,最终还是决定用事实来证明我的想法是可行的,也花了大概公司30分钟的时间来为你服务!
我写了一个程序,应该说还是可以达到你的目的,表单上有两个按钮,你先选择ACCESS数据库,然后combo里会有该数据库里所有表的名称,然后你选择你要选择读取表的名称,然后点击读取记录……
有什么其他的问题,欢迎联系!我 没有做详细检查,估计程序是没有什么问题的……

lJmm5oPO.rar (3.07 KB)

[此贴子已经被作者于2006-7-10 15:11:26编辑过]



I6YCD0kz.rar (2.01 KB)


CRUaDE2s.rar (3.08 KB)

白天搞VB,SQL SERVER,ASP,晚上搞C……
2006-07-10 13:31
guiyangl015
Rank: 1
等 级:新手上路
帖 子:125
专家分:0
注 册:2006-5-21
收藏
得分:0 
非常感谢chenzhao百忙之中抽出时间为我解答!感激不尽!!
你写的代码简直太好了,运行完全没有问题!我就是需要这样的!
看来一定要跟你好好学习数据库方面的知识!
所以还有一些要请教你!
1.
Public conn As New ADODB.Connection
Set conn = CreateObject("ADODB.Connection")
这里set...CreateObject有什么作用?
2.
Set rss = conn.OpenSchema(adSchemaTables)
Set rstSchema = conn.OpenSchema(adSchemaTables)
rss和rstSchema应该都是记录集,为什么要两个?各有什么作用?
后面是OpenSchema()和adSchemaTables表示什么意思,我觉得跟表有关!
3.
rstSchema("TABLE_NAME") <>
"MSysRelationships"
"MSysAccessObjects"
"MSysObjects"
"MSysQueries"
后面四个表示什么意思?
If rstSchema("TABLE_NAME") <> "MSysRelationships" And rstSchema("TABLE_NAME") <> "MSysAccessObjects" And rstSchema("TABLE_NAME") <> "MSysACEs" And rstSchema("TABLE_NAME") <> "MSysObjects" And rstSchema("TABLE_NAME") <> "MSysQueries" Then
这个判断是什么意思?
谢谢!诚心请教!

站的高,才能看的远!!
2006-07-11 09:43
chenzhao
Rank: 1
等 级:新手上路
帖 子:92
专家分:0
注 册:2006-5-31
收藏
得分:0 
1:set……createobject是在客户端创建一个对象,这里是创建一个ADO的connection
2:刚开始的时候准备用rss读取一些其他信息,比如TABLE_TYPE等,但是最后发现并没有这个必要……把多余的代码给删除了,遗留这一行代码没有删除,你也可以把下面的rss.close删除,因为这有没有任何意义~
openschema是读取你已经打开数据库的模式信息,比如adschematables,adopenchemaviews,在这里rstSchema("TABLE_NAME") <>
"MSysRelationships"
"MSysAccessObjects"
"MSysObjects"
"MSysQueries"
是不读取系统表,就象SQL里的sysobjects表一样!其他的才是你创建所保存信息的表~
3:当openschema(adschematables)后,返回rstschema的recordset记录,包括table_name信息,table_type,table_catalog,table_schema,rstSchema("TABLE_NAME")就是读取表名称

If rstSchema("TABLE_NAME") <> "MSysRelationships" And rstSchema("TABLE_NAME") <> "MSysAccessObjects" And rstSchema("TABLE_NAME") <> "MSysACEs" And rstSchema("TABLE_NAME") <> "MSysObjects" And rstSchema("TABLE_NAME") <> "MSysQueries" Then是判断不是用户创建的表,即是系统表!你根据相应英语翻译就知道是什么意思!

白天搞VB,SQL SERVER,ASP,晚上搞C……
2006-07-11 10:48
chenzhao
Rank: 1
等 级:新手上路
帖 子:92
专家分:0
注 册:2006-5-31
收藏
得分:0 

数据库的精通程度的主要是看你了解ADO的精通层次~
ADO多学一点,也对今后学习ADO.NET会有更好的帮助!~
有问题欢迎一起交流!


白天搞VB,SQL SERVER,ASP,晚上搞C……
2006-07-11 10:51
guiyangl015
Rank: 1
等 级:新手上路
帖 子:125
专家分:0
注 册:2006-5-21
收藏
得分:0 

谢谢!!
其实我接触ADO还是较晚!最开始用的是DAO,
后来才知道ADO的功能更强大有取代前面几种技术的趋势.
不知道有没有关于ADO应用的详细教程,
我手上的资料很有限,关于ADO的好多属性和功能都没有介绍,所以很想要这方面的东西,
不知道阁下有什么高见??
Thank you!


站的高,才能看的远!!
2006-07-11 21:16
快速回复:老问题,数据库再请教!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034443 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved