... "\" Then AppFolder = AppFolder & "\" ' Assign Full path database filename to Data1 Data1 .DatabaseName = AppFolder & "BIBLIO.MDB" End Sub Với cách code nói ... DBCombo1, nên bạn hãy thêm một control Data thứ nhì tên Data2 vào Form. Cho Data2 , hãy set property DatabaseName thành E:\Program trí của database. Giả dụ ta muốn để database trong cùng một folder ... AddNew mode Data1 .Recordset.AddNew ' Default Publisher is "GLOBAL ENGINEERING", i.e. PubID=324 DBCombo1.BoundText = 324 ' Place controls in Edit Mode SetControls (True)...