4、 如何用Adodc动态的进行绑定。 Adodc控件可以在属性叶面对数据库进行连接,但是这样的连接数据库很死,而且弄不好,连接字符就没有了,所以在程序中用代码进行连接的话,方便得多。 在增加与删除其实Adodc控件与Recordset的区别只是把 Recordset更换成Adodc1.Recordset RecordSet的增加:Rs.AddNew,Adodc的增加:Adodc1.Recordset.AddNew 示范: '--如何用Adodc控件代码去连接Access Private Sub Command1_Click() Dim strConn As String
Adodc控件可以在属性叶面对数据库进行连接,但是这样的连接数据库很死,而且弄不好,连接字符就没有了,所以在程序中用代码进行连接的话,方便得多。
在增加与删除其实Adodc控件与Recordset的区别只是把 Recordset更换成Adodc1.Recordset
RecordSet的增加:Rs.AddNew,Adodc的增加:Adodc1.Recordset.AddNew
示范:
'--如何用Adodc控件代码去连接Access
Private Sub Command1_Click()
Dim strConn As String
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False"
' adodc的连接字符串
Adodc1.ConnectionString = strConn
' 指定Command对象的形态
Adodc1.CommandType = adCmdText
' 设置传回一个资料录集。
Adodc1.RecordSource = "Select * from People"
' 将记录集合绑定DataGrid1
Set DataGrid2.DataSource = Adodc1
End Sub