标题:VB+ACCESS的数据库连接
只看楼主
davaid1983
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-3-11
 问题点数:0 回复次数:5 
VB+ACCESS的数据库连接

请教怎么实现VB+ACCESS的数据库连接,以及怎样才能在DataGrid中显示指定表中的数据啊

搜索更多相关主题的帖子: 数据库 ACCESS 
2006-03-15 10:59
kfp_kaka
Rank: 4
等 级:贵宾
威 望:13
帖 子:353
专家分:0
注 册:2006-1-12
得分:0 
用ADODC控件,很简单的
先添加一个ADODC控件,在部件里添加Microsoft ADO Data Control 6.0 (sp*) *为里机上的版本。
设置ADODC的ConnectionString属性连接好数据库,然后设置ADODC空间的RecordSource属性选择你要显示的表。
然后把DataGird的DataSource属性设置为你新建的ADODC控件就可以了

爱一个人不一定要拥有她 拥有一个人就一定要好好的爱她
2006-03-15 11:15
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
得分:0 
支持版主

E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-03-15 18:18
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 

在引用里添加Microsoft ActiveX Data Object 2.X Library
添加命令按扭,
编写如下代码:
Option Explicit

Private Sub Command1_Click()
Dim iConn As New ADODB.Connection '定义ADO对象
Dim iRs As New ADODB.Recordset
Dim ConnStr As String
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info =False;" _
& "Data Source=D:\vb60实例\mdb\score01.mdb"
iConn.Open ConnStr '连接数据库
iRs.CursorLocation = adUseClient
iRs.Open "SELECT * FROM 成绩单", iConn, adOpenKeyset, adLockPessimistic '打开数据表
Set DataGrid1.DataSource = iRs '将表格的数据源设置为iRs
End Sub


我的msn: myfend@
2006-03-15 18:29
pipiyu1
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2006-3-16
得分:0 

完全在属性里面设置就ok

2006-03-22 13:37
linxin815
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2006-3-22
得分:0 
最简单的就是用数据窗体向导,特别适合初学者,代码完全有程序自身提供
2006-03-22 19:25



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-50504-1-1.html




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

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