VB如何接Access 2003,要详细的好么,我接不上一直,急用

来源:百度知道 编辑:UC知道 时间:2024/09/24 15:29:09
谢了给你们加分

首先添加一个ADODC部件,
在窗体中放一个ADODC部件,
通过字设置符串连接数据库.
给10分也只能说到这里了,加分的话我可以给一个教程给你(说说你的邮箱)

'引用 Microsoft ActiveX Data Objects 2.8 Library
Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
'连接Access数据库
Set cnn = New ADODB.Connection
cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
Dim cnnFile As String
cnnFile = "Data Source=" & App.Path & "\data.mdb;Persist Security Info=False;Jet OLEDB:Database Password=00000"
cnn.Open cnnFile
'查询用户表,并将用户名显示在DataCombo控件中
Set rs = New ADODB.Recordset
strSQL = "SELECT * FROM TableName"
rs.Open strSQL, cnn, adOpenStatic, adLockReadOnly

1)首先,建立一个数据库,在数据库中建立一张表,表里最好写些数据。
2) 在窗体上添加一个data控件(数据控件),data控件是常用控件中的倒数第二个。
3)选中data控件,修改其两个属性
databasename属性:选择要连接的数据库名
recordsource属性:选择要连接的表名
4)若想显示出表中的数据,需要添加其他控件,例如text控件等。
将text控件的datasource属性设置为 data1(数据控件名称)
... dat