关于ADO(写给混淆adodb与adodc的),顺便发牢骚
以下是一个adodb应用的例子,希望对初学者有点帮助。
========================================================
Dim Rs As Recordset
Dim Cnn As ADODB.Connection
'-------------------------------------------------------
Private Sub Form_Load()
Dim Constring As String
Set Cnn = New ADODB.Connection
Set Rs = New Recordset
Constring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data\medic.mdb;Persist Security Info=false;Jet OLEDB:Database Password=123"
'完整的格式了,包括加了密码(123)的mdb,没有密码的话就留空或去掉password=123些个字串。
Cnn.ConnectionString = constring
Cnn.Open
Rs.Open "用户表", Cnn, adOpenStatic, adLockOptimistic
'打开表,全部字段。数据源中直接写表名,使用全部字段
Set dataGrid1.DataSource = Rs
Set Text2.DataSource = Rs
Text1.DataField = "姓名"
'绑定数据到对应控件,这里我用了一个textbox,一个datagrid
End Sub
=========================================================
而用adodc控件的方法初学者大多是比较容易上手,然后也就是最容易搞混的地方=》
这里,form上并不要出现adodc控件。当然还有,adodc控件处理相对路径和加密数据库也是较为麻烦。
这只是个最简单的例子,其实,建立连接的过程搞清楚了,其它的用法基本上与
adodc一样了,比如:用adodc,下移的语句是;adodc1.recordset.movenext
换adodb,也就是上面的例子里就这么写:Rs.movenext
其它的属性也好,方法也好,类同。
总的感觉是,用adodc设计时容易一点,代码写的少一点,就是路径那儿与密码那儿
麻烦一点(先绝对路径库不加密码编程,打包时换连接字串再给库加密码也可以解决问题)。
btw:
太多的贴子里是这样的:人家问的是adodc的连接,一家伙长篇大论的来个adodb的连接等,反正是混在一起说了。或许在下太菜,看起来别扭。所以,拜托大家不要老是把adodc控件与adodb混为一谈。回答别人问题前看看仔细好了。
还请高手不要见笑。