計算機二級VB輔導:VB通過DAO訪問Access數(shù)據(jù)庫

字號:

DAO就是Database access Object,數(shù)據(jù)庫訪問對象的英文縮寫。在VB中提供了兩種與Jet數(shù)據(jù)庫引擎接口的方法:Data控件和數(shù)據(jù)訪問對象(DAO)。Data控件只給出有限的不需編程而能訪問現(xiàn)存數(shù)據(jù)庫的功能,而DAO模型則是全面控制數(shù)據(jù)庫的完整編程接口。Data控件將常用的DAO功能封裝在其中,它與DAO控件的關系就好象內存與CACHE之間的關系一樣,所以這兩種方法并不是互斥的,實際上,它們常同時使用
    引用DAO類型庫
    1、從“工程”菜單中選擇“引用”菜單項;
    2、在可引用列表框中選擇“Microsoft DAO 3.6 Object Library”項
    3、最后“確定”即可
    設置DAO數(shù)據(jù)類型變量
    DAO數(shù)據(jù)類型變量共分成兩種:
    1、Database變量
    Public db As Database
    對應于access數(shù)據(jù)庫,通常在模塊中被定義為Public全程變量
    2、RecordSet變量
    Dim rs As RecordSet
    設置DAO數(shù)據(jù)類型變量(二)
    建立了數(shù)據(jù)庫對象變量后,我們便可打開數(shù)據(jù)庫了,在一般情況下都只是訪問一個數(shù)據(jù)庫,當打開數(shù)據(jù)庫后再對數(shù)據(jù)庫中的各個記錄進行操作,這就要用到Recordset 對象建立記錄集
    例如:
    打開數(shù)據(jù)庫
    Private Sub Command_OpenDatabase_Click() Dim db as Database Dim rs As Recordset Set db = OpenDatabase ( App.path & "\數(shù)據(jù)庫名稱.mdb" ) Set rs = db.OpenRecordset ( " select * from 表名 " ) End Sub 這樣,數(shù)據(jù)庫中的記錄便放到Recordset中,可以進行后續(xù)操作了