Sử dụng điều khiển dữ liệu để tạo giao diện người sử dụng

12.4.3Thao tác trên các mẩu tin thông qua điều khiển ADO Data

Phần lớn, chương trình phải viết khi làm việc với điều khiển dữ liệu đều tập trung trên đối tượng Recordset. Một đối tượng Recordset trở nên sẵn sàng khi ta quy định thuộc tính ConnectionString và RecordSource cho nó. Để truy cập một thuộc tính hay phương thức của một đối tượng Recordset của điều khiển dữ liệu trong chương trình, ta tham chiếu đến điều khiển dữ liệu, rồi tham chiếu đến đối tượng Recordset.

Ví dụ: Để di chuyển đến mẩu tin thư nhất của Recordset chứa trong điều khiển dữ liệu tên là datCustomer, ta dùng đoạn chương trình sau:
DatCustomer.Recordset.MoveFirst
Tại sao không dụng datCustomer.MoveFirst ? Câu trả lời là điều khiển dữ liệu không giống như dữ liệu, thao vào đó, điều khiển dữ liệu dưới dạng đối tượng Recordset. Các thuộc tính bản thân của điều khiển dữ liệu gắn liền với sự xuất hiện và các phản ứng của nó, trong khi đối tượng Recordset có các thuộc tính và phương thức gắn liền với chính dữ liệu.

12.4.3.1Dùng điều khiển dữ liệu để tạo mẩu tin mới

• 
  Quy định thuộc tính EOFAction của điểu khiển dữ liệu là 2 AddNew. Giải pháp này không đòi hỏi lập trình.
  
• 
  Dùng phương thức AddNew và Update của đối tượng Recordset của điều khiển dữ liệu. Giải pháp này phức tạp hơn, nhung cho ta khả năng điều khiển trên những gì xảy ra khi người sử dụng muốn tạo mẩu tin mới. Nó cũng thích hợp cho trường hợp ta muốn che dấu điều khiển dữ liệu đối với người sử dụng.
  

1. 
   Trong đề án điều khiển Data, quy định thuộc tính EOFAction của điều khiển Data là 2 – AddNew.
   
2. 
   Thi hành đề án.
   
3. 
   Nhấn nút MoveLast của điều khiển data, rồi nhấn Next, Thay vì di chuyển đến mẩu tin cuối cùng trong Recordset, điều khiển dữ liệu tạo một mẩu tin mới. Ta có thể nói rằng mẩu tin này mới vì tất cả các điều khiển rằng buộc trên biểu mẫu đều rỗng.
   
4. 
   Nhập dữ liệu trong các điều khiển rằng buộc.
   
5. 
   Dùng nút Previous của điều khiển Data, di chuyển đến mẩu tin trước đó. Mẩu tin mới được lưu vào cơ sở dữ liệu.
   

1. 
   Thêm các nút lệnh và các điều khiển khác và giao diện để thể hiện phương thứuc AddNew và Update.
   
2. 
   Trong sự kiện Click của nút Update, đưa vào dòng chương trình sau
   

3. 
   Trong sự kiện Click của nút Update, đưa vào dòng chương trình sau:
   

4. 
   Khi người sử dụng nhập liệu, họ có thể tuỳ chọn nhấn Update Record để ghi nhận mẩu tin mới vào cơ sở dữ liệu. Họ còn có thể di chuyển sản mẩu tin khác để lưu nó, điều này cũng đúng với cập nhật mẩu tin.
   

Điểm quan trọng cần cần hiểu là khi người sử dụng tạo một mẩu tin mới trong giao diện nhập liệu sử dụng điều khiển dữ liệu, nhiều hoạt động sẽ là không hợp lệ bởi vì chưa có mẩu tin hiện hành.

Ví dụ, nếu ứng dụng cho phép người sử dụng tạo một mẩu tin bằng cách quy định thuộc tính EOFAction của điều khiển dữ liệu là AddNew, rổi cho phép người sử dụng thi hành phương thức Delete trên mẩu tin hiện hành, ứng dụng sẽ báo lỗi.

Lỗi xảy ra bởi vì không có mẩu tin bị xoá. Để tránh tình huống này, ta có một vài lựa chọn. Nếu ta đã quen với Visual Basic, lựa chọn hiển nhiên là bẫy lỗi và cấm phương thức Delete. Nhưng có một phương thức tốt hơn để tránh rắc rối này : vô hiệu hoá nút Delete để ngăn cản người sử dụng nhấn nó trong lần đầu tiên .

12.4.3.2Dùng sự kiện moveComplete để cập nhật giao diện người sử dụng

Ta có thể dùng sự kiện MoveComplete của điều khiển ADO Data để khởi động sửa đổi trong ứng dụng khi người sử dụng di chuyển từ mẩu tin này sang mẩu tin khác.

Sự kiện MoveComplete được kích hoạt sau khi một mẩu tin mới trở thành hiện hành. Đây là một trong vài sự kiện được kích hoạt khi điều khiển di chuyển từ một mẩu tin này sang mẩu tin khác. Các sự kiện khác bao gồm WillChange, được kích hoạt khi điều khiển di chuyển từ mẩu tin này san mẩu tin khác, hay thay đổi một mẩu tin và sự kiện RecordChangeComplete, xảy ra khi một mẩu tin được sửa đổi thành công trong cơ sở dữ liệu như một kết quả của hoạt động trong điều khiển dữ liệu.

Ta chủ yếu dùng sự kiện RecordChangeComplete để thực hiện các tác vụ sau:

• 
  Thi hành một câu truy vấn trên các mẩu tin liên quan đến mẩu tin chính Microsoft Access gọi nó là giao diện “biểu mẫu chính/ biểu mẫu con”.
  
• 
  Tính toán một giá trị dẫn xuất từ một hay nhiều giá trị trong mẩu tin.
  
• 
  Quản lý nhiều vấn đề về giao diện người sử dụng để đáp ứng với trạng thái Recordset của điều khiển dữ liệu, thi hành những công việc như là che giấu hoặc vô hiệu hoá tính năng nào đó nếu một mẩu tin hợp lệ vắng mặt.
  

Lưu ý: Điều khiển DAO Data cung cấp các sự kiện tương tự những sự kiện mô tả ở đây. Các sự kiện “Will” của điều khiển ADO Data ( như là WillMove và WillChange ) gắn giống với sự kiện Validate của điều khiển DAO Data, trong khi các sự kiện “Complete” của điều khiển ADO Data ( như là RecordChangeComplete và MoveComplete ) thì tương tự với sự kiện Reposition của điều khiển DAO Data.

Ví dụ : Ta quan tâm đến vùng mà khách hàng cư ngụ. Ta có thể viết chương trình để quy định chia các Tiểu bang, mỗi tiều bang là một vùng. Các Tiểu bang không có quan hệ kinh doanh sẽ được gắn giá trị Aunassigned. Ta có thể dùng điều khiển ADO Data để trình bày vùng của từng mẩu tin trong biểu mẫu như sau:

1. 
   Trên biểu mẫu của ứng dụng điểu khiển dữ liệu, ta tạo một điều khiển nhân và đặt tên nó là lblRegion.
   
2. 
   Trong thủ tục sự kiện MoveComplete của điều khiển ADO Data, đưa vào đoạn chương trình sau:
   

Option Explicit

Private Sub datCusstomer_MoveComplete ( ByVal AddReason as ADODB.EventReasonEnum, ByVal pError Ass ADODB.Error, asStatus As ADODB.EventStatusEnum, ByVal Rs as ADODB.Recordset )

Dim strST as String

Dim StrRegion as String

If rs.BOF = false and Rs.EOF =False Then

strST = RS.Field(“State”) & “”

end if

‘Display region

Select Case strST

Case “VT”, “NH”, “CT”

strRegion = “Northeast”

Case “NC”, “KY”, “AR”

strRegion = “South”

Case “OK”, “MN”, “MI”, “OH”

strRegion = “Midwest”

Case “MT”

strRegion = “West”

Case Else

strRegion = “Unassigned”

End Select

lblRegion.Caption = strRegion

End Sub.

3. 
   Thi hành ứng dụng, ta sẽ thấy các vùng được hiển thị khi ta thay đổi từ màu này sang màu khác.
   

12.4.3.3Dùng điều khiển Data để xoá mẩu tin

Để xoá mẩu tin trong một ứng dụng sử dụng điều khiển dữ liệu, ta dùng phương thức Delete của đối tượng Recordset của điều khiển dữ liệu:
datCustomer.Recordset.Delete
Có một cảnh báo quan trọng liên quan đến việc sử dụng phương thức Delete của đối tượng Recordset với điều khiển Data. Khi xoá một mẩu tin, không có mẩu tin hiện hành xuất hiện để thay thế, recordset không có chỗ đứng. Vì vậy, để giải quyết rắc rối này, ta phải di chuyển sang mẩu tin khác trong Recordset ( chủ yếu dùng phương thức MoveNext hay MoveLast của Recordset )

