Thông tin tài liệu
LỜI CÁM ƠN Với vốn kiến thức tích lũy thời gian học tập trường Đại Học Thương Mại , giảng dạy nhiệt tình thầy cô giáo với kiến thức thực tế thu qua q trình thực tập Cơng ty cổ phần vật tư thiết bị xây dựng Việt Nam , em hồn thành khóa luận tốt nghiệp với đề tài :”Phân tích thiết kế hệ thống thơng tin quản lý nhân Công ty Cổ phần Vật tư Thiết bị Xây dựng Việt Nam” Lời em xin gửi lời cảm ơn đến nhà trường , thầy cô khoa Hệ thống thông tin kinh tế thương mại điện tử giảng dạy truyền đạt cho em kiến thức bổ ích bốn năm học qua Em xin chân thành cảm ơn giảng viên – PGS.TS.Đàm Gia Mạnh thuộc môn Công nghệ thông tin , khoa Hệ thống thông tin kinh tế thương mại điện tử hướng dẫn , bảo nhiệt tình , giúp đỡ em suốt qua trình thực tập làm khóa luận tốt nghiệp Bên cạnh , em xin gửi lời cảm ơn đến anh chị Công ty CP Vật Tư Thiết bị Xây dựng Việt Nam giúp đỡ em việc thu thập số liệu , nắm bắt thơng tin q trình hoạt động kinh doanh tình hình ứng dụng cơng nghệ thơng tin Công ty Do lực thân em cịn hạn chế nên khó tránh khỏi thiếu sót việc hồn thành khóa luận tốt nghiệp Em mong nhận nhận xét, góp ý quý thầy cô Em xin chân thành cảm ơn! Sinh viên Nguyễn Thị Phúc i LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com MỤC LỤC LỜI CÁM ƠN i MỤC LỤC ii DANH MỤC TỪ VIẾT TẮT iv DANH MỤC BẢNG BIỂU v DANH MỤC SƠ ĐỒ, HÌNH VẼ vi PHẦN : MỞ ĐẦU 1.1 Tính cấp thiết vấn đề nghiên cứu 1.2 Tổng quan tình hình nghiên cứu có liên quan đến đề tài 1.3 Mục tiêu nhiệm vụ nghiên cứu 1.4 Đối tượng phạm vi nghiên cứu 1.5 Phương pháp nghiên cứu 1.6 Kết cấu khóa luận .6 PHẦN 2: NỘI DỤNG CHƯƠNG : TỔNG QUAN VỀ PHÂN TÍCH THIẾT KẾ HTTT QUẢN LÝ NHÂN SỰ TẠI CƠNG TY CP VẬT TƯ THIẾT BỊ XÂY DỰNG VIỆT NAM 1.1 Một số khái niệm .7 1.2 Cơ sở lý luận vấn đề nghiên cứu 1.2.1 Các phận cấu thành HTTT 1.2.2 Chức HTTT tổ chức 1.2.3 Các giai đoạn phân tích thiết kế HTTT 1.2.4 Xây dựng HTTT hướng chức 11 CHƯƠNG 2: PHÂN TÍCH ĐÁNH GIÁ THỰC TRẠNG HTTT QUẢN LÝ NHÂN SỰ TẠI CÔNG TY CP VẬT TƯ THIẾT BỊ XÂY DỰNG VIỆT NAM .20 2.1 Tổng quan Công ty CP Vật tư Thiết bị Xây dựng Việt Nam 20 2.1.1 Giới thiệu doanh nghiệp 20 2.1.2 Kết hoạt động kinh doanh năm gần .23 2.2 Phân tích đánh giá thực trạng HTTT quản lý nhân Công ty CP Vật tư Thiết bị Xây dựng Việt Nam 23 2.2.1 Thực trạng HTTT quản lý nhân Công ty CP Vật tư Thiết bị Xây dựng Việt Nam 23 ii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com 2.2.2 Đánh giá thực trạng HTTT quản lý nhân Công ty CP Vật tư Thiết bị Xây dựng Việt Nam 25 3.1 Bài toán 27 3.1.1 Phát biểu toán 27 3.1.2 Các yêu cầu hệ thống .28 3.1.3 Các nhóm chức hệ thống 29 3.2 Phân tích hệ thống 30 3.2.1 Phân tích chức .30 3.2.2 Phân tích liệu .32 3.3 Thiết kế hệ thống .34 3.3.1 Thiết kế sở liệu 34 3.3.2 Thiết kế giao diện 38 3.4 Một số kiến nghị 42 KẾT LUẬN 44 TÀI LIỆU THAM KHẢO iii LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com DANH MỤC TỪ VIẾT TẮT STT Từ viết tắt Nghĩa từ CP Cổ Phần TT Thông tin HTTT Hệ thống thông tin CNTT Công nghệ thông tin BHXH Bảo hiểm xã hội BHYT Bảo hiểm y tế BHTN Bảo hiểm thất nghiệp CSDL Cơ sở liệu iv LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com DANH MỤC BẢNG BIỂU Tên bảng Bảng 2.1 Nội dung Trang Cơ cấu nhân thức Công ty CP Vật tư Thiết bị 21 Xây dựng Việt Nam năm 2015 Bảng 2.2 Kết hoạt động công ty CP vật tư thiết bị xây dựng 23 Việt Nam giai đoạn 2013 – 2015 (Đơn vị: VNĐ) Bảng 2.3 Nhân công ty năm 2013 đến năm 2015 23 Bảng 3.1 Bảng phòng ban nhân viên 36 Bảng 3.2 Bảng nhân viên 36 Bảng 3.3 Bảng lương nhân viên 37 Bảng 3.4 Bảng chức vụ nhân viên 37 Bảng 3.5 Bảng chấm công nhân viên 37 v LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com DANH MỤC SƠ ĐỒ, HÌNH VẼ Tên sơ đồ, Nội dung Trang hình vẽ Hình 1.1 Sơ đồ tổng quát thành phần HTTT Hình 1.2 Sơ đồ chức hệ thống thông tin Sơ đồ 2.1 Cơ cấu tổ chức máy quản lý Công ty CP Vật Tư 21 Thiết Bị Xây Dựng Việt Nam Hình 3.1 Sơ đồ phân câp chức 31 Hình 3.2 Sơ đồ luồng liệu mức ngữ cảnh 31 Hình 3.3 Sơ đồ luồng liệu mức 1của hệ thống 32 Hình 3.4 Mơ hình thực thể liên kết 33 Hình 3.5 Lược đồ quan hệ thực thể 34 Hình 3.6 Mơ hình quan hệ 35 Hình 3.7 Giao diện Menu 38 Hình 3.8 Giao diện Quản lý nhân viên 39 Hình 3.9 Giao diện Quản lý chấm cơng 40 Hình 3.10 Giao diện Tính lương nhân viên 41 Hình 3.11 Giao diện Tra cứu nhân viên 41 Hình 3.12 Giao diện Trợ giúp 42 vi LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com PHẦN : MỞ ĐẦU 1.1 Tính cấp thiết vấn đề nghiên cứu Hiện công nghệ thông tin có bước phát triển mạnh mẽ lĩnh vực hoạt động tồn giới Cơng nghệ thơng tin ứng dụng nhiều ngành nghề, lĩnh vực khác xã hội kinh tế, an ninh quốc phịng, trị Với việc ứng dụng công nghệ thông tin giúp cho công việc quản lý dễ dàng hơn, nâng cao hiệu sản xuất, tiết kiệm thời gian sức lao động người; thông tin thu thập, xử lý, phổ biến, cách nhanh chóng, xác có hiệu dần thay cho phương pháp thủ công hiệu Việc phát triển hệ thống thông tin cung cấp cho thành viên tổ chức công cụ quản lý tốt Việc quản lý, điều hành phát triển tổ chức kinh tế có doanh nghiệp lớn hay nhỏ địi hỏi phải có quản lý chặt chẽ từ cấp lãnh đạo đến nhân viên, từ phòng ban đến phận tổ chức kinh tế Để thực u cầu đó, khơng thể sử dụng phương thức quản lý thủ công giấy tờ trước làm có nghĩa tự đào thải khỏi guồng máy công nghiệp thời đại Do đó, việc áp dụng tin học vào quản lý điều cần thiết thích hợp với xu hướng chung thời đại Với trợ giúp phần mềm thích hợp, việc quản lý điều hành phát triển tổ chức kinh tế, có Cơng ty CP Vật tư Thiết bị Xây dựng Việt Nam trở nên dễ dàng Hiện Công ty CP Vật tư Thiết bị Xây dựng Việt Nam gặp phải số vấn đề khó khăn: có thay đổi hợp đồng ký được, cấp bậc, khen thưởng, kỷ luật, chức danh nhân viên phải qua bước tìm người để bổ sung sửa đổi cho phù hợp với thực tế, sau lại phải lưu vào hồ sơ, số lượng hồ sơ ngày tăng, người quản lý hồ sơ phải tăng theo dẫn đến quản lý nhân viên gặp nhiều khó khăn; hay lấy hồ sơ cán nhân viên cấp u cầu việc tìm kiếm gặp nhiều khó khăn tốn nhiều công sức thời gian; đặc biệt phải kết xuất báo cáo báo cáo lương, báo cáo theo hồ sơ nhân viên, cung cấp cho trình quản lý nhân Các vấn đề gây nhiều trở ngại, ách tắc cho cơng việc mà cịn xảy sai sót nhầm lẫn.Vì vậy, yêu cầu đặt làm để lưu trữ, cập nhật, tìm kiếm hồ sơ lương nhân viên LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com cách hiệu nhất, giúp cho nhân viên cơng ty yên tâm thoải mái làm việc đạt kết cao Công ty CP Vật tư Thiết bị Xây dựng Việt Nam cịn có nhiều thiếu sót việc kiểm soát nắm bắt nhân viên, việc quản lý dạng tin học hóa cục chưa thống nhất, chưa hình thành rõ ràng hệ thống quản lý nhân Thực tế việc quản lý nhân công ty xây dựng quản lý Excel gây khó khăn nhiều cho cán quản lý nhân Vì vậy, việc xây dựng hệ thống quản lý nhân để nâng cao vấn đề nắm bắt người, tổ chức, nhân viên công ty cần thiết Xuất phát từ nhu cầu đó, em định lựa chọn để tài: "Phân tích thiết kế hệ thống thơng tin quản lý nhân Công ty Cổ phần Vật tư Thiết bị Xây dựng Việt Nam" Đề tài nhằm mục đích sâu tìm hiểu trình quản lý nhân sự, phân tích mặt mạnh điểm yếu tồn để khắc phục, bổ sung, giúp nâng cao hiệu quản lý khai thác tối ưu nguồn nhân lực cơng ty 1.2 Tổng quan tình hình nghiên cứu có liên quan đến đề tài Một số cơng trình nghiên cứu liên quan đến phân tích thiết kế hệ thống thông tin(HTTT) quản lý nhân sự: - Một số đồ án, chuyên đề phân tích thiết kế HTTT quản lý nhân Luận văn tốt nghiệp Phạm Thị Thu Huyền, lớp Tin 45A, Khoa Tin học kinh tế, Đại học Kinh tế quốc dân, 2008, với đề tài “Phân tích thiết kế HTTT quản lý nhân Công ty phần mềm quản lý doanh nghiệp FAST” Đề tài đưa số lý luận HTTT, sở liệu HTTT trình tự phân tích HTTT Từ tiến hành phân tích thiết kế HTTT quản lý nhân Công ty phần mềm quản lý doanh nghiệp FAST Luận văn tốt nghiệp Nguyễn Thị Loan, lớp Tin 46A, Khoa Tin học kinh tế, Đại học Kinh tế quốc dân, 2009, với đề tài “Phân tích thiết kế HTTT quản lý nhân Công ty cổ phần Goldstar Việt Nam” Đề tài nêu khái quát tổ chức hoạt động Công ty từ đưa mục tiêu đề tài Luận văn tốt nghiệp với đề tài “Thiết kế phần mềm quản lý nhân mỏ than Cọc Sáu” Vũ Anh Quyết - lớp Tin 44C - Khoa Quản trị hệ thống thông tin kinh tế, Đại học Kinh tế quốc dân Luận văn làm rõ số lý thuyết phương pháp phát triển hệ thống thông tin quản lý quy trình phân tích thiết kế hệ thống hướng cấu LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com trúc Luận văn hoàn thành bước phân tích thiết hệ thống thơng tin xây dựng mã chương trình Khóa luận tốt nghiệp với đề tài “Phân tích thiết kế hệ thống thơng tin quản lý nhân công ty TNHH Hưng Long” Nguyễn Hồng Đức, K55–Khoa Máy tính, Trường Đại học Bách Khoa TP Hồ Chí Minh Luận văn có ưu điểm thiết kế giao diện thân thiện, dễ sử dụng, gần gũi với hệ thống cũ, lưu trữ hoàn toàn liệu, đưa liệu xử lý xác đáp ứng phần hệ thống thực tế Tuy nhiên tồn nhược điểm CSDL hệ thống xây dựng sở hệ thống thông tin mạng, bước đầu xây dựng máy cục chức đầy đủ để quản lý hệ thống chưa hồn chỉnh Khóa luận với đề tài “Phân tích thiết kế hệ thống thông tin quản lý nhân Cơng ty TNHH TBA Việt Nam” Hồng Thế Quyền, K52 – Khoa Công nghệ thông tin, Đại học Vinh Nội dung đề tài khái quát chức cho công việc quản lý nhân chấm công, quản lý hồ sơ nhân viên,… phân tích thiết kế hệ thống thơng tin quản lý theo phương pháp hướng cấu trúc Nhưng hạn chế tác giả chưa phân tích thiết kế chức quản lý công việc nhân viên, số chức chưa thực hiệu tính lương số chức dư thừa khác Tuy nhiên đề tài tồn số vấn đề sau: Chưa nêu bật tầm quan trọng ý nghĩa đề tài, phân tích đánh giá thực trạng quản lý nhân cơng ty cịn chung chung chưa cụ thể để làm rõ ưu điểm nhược điểm công tác quản lý nhân Cơng ty Do đó, đề tài thiếu tính thực tiễn chưa đáp ứng nhu cầu nhà quản lý quản lý nhân 1.3 Mục tiêu nhiệm vụ nghiên cứu 1.3.1 Mục tiêu nghiên cứu Thứ nhất, hệ thống hóa kiến thức số lý luận HTTT doanh nghiệp như: khái niệm, thành phần, HTTT phổ biến doanh nghiệp… Thứ hai, hệ thống hóa kiến thức lý luận quản lý nhân nói chung, Cơng ty CP Vật tư Thiết bị Xây dựng Việt Nam nói riêng Thứ ba, sở nghiên cứu thực trạng tình hình quản lý nhân cơng ty, từ đưa số đề xuất, giải pháp áp dụng, tiến hành phân tích thiết kế HTTT quản lý khách nhân cài đặt hệ quản trị CSDL cụ thể nhằm hòa thiện HTTT LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com quản lý nhân cho phù hợp mang tính thiết thực hoạt động quản lý dự án, đem lại hiệu công việc 1.3.2 Nhiệm vụ nghiên cứu Nhiệm vụ nghiên cứu đề tài : - Thứ nhất, hệ thống hóa kiến thức số lý luận hệ thống thơng tin phân tích hệ thống thông tin hướng chức : khái niệm, phận cấu thành HTTT, giai đoạn phân tích thiết kế HTTT hướng chức Những lợi ích vai trị mơ hình mang lại cho doanh nghiệp trình kinh doanh, cạnh tranh thị trường - Thứ hai, đánh giá thực trạng ứng dụng hệ thống thông tin, khả ứng dụng phầm mềm quản lý nhân Công ty CP Vật tư Thiết bị Xây dựng Việt Nam - Thứ ba, đề xuất phần mềm quản lý nhân phù hợp giúp hoạt động kinh doanh doanh nghiệp nhanh gọn xác 1.4 Đối tượng phạm vi nghiên cứu 1.4.1 Đối tượng nghiên cứu Đối tượng: Phân tích thiết kế HTTT quản lý nhân Công ty CP Vật tư Thiết bị Xây dựng Việt Nam, hiệu vấn đề cần bổ sung, giải pháp tối ưu cho công ty 1.4.2 Phạm vi nghiên cứu Về không gian: tiến hành nghiên cứu sở lý thuyết HTTT quản lý, HTTT quản lý dự án qua giảng, tài liệu thu thập đề tài nghiên cứu khoa học xây dựng HTTT quản lý kiến thức quản lý nhân Đồng thời, tiến hành nghiên cứu Công ty CP Vật tư Thiết bị Xây dựng Việt Nam, hệ thống quản lý nhân công ty Về thời gian: Trong khoảng thời gian thực đề tài khóa luận tốt nghiệp 1.5 Phương pháp nghiên cứu Phương pháp thu thập liệu Thu thập thông tin(TT) công đoạn q trình phân tích hệ thống Mục tiêu cơng đoạn có TT liên quan đến mục tiêu đề với độ tin cậy xác cao Phương pháp thu thập TT giai đoạn bao gồm: Phương pháp thu thập qua phiếu điều tra Phương pháp vấn LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com 5b Hình thức truy cập Internet? Kết nối quay số Đường truyền riêng Kết nối ADSL Không truy cập Internet Kết nối không dây Đường truyền cáp quang Nhà cung cấp mạng:………………………………………………………………… Tốc độ mạng:………………………………………………………………………… Ngồi mạng LAN mạng Internet, doanh nghiệp cịn sử dụng mạng khác: ………………………………………………………………………………………… Mạng cục cơng ty (LAN) có hệ thống an ninh mạng chưa? (tường lửa, phòng chống virus, bảo mật, v.v…): Đã có Chưa có Doang nghiệp sử dụng loại phần mềm sau đây: 9.1 Phần mềm hệ thống: 9.2 Phần mềm ứng dụng: Phần mềm Văn phòng MS Office Phần mềm văn phòng khác Phần mềm tài kế tốn Phần mềm quản lý nhân Phần mềm quản lý công văn, giấy tờ Phần mềm quản trị dự án Phần mềm quản lý khách hàng CRM Phần mềm chuyên ngành Phần mềm hoạch định nguồn lực doanh nghiệp ERP Phần mềm quản lý chuỗi cung ứng SCM Phần mềm quản lý tri thức KWS Một số phần mềm quản lý khác 10 Các phần mềm sử dụng có quyền hay khơng? Có Khơng Khơng biết Khác (mô tả)……………… 11 Phương thức thu thập số liệu doanh nghiệp Qua liệu thứ cấp Phương pháp quan sát, điều tra Phương pháp định tính Khác (ghi rõ):………………… LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com 12.Lưu trữ liệu doanh nghiệp Lưu trữ tập trung Lưu trữ phân tán 13 Doanh nghiệp có phận chuyên trách quản trị HTTT khơng? Có Khơng 14 Đội ngũ chun trách quản trị HTTT có bao nghiêu người ? 10 người 10 người 15 Doanh nghiệp có xây dựng quy trình quản trị HTTT khơng? Có Khơng 16 Doanh nghiệp sử dụng phương pháp quản trị HTTT sau đây? CMMi ITIL Cobit Khác 17 Công ty đầu tư kinh phí cho việc trang bị máy tính thiết bị công nghệ thông tin cho phòng ban năm? Dưới 10 triệu đồng Từ 50-80 triệu đồng Từ 10-20 triệu đồng Trên 80 triệu đồng Từ 20-50 triệu đồng 18 Ước tính “tỷ lệ đầu tư” cho CNTT HTTT vòng năm gần ? phần cứng chiếm: … % phần mềm chiếm: …… % đào tạo CNTT chiếm:……………% khác chiếm:……………… … % LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com 19 Số lượng cán có đại học, Đại học CNTT:………… nhân viên 20 Tỷ lệ nhân viên thành thạo kỹ tin học Dưới 5% Từ 5% - 20% Từ 20% - 50% Từ 50% - 80% Trên 80% 21 Tỷ lệ nhân viên tham gia vào công việc quản trị HTTT (quản trị mạng, liệu…) Dưới 5% Từ 5% - 20% Từ 20% - 50% Từ 50% - 80% Trên 80% 22 Cơng ty có hình thức đào tạo CNTT cho nhân viên? Mở lớp đào tạo Đào tạo chỗ theo nhu cầu công việc Gửi nhân viên học Không đào tạo LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com PHỤ LỤC II MÃ MỘT SỐ GIAO DIỆN CHƯƠNG TRÌNH Module tạo form quản lý nhân viên Dim da As CSDL '============================================================= 'Thu tuc lay cac du lieu cho cac Combo box Private Sub AddDatatoCombox(control As ComboBox, strSQL As String) Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Set rs = da.getRS(strSQL) While (Not rs.EOF) control.AddItem rs.Fields(1) rs.MoveNext Wend rs.Close End Sub Private Sub Init() Dim strSQL As String Me.dtNgaysinh.Value = Date Me.DTPickerBDCT.Value = Date Me.DTPickerKTCT.Value = Date AddDatatoCombox cboPhongban, "SELECT * FROM Phongban" LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com AddDatatoCombox cboChucvu, "SELECT * FROM Chucvu" End Sub Private Sub cboChucvu_KeyPress(KeyAscii As Integer) KeyAscii = End Sub Else KeyAscii = End If End Sub Private Sub cboPhai_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then cmdChapnhan_Click Else KeyAscii = End If End Sub Private Sub cboPhongban_KeyPress(KeyAscii As Integer) KeyAscii = End Sub Private Sub cmdBoqua_Click() Me.txtDiachi = "" Me.txtDienthoai = "" Me.txtManv = "" LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Me.txtHoten = "" Me.txtSoCMNN = "" Me.txtTrinhdo = "" Me.txtQuequan = "" Me.cboPhai.Text = "" Me.cboPhongban.Text = "" Me.cboChucvu.Text = "" Me.cboBacluong.Text = "" End Sub Function Get_ID(Tenbang As String, Tentruong As String, giatri As String) As String Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Dim strSQL As String strSQL = "SELECT * FROM " & Tenbang & " WHERE " & Tentruong & " ='" & giatri & "'" Set rs = da.getRS(strSQL) Get_ID = rs.Fields(0) End Function Private Sub Refresh_TPGD() Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Set rs = da.getRS("SELECT * FROM tpgiadinh WHERE Manv='" & Me.txtManv & "'") LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Set DataTPGD.DataSource = rs End Sub Private Sub Refresh_QTCT() Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Set rs = da.getRS("SELECT * FROM qtct WHERE Manv='" & Me.txtManv & "'") Set DataQTCT.DataSource = rs End Sub ++++++++++++++++++++++++++++++++++++++++++++++ 'Cập nhật thông tin bảng Nhân viên Private Sub Update_Nhanvien() On Error GoTo errhandler Dim strSQL As String If (Trim(Me.txtDiachi.Text) "") And (Me.txtQuequan "") And (Me.cboGioitinh "") Then Dim, maPhongban, machucvu, mabacluong As String End If If Trim(cboPhongban) = "" Then MsgBox "Chưa chọn Phòng ban", vbInformation SSTab.Tab = cboPhongban.SetFocus Exit Sub End If LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com If Trim(cboChucvu) = "" Then MsgBox "Chưa chọn Chức vụ", vbInformation SSTab.Tab = cboChucvu.SetFocus Exit Sub End If If Trim(cboBacluong) = "" Then MsgBox "Chưa chọn Bậc lương", vbInformation SSTab.Tab = cboBacluong.SetFocus Exit Sub End If maPhongban = Get_ID("phongban", "Tenphongban", Me.cboPhongban.Text) machucvu = Get_ID("chucvu", "Tenchucvu", Me.cboChucvu.Text) mabacluong = Get_ID("bacluong", "Tenbacluong", Me.cboBacluong.Text) strSQL = "UPDATE Hosocanbo SET " & _ "Hoten='" & EscStr(Me.txtHoten) & "'," & _ "Diachi='" & EscStr(Me.txtDiachi) & "'," & _ "Quequan='" & EscStr(Me.txtQuequan) & "'," & _ "SoCMND='" & Me.txtSoCMNN & "'," & _ "Ngaysinh='" & Me.dtNgaysinh.Value & "'," & _ "Gioitinh='" & Me.cboGioitinh.Text & "'," & _ "Dienthoai='" & EscStr(Me.txtDienthoai) & "'," & _ LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com "Trinhdovanhoa='" & EscStr(Me.txtTrinhdo) & "'," & _ "Maphongban='" & maPhongban & "'," & _ "Machucvu='" & machucvu & "'," & _ "Mabacluong='" & mabacluong & "' WHERE manv ='" & txtManv.Text & "'" Debug.Print strSQL da.getConnection.Execute strSQL Else MsgBox "Bạn phải nhập đầy đủ Địa chỉ, Quê quán Giới tính cho nhân viên!", vbInformation, "QLNS" End If Exit Sub errhandler: MsgBox "Error:" & Err.Description, vbCritical End Sub End Sub '+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ +++++++++++++++++++ ' Thêm Hồ sơ Private Sub Insert_Hoso() On Error GoTo errhandler Dim strSQL As String If (Trim(Me.txtDiachi.Text) "") And (Me.txtQuequan "") And (Me.cboGioitinh "") Then LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Dim, maPhongban, machucvu, mabacluong As String If Trim(cboPhongban) = "" Then MsgBox "Chưa chọn Phòng ban", vbInformation SSTab.Tab = cboPhongban.SetFocus Exit Sub End If If Trim(cboChucvu) = "" Then MsgBox "Chưa chọn Chức vụ", vbInformation SSTab.Tab = cboChucvu.SetFocus Exit Sub End If maPhongban = Get_ID("phongban", "Tenphongban", Me.cboPhongban.Text) machucvu = Get_ID("chucvu", "Tenchucvu", Me.cboChucvu.Text) mabacluong = Get_ID("bacluong", "Tenbacluong", Me.cboBacluong.Text) strSQL = "INSERT INTO Hosocanbo( " & _ "Manv,Hoten,Diachi,Quequan,SoCMND,Ngaysinh,Gioitinh,Dienthoai,Trinhdo," & _ ,Maphongban," & _ "Machucvu,Mabacluong) VALUES ('" & _ EscStr(Me.txtManv) & "','" & _ EscStr(Me.txtHoten) & "','" & EscStr(Me.txtDiachi) & "','" & EscStr(Me.txtQuequan) & "','" & _ Me.txtSoCMNN & "'," & Me.dtNgaysinh.Value & ",'" & Me.cboGioitinh.Text & "','" & _ LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com EscStr(Me.txtDienthoai) & "','" & EscStr(Me.txtTrinhdo) & "','" & _ ','" & matongiao & "','" & maPhongban & "','" & _ machucvu & "','" & mabacluong & "')" 'Debug.Print strSQL da.getConnection.Execute strSQL Else MsgBox "Bạn phải nhập đầy đủ Địa chỉ, Quê quán Giới tính cho nhân viên!", vbInformation, "QLNS" End If Exit Sub errhandler: MsgBox "Error:" & Err.Description, vbCritical End Sub ' '+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ++++++++++++++ LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Private Sub cmdThoat_Click() Unload Me End Sub Private Sub cmdXoa_Click() On Error GoTo errhandler If (SSTab.Tab = 0) Or (SSTab.Tab = 1) Then If MsgBox("Bạn chắn muốn xóa hết tất thông tin nhân viên này?", vbOKCancel, "QLNS") = vbOK Then ' Xóa thơng tin bảng q trình cơng tác strSQL = "DELETE FROM qtct WHERE Manv='" & EscStr(txtManv.Text) & "'" da.getConnection.Execute strSQL ' Xóa thông tin bảng Lương strSQL = "DELETE FROM luong WHERE Manv='" & EscStr(txtManv.Text) & "'" da.getConnection.Execute strSQL ' Xóa thông tin bảng Bảng chấm công strSQL = "DELETE FROM Bangchamcong WHERE Manv='" & EscStr(txtManv.Text) & "'" da.getConnection.Execute strSQL ' Xóa thơng tin bảng nhân viên strSQL = "DELETE FROM hosocanbo WHERE Manv='" & EscStr(txtManv.Text) & "'" da.getConnection.Execute strSQL LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com cmdBoqua_Click End If End If If (SSTab.Tab = 2) And (Trim(txtMaQTCT) "") Then If MsgBox("Bạn chắn muốn xóa Q trình đào tạo này?", vbOKCancel, "QLNS") = vbOK Then End If Exit Sub errhandler: MsgBox "Error:" & Err.Description, vbCritical End Sub ' Thủ tục lấy tên phòng ban tên chức vụ Function TimTen(sSQL As String) As String Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Set rs = da.getRS(sSQL) If rs Is Nothing Then TimTen = "" Else TimTen = rs.Fields(1).Value End If End Function Private Sub Form_Load() LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Set da = New CSDL Init SSTab.Tab = End Sub Private Sub SSTab_Click(PreviousTab As Integer) If SSTab.Tab = Then Refresh_QTCT End If If SSTab.Tab = Then Refresh_TPGD End If End Sub Private Sub txtDiachi_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then cmdChapnhan_Click End If End Sub LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com Private Sub txtDienthoai_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then cmdChapnhan_Click End If End Sub Private Sub txtQuequan_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then cmdChapnhan_Click End If End Sub Private Sub txtSoCMNN_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then cmdChapnhan_Click End If End Sub Private Sub txtTrinhdo_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then cmdChapnhan_Click End If End Sub LUAN VAN CHAT LUONG download : add luanvanchat@agmail.com ... thực trạng HTTT quản lý nhân công ty CP vật tư thiết bị xây dựng Việt Nam Chương 3: Phân tích thiết kế HTTT quản lý nhân theo hướng chức Công ty CP vật tư thiết bị xây dựng Việt Nam LUAN VAN CHAT... Phịng kế tốn) 2.2 Phân tích đánh giá thực trạng HTTT quản lý nhân Công ty CP Vật tư Thiết bị Xây dựng Việt Nam 2.2.1 Thực trạng HTTT quản lý nhân Công ty CP Vật tư Thiết bị Xây dựng Việt Nam ... 11 CHƯƠNG 2: PHÂN TÍCH ĐÁNH GIÁ THỰC TRẠNG HTTT QUẢN LÝ NHÂN SỰ TẠI CÔNG TY CP VẬT TƯ THIẾT BỊ XÂY DỰNG VIỆT NAM .20 2.1 Tổng quan Công ty CP Vật tư Thiết bị Xây dựng Việt Nam 20 2.1.1 Giới
Ngày đăng: 20/10/2022, 15:20
Xem thêm:
