1, Sử dụng Connection để kết nối CSDL : 1.1, Khai Báo : - Khai báo cấp vùng nhớ Dim cnn As New ADODB.Connection - Khai báo cấp sử dụng Dim cnn As ADODB.Connection … Set cnn = New ADODB.Connection 1.2, Thuộc tính ConnectionString : khai báo trình Provider CSDL VD : Dim cnn As New ADOBD.Connection cnn.ConnectionString = “Provider = Microsoft.Jet.OLEDB.4.0;” & _ “ DataSource = “ & App.Path & “CSDL.MDB” 1.3, Thuộc tính CursorLocation : quy định trỏ liên kết liệu tạo máy chủ hay máy trạm - adUseClient : [3] liệu tạo máy trạm - adUseServer : [2] liệu tạo máy chủ 1.4, Hành động Open : nhằm thực việc kết nối ứng dụng với nguồn sở liệu 1.5, Thuộc tính State : dùng kết nối để kiểm tra việc kết nối có thành công hay không - adStateOpen : [1] kết nối mở - adStateClosed : [0] kết nối đóng 2, Mở RECORDSET : .Open [Source], [ActiveConnection], [CursorType], [LockType], [Options] - Source : nội dung truy xuất ( Table, Query, SQL…) - ActiveConnection : nội dung khai báo ConnectionString hay Connection mở - CursorType : phân loại RecordSet với giá trị sau : + adOpenStatic : mẩu tin tạo máy Không tự động cập nhật + adOpenDynamic : mẩu tin tạo máy chủ Tự động cập nhật + adOpenKeySet : không tự động cập nhật mẩu tin bị xoá hay thêm người dùng sử dụng chung RecordSet Không truy cập mẩu tin bị xoá người dùng khác thay đổi người khác hiển thị + adOpenForewardOnle : di chuyển MoveNext 2, Mở RECORDSET : - LockType : xác định cách khoá liệu cập nhật mẩu tin + adLockReadOnly : [1] cho phép đọc (luôn khoá) + adLockOptimistic : [2] khoá cập nhật mẩu tin + adLockBatchOptimistic : [3] giống [2] cho phép cập nhật đồng thời nhiều mẩu tin + adLockPessimistic : [4] mẩu tin khoá thực Update hay AddNew dùng CursorLocation adUseServer - Options : xác định kiểu Source, bỏ qua khai báo phải tương ứng kiểu Source không lỗi + adCmdTable : Source Table hay Query + adCmdText : Source truy vấn SQL + ađCmStoreProc : Stored Procedure SQL SERVER 2.1, Truy xuất RecordSet : < Tên RecordSet >.Fields(“< tên field >”).Value Hay < Tên RecordSet>! Hay < Tên RecordSet >.Fields(Index) 2.2, Thuộc tính RecorSet : -RecordCount : tổng số mẩu tin RecordSet -AbsolutePosition : vị trí mẩu tin hành -BOF, EOF : vị trí đầu cuối cấu trúc RecordSet 3, Hiển Thị Dữ Liệu Trong RecordSet : - Các đối tượng hiển thị : Label, TextBox, CheckBox, Image, nhóm ActiveX Control (DataList, DataGrid, MSHFlexGrid) - Thuộc tính kết nối : DataSource, DataField Các ActiveX có thêm : + RowSource : RecordSet cung cấp giá trị liệt kê + ListField : tên Field muốn điều khiển hiển thị + BoundColumn : tên Field cập nhật giá trị (trùng với DataField) 4, Di chuyển ghi hành động Move - .Move numRec NumRec : số ghi cần nhảy qua (mang giá trị âm dương) - MoveFirst, MovePrevious, MoveNext, MoveLast 5, Thêm, Xoá, Cập Nhật/Không Cập Nhật liệu : 5.1, Hành động thêm, xoá, cập nhật mẩu tin : - AddNew : nhập thêm mẩu tin - Delete : xoá mẩu tin hành RecordSet - Update/CancelUpdate : cập nhật/không cập nhật Dùng LockType adLockOptimistic hay adLockPessimistic - UpdateBatch/CancelBatch : cập nhật/không cập nhật thay đổi RecordSet LockType adLockBatchOptimistic 5.2, Cơ chế cập nhật liệu tự động RecordSet với LockType : - adLockOptimistic : cập nhật vào nguồn thay đổi - adLockBatchOptimistic : cập nhật vào nguồn gọi thực hành động UpdateBatch 6, Sự kiện MoveComplete : 6.1, Khai báo Dim WithEvents rst As ADODB.RecordSet Thời điểm phát sinh : mẩu tin hành thay đổi 6.2, Sử dụng kiện MoveComplete : - Hiển thị vị trí mẩu tin hành qua AbsolutePosition - kiểm soát mờ/ chức di chuyển qua lại mẩu tin - Cho biết tình trạng mẩu tin hành thông qua EditMode + adEditNone : [0] mẩu tin trạng thái bình thường + adEditProcess : [1] tình trạng chỉnh sửa chưa cập nhập + adEditAdd : [2] tình trạng thêm chưa cập nhật + adEditDelete : [3] tình trạng đánh dấu huỷ ... xuất RecordSet : < Tên RecordSet >.Fields(“< tên field >”).Value Hay < Tên RecordSet> ! Hay < Tên RecordSet >.Fields(Index) 2.2, Thuộc tính RecorSet : -RecordCount : tổng số mẩu tin RecordSet. .. -AbsolutePosition : vị trí mẩu tin hành -BOF, EOF : vị trí đầu cuối cấu trúc RecordSet 3, Hiển Thị Dữ Liệu Trong RecordSet : - Các đối tượng hiển thị : Label, TextBox, CheckBox, Image, nhóm ActiveX... sử dụng chung RecordSet Không truy cập mẩu tin bị xoá người dùng khác thay đổi người khác hiển thị + adOpenForewardOnle : di chuyển MoveNext 2, Mở RECORDSET : - LockType : xác định cách khoá liệu