VB 数据库访问

Question

 大家好,对于VB数据库编程 我是一个初学者 
常常把DATA AD DAO 里的一些属性记混了 
虽然也可以使用.做一些查询 修改 
可是头脑里没有一个清析的思路
有没有那位可以分享下这方面的知识
我要的是很详细的:从打开到使用记录集 
每种方法分开写 
谢谢  不用代码  只要一个清析的思路就可以了

Answer 1

VB安装盘，VB98目录，ADO210.CHM。ADO 程序员参考，写的非常详细。
DAO基本不用了。

Answer 2

DATA(ACESS 97格式和一些老的如.dbf等) 和DAO(没用过)不用看了,已经淘汰,基本上没人用了.以下是MSDN上ADO的例子,看看吧!
ADO 教程 (VB)
Public Sub main()Dim conn As New ADODB.Connection
Dim cmd As New ADODB.Command
Dim rs As New ADODB.Recordset
' 步骤 1
conn.Open "DSN=pubs;uid=sa;pwd=;database=pubs"
' 步骤 2
Set cmd.ActiveConnection = conn
cmd.CommandText = "SELECT * from authors"
' 步骤 3
rs.CursorLocation = adUseClient
rs.Open cmd, , adOpenStatic, adLockBatchOptimistic
' 步骤 4
rs!au_lname.Properties("Optimize") = True
rs.Sort = "au_lname"
rs.Filter = "phone LIKE '415 5*'"
rs.MoveFirst
Do While Not rs.EOF
    Debug.Print "Name: " & rs!au_fname & " "; rs!au_lname & _
        "Phone: "; rs!phone & vbCr
    rs!phone = "777" & Mid(rs!phone, 5, 11)
    rs.MoveNext
Loop' 步骤 5
conn.BeginTrans' 步骤 6 - A
On Error GoTo ConflictHandler
rs.UpdateBatch
On Error GoTo 0conn.CommitTransExit Sub' 步骤 6 - B
ConflictHandler:rs.Filter = adFilterConflictingRecords
rs.MoveFirst
Do While Not rs.EOF
    Debug.Print "Conflict: Name: " & rs!au_fname; " " & rs!au_lname
    rs.MoveNext
Loop
conn.Rollback
Resume NextEnd SubVisual Basic 教程到此结束。

Answer 3

建议只学ADO.
ADO学精了,自然就能分得清楚了