Lưu ý: Như đã nói trong phần tạo mẩu tin và dùng các sự kiện của điều khiển dữ liệu, ta phải bảo đảm rằng có một mẩu tin hiên hành trong recordset của điều khiển dữ liệu khi ta thi hành phương thức Delete, hoặc là ứng dụng sẽ báo lỗi. Để tránh lỗi này ta phải thiết kế giao diện người dùng sao cho người sử dụng không thể xoá mẩu tin không hiện hữu . Giải pháp hữu hiệu là kiểm tra thuộc tính EOF và BOF của recordset trước khi tiến hành phương thức Delete, nếu BOF hay EOF là True, thì phương thức Delete sẽ thất bại.

12.4.3.4Dùng sự kiện WillChangeRecord để bảo đảm dữ liệu hợp lệ

Trong lập trình cơ sở dữ liệu, việc kiểm tra dữ liệu hợp lệ (Validation) để đảm bảo rằng dữ liệu nhập vào hệ thống tuân thủ các điều kiện xác định bởi thiết kế ứng dụng.

Một cách để thi hành việc kiểm tra này khi lập trình với điều khiển ADO Data là viết chương trình trong sự kiện WillChangeRecord của điểu khiển. Sự kiện này được kích hoạt ngay sau khi mẩu tin được hiển thị bởi điều khiển dữ liệu bị thay đổi. Một tình huống hay gặp là người dùng kích hoạt sự kiện bằng cách di chuyển sang mẩu tin khác sau khi sửa đổi hay tạo một mẩu tin.

Khác với phiên bản trước của Visual Basic vốn sử dựng điều khiển DAO Data, điều khiển ADO Data báo lỗi theo từng kiểu hoạt động của điều khiển Data. Điều khiển DAO Data chỉ phát sự kiện Validate và Reposition vốn được kịch hoạt với một số lý do. Chương trình phải xử lý thêm để xác định tại sao sự kiện được kích hoạt.

12.4.3.5Validation ở mức bộ máy cơ sở dữ liệu

Ngoài việc xử lý các Validation bổ xung khi dữ liệu được nhập, ta còn có thể thi hành Validation ở mức bộ máy cơ sở dữ liệu. Các validation này tin cậy hơn, bởi vì nó được áp dụng bất chấp quá trình sửa đổi dữ liệu gì. Nhưng validation ở mức này kém linh hoạt, bởi vì nó gần như không can thiệp được. Hơn nữa ta chỉ có thể thi hành validation trên cơ sở dữ liệu chỉ với mức trường, ta không thể tiến hành validation để so sánh giữa 2 trường.

Validation ở mức bộ máy cơ sở dữ liệu là một chức năng của thiết kế cơ sở dữ liệu. Đối với cơ sở dữ liệu Jet, tạo các quy tắc cho validation trong phần design view của bảng trên Access là dễ dàng nhất.

Ví dụ, ta muốn bảo đảm mẫu tồn kho không bao giờ được nhập vào bảng Inventory mà không có số catolog. Để thực hiện điều này đối với Microsoft Access ta đặt trong thuộc tính Allow Zero Length là No.

12.4.3.6Làm cho validation rõ ràng hơn bằng Validation Text

Do người nhập liệu thiếu kinh nghiệm sẽ gặp thông báo lỗi do bộ máy cơ sở dữ liệu phát ra khi họ vi phạm quy tắc Validation. ta có thể hiển thị thông báo quen thuộc hơn khi người dùng nhập dữ liệu sai. Ta thực hiện điều này bằng thuộc tính Validation Text của cửa sổ định nghĩa bảng.

Ví dụ : Để thông báo một cách thân thiện hơn khi người sử dụng phạm quy tắc validation của CatalogNumber, ta làm như sau:

1. 
   Trong Access, mở thiết kế của bảng tblInventory.
   
2. 
   Trong thuộc tính Validation Text của trường CatalogNumber, nhập vào chuỗi ký tự sau :
   

Chú ý: Bạn phải gõ một số catalog bắt đầu bằng một ký tự từ A đến M

3. 
   Lưu và đóng thiết kế bảng và trở về Visual Basic.
   

Khi ta cố sửa giá trị trong trường Catolog Number thành một giá trị hợp lệ -. Ví dụ, sửa thành “Z12” một thông báo lỗi xuất hiện.

12.4.4Các thuộc tính quan trọng khác của điều khiển ADO DATA

Điều khiển ADO Data có một số thuộc tính bổ sung quản lý cách hoạt đọng của nó, ta có thể quy đinh hầu hết các thuộc tính vào lúc thiết kế. Vì vậy, ta không cần lập trình.

