Giáo trình đào tạo Visual Basic_8

Nếu bạn dùng qua Automation qua OLE Automation, bạn sẽ thấy điểm khác biệt quan trọng giữa kỹ thuật Automation trong phần này và OLE Automation. Trong Visual Basic ta cần tránh định nghĩa đối tượng Automation theo ki ểu Object tổng quát.
Nội dung trích xuất từ tài liệu:
Giáo trình đào tạo Visual Basic_8này nhưng vẫn dùng báo cáo Access trong ứng dụng, bạn có th ể xem xét gi ải phápthiết lập báo cáo của Video soft VSREPORT Để lập trình Access thông qua Automation, ta làm một tham chiếu đến Accessbằng cách từ menu Project chọn References chọn h ộp dánh dấu “Microsoft Access8.0 Object Library” Tránh dùng dàng buộc trễ với Automation14.2.1.1.1 Nếu bạn dùng qua Automation qua OLE Automation, bạn sẽ thấy điểm khácbiệt quan trọng giữa kỹ thuật Automation trong phần này và OLE Automation.Trong Visual Basic ta cần tránh định nghĩa đối tượng Automation theo ki ểu Objecttổng quát. Ví dụ trong Visual Basic 3.0 ta có thể viết chương trình như sau: Dim appAcces as Object Set appAcces =CreateObject(“Access.Application”) Đoạn chương trình trên hoạt động tốt với Visual Basic 3.0 nhưng có cách kháctốt hơn. Thay vì dùng kiểu Object ta dùng kiểu dữ liệu đối tượng AutomationServer cung cấp. Bởi vì khi đó Visual Basic không c ần thi hành câu l ệnh truy v ấntrên Automation Server mỗi khi ta truy nhập nó để xác định ki ểu đ ối t ượng c ầntạo. kỹ thuật này gọi là ràng buộc trế, giờ đây chỉ phù hợp với hai tình huống: • ta không biết trước kiểu đối tượng Automation Server khi cần t ạo đ ối tượng • Ta đang sử dụng một môi trường phát triển ứng dụng không h ỗ tr ợ ràng buộc sớm sẽ cải tiến đáng kể tốc đọ chương trình, nhất là những lệnh cần nhiều sử lý để gọi đến Microsoft Office Automation Server Thi hành Automation để điều khiển Microsoft Access14.2.1.1.2 Sau khi thiết lập tham chiếu đến Microsoft Access từ trong ứng d ụng, ta viêtchương trình để tạo instance cho đối tượng. khi đó có một đối tượng tham chi ếuđến server, Visual Basic tích hợp mô hình đối tượng của server vào tính năng liệt kêthành phần tự động Ngoài ra ta có thể xem toàn bộ thuộc tính, phương thức và sự ki ện của đ ốitượng Access trong cửa sổ Object Browser Đoan chương trình sau tạo một instance của Microsoft Access trong VisualBasic. Nó sử dụng Automation để thi hành phương thức Docmd của Access Option Explicit Dim MSAccess As Access.Application Private Sub Command1_Click() Set MSAccess = New Access.Application MSAccess.OpenCurrentDatabase (D:TungPTTemp eins.mdb ) MSAccess.DoCmd.OpenReport rptEmployee, acViewNormal MSAccess.CloseCurrentDatabase Set MSAccess = Nothing End Sub sử dụng VSREPORTS để thi hành báo cáo Access14.2.1.2 VSREPORT được thực hiện theo 2 phần: • Trình tiện ích chuyển đổi dùng tập tin MDB c ủa Access và tạo m ột tập tin báo cáo từ đối tượng Report chứa trong cơ sở dữ liệu • điều khiển ActiveX dùng để mở tập tin báo cáo và thi hành báo cáo trong ứng dụng Cấu trúc này tương tự Crystal Reports. Với cả hai hệ th ống, ta phải t ạo m ộttệp tin thông báo, rồi thêm một điều khiển và vi ết đo ạn chương trình trong ứngdụng để in báo cáo. mỗi lần sửa đổi trong báo cáo, ta ph ải l ưu và phân phát l ại chongười sử dụng. Có nhiều điểm khác nhau giữa Crystal Reports và VSREPORT. Crystal Reportscó một tiện ích để thiết kế báo cáo riêng, trái lại, VSREPORT sử d ụng MicrosoftAccess. chọn lựa các sản phẩm tuỳ thuộc vào các ứng dụng. Nếu bạn muốn dùng báo cáo của Access, để ý rằng báo cáo c ủa VSREPORTdùng trên Automation là người sử dụng không phải khởi động m ột instance c ủaAccess mỗi lần họ muốn thi hành báo cáo. Thực vậy, với m ỗi VSREPORT, ng ườisử dụng không cần nạp sẵn Access trên máy, điều này rất tiện n ếu b ạn là ngườiquản lý một cơ quan lôncs định hướng sử dụng đối với nhiều loại người sử dụng.Nếu bạn khồn chắc chắn rằng toàn bộ người sử dụng có cài sẵn phoên bản Accessmới nhất, bạn có thể đưa cho họ một tệp tin VSREPORT mà không c ần b ận tâmngười sử dụng đã cài Access hay chưa. Dùng VSREPORT để chuyển đổi báo cáo Access14.2.1.2.1 Trước hết tạo một báo cáo trong Microsoft Access, sau đó thi hành trình thôngdịch VSREPORT trên đó. Kết quả của thông dịch là m ột t ệp tin có th ể dùngActiveX VSREPORT trong ứng dụng Có 2 trình thông dịch: • TRANS95.EXE: chuyển đổ báo cáo Access 95 • TRANS97.EXE : chuyển đổ báo cáo Access 97 Các tiện ích này chứa trong thư mục cài đặt VSREPORT Tạo ứng dụng dùng VSREPORT14.2.1.2.2 phóng tiện ích thông dịch Access 97, TRANS97.EXE 1. Nhấn đúp chuột lên More File để hiển thị hộp thoại tệp tin 2. Chọn tệp tin cơ sở dữ liệu Novelty 3. Trình thông dịch mở cơ sở dữ liệu và hiển thị danh sách các 4. báo cáo. Chọn rptCustomer, sau đó nhấn mũi tên phải phía trên ở dưới hộp thoại. nhấn Next 5. trình thông dịch yêu c ...