Luận văn : Thiết kế hệ thống thông tin quản lí SV Trường CDDCN Việt Đức

LUẬN VĂN TỐT NGHIỆP ĐỀ TÀI: “ THIẾT KẾ HỆ THỐNG THÔNG TIN QUẢN LÝ SINH VIÊN VÀ KẾT QUẢ ĐÀO TẠO - TRƯỜNG CAO ĐẲNG CÔNG NGHIỆP VIỆT ĐỨC.” .Tài liệu Há»— trợ ôn tập com Luận văn Luận án .Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án Trang MỤC LỤC CHƢƠNG I CƠ SỞ LÝ LUẬN VÀ THỰC TIỄN XÂY DỰNG BÀI TOÁN QUẢN LÝ SINH VIÊN VÀ KẾT QUẢ ĐÀO TẠO I Thực trạng vấn đề nảy sinh hệ thống quản lý sinh viên kết đào tạo trƣờng cao đẳng nƣớc nói chung Trƣờng Cao đẳng Cơng nghiệp Việt Đức nói riêng II Phƣơng pháp luận quy trình phát triển HTTT theo hƣớng có cấu trúc việc vận dụng vào việc giải tốn xây dựng hệ thống thơng tin quản lý sinh viên kết đào tạo CHƢƠNG II PHÂN TÍCH HỆ THỐNG THƠNG TIN QUẢN LÝ SINH VIÊN VÀ KẾT QUẢ ĐÀO TẠO - TRƢỜNG CAO ĐẲNG CƠNG NGHIỆP VIỆT ĐỨC I Phân tích u cầu hệ thống II Phân tích chức III Phân tích liệu IV Mơ hình khái niệm liệu 51 57 79 92 CHƢƠNG III THIẾT KẾ HỆ THỐNG THÔNG TIN QUẢN LÝ SINH VIÊN VÀ KẾT QUẢ ĐÀO TẠO - TRƢỜNG CAO ĐẲNG CÔNG NGHIỆP VIỆT ĐỨC I Thiết kế sở liệu logic 93 II Thiết kế sở liệu vật lý 94 Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án III Thiết kế báo cáo đầu 97 IV Thiết kế hệ thống menu 100 V Thiết kế giao diện : 112 VI Thiết kế thủ tục chƣơng trình 126 CHƢƠNG IV CÁC GIẢI PHÁP KỸ THUẬT - LẬP TRÌNH THỬ NGHIỆM I Vài nét hệ quản trị sở liệu ngơn ngữ lập trình đƣợc lựa chọn 129 II Lập trình thử nghiệm - Một số giao diện .145 KẾT LUẬN I Những kết đạt đƣợc 155 II Những hạn chế III Hƣớng khắc phục phát triển mở rộng TÀI LIỆU THAM KHẢO 156 PHẦN PHỤ LỤC 157 Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án Chƣơng I CƠ SỞ LÝ LUẬN VÀ THỰC TIỄN XÂY DỰNG BÀI TOÁN QUẢN LÝ SINH VIÊN VÀ KẾT QUẢ ĐÀO TẠO I Thực trạng vấn đề nảy sinh hệ thống quản lý sinh viên kết đào tạo trƣờng cao đẳng nƣớc nói chung Trƣờng Cao đẳng Cơng nghiệp Việt Đức nói riêng : Một số khái quát việc tin học hoá quản lý số trƣờng cao đẳng : Thực chủ trƣơng Chính phủ Bộ Giáo dục Đào tạo việc đẩy mạnh ứng dụng công nghệ thông tin đào tạo quản lý trƣờng đại học cao đẳng nƣớc Các trƣờng cao đẳng nƣớc quán triệt thực tăng cƣờng xây dựng sở hạ tầng, trƣớc hết hệ thống mạng cục đƣờng truyền Internet Tuy nhiên việc tin học hoá trình quản lý nói chung xây dựng hệ thống quản lý kết đào tạo trƣờng cao đẳng, kết hạn chế Qua khảo sát sơ 50 trƣờng Cao đẳng Trung cấp chuyên nghiệp trực thuộc Bộ Công Thƣơng cho thấy : hệ thống quản lý đƣợc triển khai ứng dụng trƣờng với phần mềm riêng lẻ tập trung vào số mảng nhƣ : quản lý tài chính; tính lƣơng, tính học bổng; quản lý vật tƣ; quản lý hồ sơ cán bộ, giảng viên; quản lý hồ sơ sinh viên Riêng có phần mềm quản lý tuyển sinh hệ Cao đẳng Trung cấp chuyên nghiệp đƣợc Bộ Giáo dục Đào tạo triển khai đƣợc trƣờng ứng dụng hiệu Máy tính dùng cho cơng tác quản lý với tỷ lệ lớn dùng cho việc soạn thảo văn riêng lẻ, hệ thống báo cáo Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án với Bộ chủ quản Bộ Giáo dục Đào tạo chủ yếu qua đƣờng công văn Hệ thống sở liệu giảng viên, nhân viên, sinh viên phân tán mang lại hiệu quản lý chƣa cao Một số công ty phần mềm chào giá hệ thống lớn nhƣ : "Trung tâm Quản lý", có hệ thống bao quát hầu hết nghiệp vụ quản lý nhà trƣờng nhƣ : quản lý cán bộ, giảng viên; quản lý tuyển sinh; quản lý tài chính; quản lý thƣ viện; quản lý sinh viên; quản lý điểm Tuy nhiên lại nảy sinh vấn đề thứ kinh phí lớn để triển khai cho phần cứng phần mềm, thứ hai vấn đề cập nhật liệu cho hệ thống hệ thống lớn thƣờng khó khăn xử lý lỗi Do phát huy hiệu nói chung không cao, số trƣờng chủ yếu triển khai mảng quản lý hồ sơ cán , giảng viên sinh viên Trong trƣờng đào tạo, với sản phẩm đặc thù kiến thức, kỹ ngƣời học việc tin học hố quản lý sinh viên từ nộp hồ sơ dự tuyển kết đào tạo sinh viên đến tốt nghiệp trƣờng mảng quản lý quan trọng, giải toán quản lý sinh viên kết đào tạo sinh viên vấn đề đặt cần thiết Nó đƣợc đặt mối quan hệ hệ thống quan trọng hệ thống lớn quản lý hoạt động nhà trƣờng Trƣớc thực trạng đó, điều kiện đặc biệt nhiệm vụ trọng tâm năm học 2008-2009 đẩy mạnh ứng dụng công nghệ thông tin trƣờng học, trƣờng quan tâm dần bƣớc, vào điều kiện để ƣu tiên phát triển xây dựng hệ thống quản lý hoạt động nhà trƣờng mà hạt nhân hệ thống quản lý sinh viên kết đào tạo Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tổng quan hệ thống thông tin quản lý hệ thống thông tin quản lý sinh viên kết đào tạo trƣờng Cao đẳng Công nghiệp Việt Đức : Trƣờng Cao đẳng Công nghiệp Việt Đức đơn vị nghiệp có thu có chức đào tạo sinh viên ngành nghề kỹ thuật kinh tế hệ đào tạo : Kỹ thuật viên Cao đẳng, Trung cấp chuyên nghiệp Công nhân kỹ thuật Quy mô Trƣờng với 350 cán giáo viên, CNV, lƣu lƣợng 6.500 sinh viên Diện tích Trƣờng 12 với phòng chức năng, 10 khoa đào tạo trung tâm trực thuộc Hệ thống máy tính đƣợc chia thành loại với 200 máy tính cho đào tạo ngành CNTT khoảng 100 máy tính phục vụ cho quản lý Phòng, Khoa Các máy tính đƣợc nối mạng cục Hệ thống phần mềm áp dụng chủ yếu cho lĩnh vực Tài chính, kế toán với phần mềm sử dụng nội phịng Tài chính, kế tốn nhƣ phần mềm Kế tốn HCSN, phần mềm quản lý học phí, phần mềm tính tốn lƣơng Với nhiệm vụ trung tâm đào tạo, sản phẩm cuối kiến thức kỹ sinh viên Thông tin sinh viên kết học tập sinh viên có vai trò quan trọng cho hệ thống quản lý công tác định Nắm vững thông tin hồ sơ lý lịch sinh viên, điểm trung bình học kỳ, điểm thi tốt nghiệp, điều kiện đƣợc học bổng, điều kiện tốt nghiệp vv yêu cầu thƣờng xuyên hệ thống quản lý đào tạo Các công việc chuyên môn nghiệp vụ lĩnh vực quản lý sinh viên kết đào tạo từ việc lập danh sách sinh viên từ nhập học, phân lớp, phân công giáo viên chủ nhiệm, vào điểm, xét học bổng, xét lên lớp, xét điều kiện dự thi tốt nghiệp, xét kết tốt nghiệp thực thủ Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Lº­n án cơng Máy tính nơi lƣu trữ file văn bản, việc trao đổi thông tin chủ yếu điện thoại họp trực tiếp Trƣớc tình hình thực tế đó, xuất phát từ yêu cầu quản trị công tác sinh viên, nhu cầu lƣu trữ, khai thác trao đổi thông tin Vấn đề thiết kế, xây dựng hệ thống thông tin quản lý kết đào tạo sinh viên có tham gia máy tính, khai thác mạng máy tính cục bộ, tự động hố cơng tác tính toán, báo cáo, thống kê Nhà trƣờng cần thiết Mục đích đề tài : Xây dựng hệ thống thơng tin nhằm cung cấp xác, kịp thời thông tin hồ sơ lý lịch sinh viên, điểm trung bình chung điểm rèn luyện học kỳ sinh viên, kết xét duyệt phục vụ cho quản lý đào tạo cơng tác lãnh đạo quản lý nói chung Nhà trƣờng Hoạt động quản lý có đƣợc danh sách sinh viên trúng tuyển đến trƣờng nhập học, sau qua thủ tục thi tuyển xét tuyển Phòng Đào tạo thực Danh sách đƣợc chuyển đến Phịng Cơng tác SV kèm theo hồ sơ Đến số sinh viên thuộc quyền quản lý Phịng Cơng tác HS-SV Phịng Cơng tác HS-SV thực phân lớp, phân công giáo viên chủ nhiệm, lƣu trữ hồ sơ bắt đầu trình quản lý sinh viên kết đào tạo Trƣờng Trong q trình đào tạo, bổ sung hồ sơ, lý lịch, học kỳ giáo viên chủ nhiệm phải tổng kết điểm trung bình mơn học điểm trung bình chung học kỳ, đánh giá kết rèn luyện đạo đức sinh viên theo mẫu chuyển cho Phịng Cơng tác HS-SV Cũng định kỳ học kỳ, Phịng Cơng tác HS-SV vào điểm số kết rèn luyện sinh viên giáo viên chủ nhiệm chuyển đến để tổ chức xét học bổng theo điều kiện quy định Đến cuối học kỳ II, giáo viên chủ nhiệm phải tổng kết Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án năm học cho sinh viên, xác định điểm trung bình chung kết rèn luyện năm học Cũng định kỳ năm học lần, vào kết giáo viên chủ nhiệm chuyển đến để phòng Đào tạo xét lên lớp Kết thúc thời gian đào tạo lý thuyết hệ, ngành có tập doanh nghiệp Điểm tập xếp loại rèn luyện tập đƣợc chuyển đến cho giáo viên chủ nhiệm vào sổ để làm sở cho đợt xét duyệt Kết thúc thời gian đào tạo theo kế hoạch với khố, lớp, trƣớc thi tốt nghiệp, phịng Đào tạo tổ chức xét điều kiện dự thi tốt nghiệp, vào kết học tập, rèn luyện điểm thực tập Chuyển kết xét cho Phịng Khảo thí tổ chức thi tốt nghiệp Sau có điểm thi tốt nghiệp Phịng Khảo thí chuyển đến, phịng Đào tạo tổ chức xét tốt nghiệp phân loại tốt nghiệp, vào kết học tập, rèn luyện tồn khố điểm thi tốt nghiệp Hoạt động làm tốt nghiệp, tổ chức bế giảng, phát tốt nghiệp vv (những sinh viên không đủ điều kiện thi tốt nghiệp khơng tốt nghiệp phải chuyển khố sau để thi tốt nghiệp lại) hoạt động cuối trình quản lý sinh viên kết đào tạo Trong trình quản lý sinh viên kết đào tạo có biến động sinh viên nhƣ : bổ sung hồ sơ, xin học, buộc học, chuyển lớp, chuyển ngành, nghề vv Tất biến động, thay đổi Phịng Cơng tác HS-SV xử lý; Q trình quản lý sinh viên – sinh viên kết đào tạo với chức nhƣ sơ đồ sau : Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án Quản lý hồ sơ sinh viên Sinh viên nhập học Quản lý học tập rèn luyện Quản lý tốt nghiệp Quản lý nghiệp vụ Sinh viên trƣờng Thống kê báo cáo 1.1 - Hệ thống quản lý sinh viên – sinh viên kết đào tạo II Phƣơng pháp luận quy trình phát triển HTTT theo hƣớng có cấu trúc việc vận dụng vào việc giải tốn xây dựng hệ thống thơng tin quản lý sinh viên kết đào tạo : Phƣơng pháp luận phát triển HTTT : 1.1 Một số định nghĩa hệ thống : Hệ thống khái niệm quen thuộc Ngƣời ta thƣờng nói hệ thống KTXH, Hệ thống gia đình, hệ thống luật pháp, hệ thống y tế, hệ thống giáo dục, hệ thống khý, hệ thống mặt trời, hệ thống tuần hoàn, hệ thống thần kinh, hệ thống kỹ thuật, hệ thống thơng tin Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Cập nhật danh sách Tỉnh, TP : - Cập nhật danh mục Hệ đào tạo trƣờng : Nhập mức học phÝ phải đãng Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 146 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Cập nhật danh sách ngành, nghề đào tạo trƣờng : - Cập nhật danh mục Học kỳ : Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 147 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Cập nhật danh mục năm học : - Cập nhật danh mục lớp : CẬP NHẬT DANH MỤC LỚP ` Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 148 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Cập nhật môn thi tốt nghiệp : - Cập nhật thông tin sinh viên : Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 149 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Giao diện phân lớp cho sinh viên : - Nhập điểm học kỳ : Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 150 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Giao diện xét Học bổng theo học kỳ : NHẬP CÁC ĐIỀU KIỆN XÉT HỌC BỔNG - Giao diện xét lên lớp theo năm học : - - Giao diện xét điều kiện dự thi tốt nghiệp : Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 151 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Xét điều kiện dự thi tốt nghiệp : - N: - Cập nhật điểm thi tốt nghiệp : Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 152 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Giao diện xét kết tốt nghiệp : - Xem, In hồ sơ, điểm số học kỳ : - Xem, In báo cáo tổng hợp : In báo cáo tổng hợp : Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 153 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Xem, In báo cáo tổng hợp : Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 154 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án KẾT LUẬN I Những kết đạt đƣợc đề tài : - Đã hoàn thành bƣớc phân tích thiết kế hệ thống Xây dựng đƣợc hệ thống thông tin quản lý sinh viên - sinh viên kết đào tạo trƣờng Cao đẳng Công nghiệp Việt Đức với số chức - Hệ thống đáp ứng đƣợc yêu cầu tăng cƣờng đƣa công nghệ thông tin vào quản lý đào tạo quản lý kết đào tạo nhà trƣờng Đảm bảo sử lý nhanh, xác thuận tiện số tra cứu số nghiệp vụ quản lý sinh viên - sinh viên kết đào tạo II Những hạn chế : - Các thông tin, liệu hồ sơ sinh viên hạn chế, chƣa có số thuộc tính nhƣ : khen thƣởng, kỷ luật, đảng, đồn, chế độ ƣu tiên Do số nghiệp vụ quản lý chƣa đƣợc tự động hố - Chƣa kết nối đƣợc với hệ thống thơng tin tuyển sinh nhà trƣờng, sau có kết xét duyệt tuyển sinh nhà trƣờng lại phải nhập danh sách sinh viên trúng tuyển vào hệ thống Về mặt nhập liệu phạm vi tồn trƣờng trùng lần, gây lãng phí - Chƣa quản lý điểm đƣợc tới môn học học kỳ, mà quản lý đƣợc đến điểm trung bình chung học kỳ Do học kỳ, giáo viên chủ nhiệm lại phải cộng điểm thủ cơng, sau tính đƣợc điểm TBC nhập vào máy Nhƣ khả tự động hố tính tốn chƣa cao III Hƣớng khắc phục, phát triển mở rộng : - Bổ sung thông tin quản lý hồ sơ sinh viên nhƣ : khen thƣởng, kỷ luật, đảng, đoàn, chế độ ƣu tiên vv, để ý nghĩa hệ thống cho công tác quản lý sinh viên - sinh viên kết đào tạo cao Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 155 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án - Thiết kế module kết nối với phần mềm tuyển sinh để thi tuyển xét tuyển liệu thí sinh trúng tuyển đƣợc tự động cập nhật Tiết kiệm thời gian nhập liệu, tăng cƣờng tính tự động hố - Phân tích thiết kế module quản lý điểm tới môn học để giúp cho giáo viên chủ nhiệm cơng tác tính tốn điểm môn học sinh viên cách nhanh chóng xác Xin chân thành cảm ơn Thày hƣớng dẫn - Tiến sĩ : Lê Văn Phùng Viện CNTT giúp em hoàn thành luận văn ! TÀI LIỆU THAM KHẢO Phân tích thiết kế hệ thống thông tin - TS Lê Văn Phùng - NXB Đại học QG 2004 Phân tích thiết kế hệ thống thông tin - Nguyễn Văn Ba - NXB Đại học QG 2003 Phân tích thiết kế, cài đặt hệ thống thông tin quản lý - Viện Tin học 1990 Giáo trình Phân tích TK HTTT - Đào Thanh Tĩnh - Viện ĐH Mở HN 5.Giáo trình Phân tích TK HTTTQL- Nguyễn Quang Thơng - TT ĐT Công nghệ AVNET Phân tich thiết kế Hệ thống thông tin - Phạm Tuấn Anh - Đại học Bách khoa Hà Nội Thiết lập hệ thống thông tin quản lý tổ chức - Louis Rigand, Dunod 1984- Bản dịch tiếng Việt 1988 Phƣơng pháp thiết kế HTTT phục vụ quản lý doanh nghiệp - Merise 1994 SQLSerrver2005-Lập trình thủ tục hàm-Phạm Hữu Khang-NXB Lao Động Xã Hội 10 Lập trình VB.NET - Nguyễn Hữu Bình – NXB Thống kê 2002 11 Lập trình Visual Basic.NET - Phạm Hữu Khang - NXB Lao Động Xã Hội 12.Visual Basic.NET 2005 - Hoàng Anh Quang - NXB Văn hố Thơng tin 13 Ngun lý hệ CSDL sở tri thức - Jeffrey D Ullman - NXB Thống kê 1998 14 Kỹ nghệ phần mềm - Roger S.Pressman - NXB Giáo dục 1999 Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 156 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án PHẦN PHỤ LỤC Code tạo xử lý giao diện chƣơng trình : > > Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 157 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án Code xử lý thông tin sở liệu : mports System.Data.Sql Imports System.Data.SqlClient Imports System Public Class Sqlhelper Public ADAPTER As SqlDataAdapter Public Shared ConnectString As String = "Data Source=(local);Initial Catalog=QLSV;Integrated Security=True" Public Shared Function ExecuteDataTable(ByVal sql As String, ByVal commandTyped As CommandType, ByVal ParamArray pars As Object()) As DataTable Dim As SqlConnection = New SqlConnection(ConnectString) Dim com As SqlCommand = New SqlCommand(sql, con) com.CommandType = commandTyped Dim i As Integer For i = To pars.Length - Step Dim par As SqlParameter = New SqlParameter(pars(i).ToString(), pars(i + 1)) com.Parameters.Add(par) Next Dim dad As SqlDataAdapter = New SqlDataAdapter(com) Dim dst As DataSet = New DataSet() dad.Fill(dst) con.Close() Return dst.Tables(0) End Function Public Shared Function ExecuteDataAdapter(ByVal sql As String, ByVal commandTyped As CommandType, ByVal ParamArray pars As Object()) As SqlDataAdapter Dim As SqlConnection = New SqlConnection(ConnectString) Dim com As SqlCommand = New SqlCommand(sql, con) com.CommandType = commandTyped Dim i As Integer For i = To pars.Length - Step Dim par As SqlParameter = New SqlParameter(pars(i).ToString(), pars(i + 1)) com.Parameters.Add(par) Next Dim dad As SqlDataAdapter = New SqlDataAdapter(com) con.Close() Return dad Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 158 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án End Function Public Shared Function ExecuteDataSet(ByVal sql As String, ByVal commandTyped As CommandType, ByVal ParamArray pars As Object()) As DataSet Dim As SqlConnection = New SqlConnection(ConnectString) Dim com As SqlCommand = New SqlCommand(sql, con) com.CommandType = commandTyped Dim i As Integer For i = To pars.Length - Step Dim par As SqlParameter = New SqlParameter(pars(i).ToString(), pars(i + 1)) com.Parameters.Add(par) Next Dim dad As SqlDataAdapter = New SqlDataAdapter(com) Dim dst As DataSet = New DataSet() dad.Fill(dst) con.Close() Return dst End Function Public Shared Sub ExecuteNonQuery(ByVal sql As String, ByVal commandtyped As CommandType, ByVal ParamArray pars As Object()) Dim As SqlConnection = New SqlConnection(ConnectString) con.Open() Dim com As SqlCommand = New SqlCommand(sql, con) com.CommandType = commandtyped Dim i As Integer For i = To pars.Length - Step Dim par As SqlParameter = New SqlParameter(pars(i).ToString(), pars(i + 1)) com.Parameters.Add(par) Next com.ExecuteNonQuery() con.Close() End Sub 'public static SqlDataAdapter ExecuteDataAdapter( ' string sql, ' CommandType commandType, ' params object[] pars) '{ ' SqlConnection con=new SqlConnection(ConnectString); ' SqlCommand com=new SqlCommand(sql,con); Số hóa Trung tâm Học liệu – Đại học Thái Nguyên http://www.lrc-tnu.edu.vn 159 Tài liệu Há»— trợ ôn tập com Luận văn Luận án Tài liệu Há»— trợ ôn tập com Luận văn Luận án .Tài liệu Há»— trợ ôn tập com Luận văn Luận án