VB - Kết nối với DB truy cập

Vấn đề

Tôi có một bảng Excel Tôi muốn sao chép DB trong Access khi tôi nhấp vào nút trên trang tính. Xls chứa bảng này.

Hiện tại tôi đang thử nghiệm kết nối và tạo bảng. Mã của tôi trông như thế này:

 Sub cnxBDD () string = "Carrier = Microsoft.Jet.OLEDB.4.0; Nguồn dữ liệu = C: \ Users \ Nant \ Desktop \ MABDD.mdb; Thông tin bảo mật liên tục = Sai" Đặt DB = ADODB mới. Bộ kết nối rec set = ADODB mới.Recordset BDD.Open CSQL Me.Refresh Sun DB As ADODB.Connection Sun rec set As ADODB.Recordset Sun CSQL As String, thư varchar (60), Nickname varchar (60), DateAjout date không null) "End Sub 

Lỗi xảy ra là

này: "ADO: Compile Error: gõ do người dùng xác định không xác định" và trên "ADODB mới. Kết nối"

Dung dịch

Nó nên thêm dự án Microsoft ActiveX Data Object xx Library.

Trong menu của trình soạn thảo VB => Công cụ => Tài liệu tham khảo ... đánh dấu tương ứng.

Sau đó, bạn cần khai báo các đối tượng trước khi tạo chúng ...

 DB As ADODB.Connection Sun Sun Sun rec set As ADODB.Recordset CSQL As String Set DB = New ADODB.Connection Set recset = New ADODB.Recordset 'Chuỗi kết nối str = "Carrier = Microsoft.Jet.OLEDB.4.0; C: \ Users \ Nant \ Desktop \ MABDD.mdb; Thông tin bảo mật liên tục = Sai "'Chúng tôi đã tạo chuỗi kết nối BDD.Open' Chúng tôi đã viết truy vấn CSQL 'Chúng tôi chuyển truy vấn tới cơ sở dữ liệu recIn.Open CSQL, DB,, , adCmdText 'Nó đóng kết nối và giải phóng các đối tượng trên BDD. Đóng rec set.Close = nothing Set DB = nothing Set recset 

Nó nên hoạt động!

Đồng thời kiểm tra mẹo này về kết nối VB với cơ sở dữ liệu Access:

//ccm.net/faq/6079-connecting-vb-to-database

chú thích

Cảm ơn Polux31 cho mẹo này trên diễn đàn.

Bài TrướC TiếP Theo Bài ViếT

Lên Trên LờI Khuyên