TAILIEUCHUNG - Beginning Visual Basic 2005 Databases phần 5

Sửa đổi mã theo "Nhóm dự án" Trường hợp như sau: Trường hợp "Nhóm dự án" 'Turn cờ tải về để có sản phẩm nào được xử lý blnLoading = True' Xóa bất kỳ dự án trước đây Gọi ActionDelete () 'Turn cờ tải ra khỏi blnLoading = False' | Chapter 10 Throw New Exception Insert Group Failed End If End Using Clear the input fields 6. Modify the code under the Case Group Projects as follows Case Group Projects Turn the loading flag on so no items are processed blnLoading True Delete any previous projects Call ActionDelete Turn the loading flag off blnLoading False Initialize a new instance of the business logic component Using objGroups As New _ strCompany strApplication Get a new GroupProjects DataSet objDataSet For intIndex 0 To _ GroupProjects . - 1 Initialize a datarow object from the GroupProjects DataSet Dim objDataRow As _ GroupProjects .NewRow Set the values in the DataRow GroupProjectID GroupID _ GroupID ProjectID _ _ GroupProjects .Rows intIndex .Item ProjectID Add the DataRow to the DataSet GroupProjects . objDataRow Next Add the GroupProjects to the database If Not objDataSet Then Throw New Exception Insert Group Failed End If End Using Clear previous bindings 7. Modify the code in the ActionUpdate procedure. Starting at the top of this procedure modify it as shown by removing the block that initializes a new instance of the WDABase class in the objData object Private Sub ActionUpdate Try Update database row based on the active screen Select Case strActiveScreen 288 Building Business Logic and Data Access Components 8. Now modify the code under the Case Projects statement in the ActionUpdate procedure as shown Case Projects Initialize a new instance of the business logic component Using objProjects As New _ strCompany strApplication Get a new Project DataSet objDataSet Initialize a datarow object from the Project DataSet Dim .

TỪ KHÓA LIÊN QUAN
TAILIEUCHUNG - Chia sẻ tài liệu không giới hạn
Địa chỉ : 444 Hoang Hoa Tham, Hanoi, Viet Nam
Website : tailieuchung.com
Email : tailieuchung20@gmail.com
Tailieuchung.com là thư viện tài liệu trực tuyến, nơi chia sẽ trao đổi hàng triệu tài liệu như luận văn đồ án, sách, giáo trình, đề thi.
Chúng tôi không chịu trách nhiệm liên quan đến các vấn đề bản quyền nội dung tài liệu được thành viên tự nguyện đăng tải lên, nếu phát hiện thấy tài liệu xấu hoặc tài liệu có bản quyền xin hãy email cho chúng tôi.
Đã phát hiện trình chặn quảng cáo AdBlock
Trang web này phụ thuộc vào doanh thu từ số lần hiển thị quảng cáo để tồn tại. Vui lòng tắt trình chặn quảng cáo của bạn hoặc tạm dừng tính năng chặn quảng cáo cho trang web này.