12.4.4.1Thuộc tính CommandType

Thuộc tính CommandType xác định kiểu lệnh mà điều khiển ADO Data phát ra trên nguồn dữ liệu để lấy về các mẩu tin. Ví dụ trong chương này sử dụng CommandType là 2- adCmdTable để mở và làm việc trực tiếp với bảng. Tuy nhiên, ta có thể dùng lệnh dạng văn bản hay thủ tục đã lưu trữ để cung cấp dữ liệu cho điều khiển dữ liệu.

Lệnh dạng văn bản là một chuỗi, được tạo ra trong mã nguồn của ứng dụng, và được đưa vào bộ máy cơ sở dữ liệu để xử lý.Đối với các cơ sở dữ liệu quan hệ ( như Microsoft Jet, cũng như nhiều hệ cơ sở dữ liệu khác ), chuỗi này được cấu tạo dưới câu truy vấn SQL. Tuy nhiên ADO cho phép ta dùng ngôn ngữ bất kỳ mà nguồn dữ liệu có thể hiểu được như là lệnh danh văn bản.

Một thủ tục đã lưu trữ là một câu truy vấn hay các lệnh khác được nhúng trong bản thân cơ sở dữ liệu. Ta chủ yếu tạo một thủ tục đã lưu trữ ( store procedure ) để tận dụng khả năng quản lý tạp trung của thủ tục truy cập cơ sở dữ liệu, cũng như cải tiến khả năng hoạt động của cấu trúc truy vấn. Cơ sở dữ liệu Jet của Microsoft cung cấp một dạng cơ bản của thủ tục đã lưu trữ gọi là QueryDef. Microsoft SQL Server cung cấp một bộ máy đầy đủ các mở rộng đến SQL để cho phép ta lập trình các thủ tục đã lưu trữ.

12.4.4.2Thuộc tính EOFAction

Thuộc tính EOFAction xác định những gì điều khiển dữ liệu thực hiện khi người sử dụng di chuyển đến cuối của Recordset. Nếu ta quy định thuộc tính là 2 – AddNew, điều khiển tạo một bản ghi mới khi người sử dụng đi qua phần cuối cùng của mẩu tin hiện hành. ( Nói cách khác, giá trị này làm cho giao diện hoạt động tương tự biểu mẫu của Microsoft Access ). Tuy nhiên, nhớ rằng giá trị này không phải là hoạt động mặc định của điều khiển dữ liệu của Visual Basic ; ta phải thay đổi thuộc tính lúc thiết kế để đảm bảo rằng điều khiển có phản ứng như vậy.

Để tạo một mẩu tin mới khi thuộc tính EOFAction của điều khiển dữ liệu được quy đinh AddNew, ta nhấn nút MoveLast, rồi nhấn nút MoveNext.

12.4.4.3Dùng thuộc tính Mode để kiểm soát truy cập đến dữ liệu

Bằng cách quy định thuộc tính Mode của điều khiển ADO Data, ta có thể kiểm soát xem những người sử dụng khác có truy cập cơ sở dữ liệu hay không khi ứng dụng đang thi hành. Ví dụ, bằng cách quy định thuộc tính Mode là 12 – adModeShareExclusive, ứng dụng sẽ được tăng cường khả năng truy cập loại trừ đến dữ liệu - không người sử dụng nào khác có thể truy cập đến nó khi ứng dụng đang thi hành.

Ta còn có thể mở một nguồn dữ liệu chỉ đọc ( Read only ) bằng cách quy định thuộc tính Mode là 1 – adModeRead ; ứng dụng của bạn sẽ nhận được khả năng truy cập chỉ được đọc dữ liệu. Ưu điểm của giá trị này là, cải tiến khả năng hoạt động, bởi vì bộ máy cơ sở dữliệu không cần quan tâm đến những vấn đề rắc rối như là khoá mẩu tin hay kết nối nhiều người sử dụng xảy ra khi có nhiều hơn một ứng dụng truy cập đến cùng một mẩu tin.

Каталог: hungpn -> LaptrinhWindowsVB
LaptrinhWindowsVB -> Kiến trúc ole db/ado
LaptrinhWindowsVB -> ListView dùng để hiển thị danh sách các đối tượng theo nhiều hình thức thể hiện khác nhau. Ví dụ: trong cửa sổ Window Explorer, bên trái là danh sách các ổ đĩa và thư mục được tổ chức theo dạng cây sử dụng TreeView

tải về 1.69 Mb.

Chia sẻ với bạn bè của bạn: