Xây dựng chương trình quản lý nhân sự bằng Visual Basic cho Chi cục Dự trữ Sóc Sơn

MỤC LỤC

Đánh giá u, nhợc điểm của hệ thống hiện tại

Theo cách làm thủ công, việc sắp xếp hệ thống thông tin phục vụ công tác quản lý của Chi cục Dự trữ, mặc dù trong nhiều năm qua không ngừng đổi mới, có nhiều tiến bộ, đã đáp ứng đợc nhiệm vụ đợc giao. Do cách làm thủ công hiện nay, hồ sơ cán bộ phải lu trên giấy tờ, sổ sách (bằng viết tay hoặc đánh máy) khi cần bổ sung ngời quản lý phải sửa, đổi, thêm, bớt, gạch xoá dẫn đến thông tin cha chính xác, dễ nhầm lẫn. Đối với một khối lợng hồ sơ lớn các công việc lu trữ bảo quản, bổ sung cập nhật, tra cứu, khai thác thông tin đòi hỏi phải tiêu tốn nhiều về vật chất và con ngời, nh hệ thống kho tàng lu giữ, bảo quản, số lợng cán bộ làm công tác.

Thiết kế tổng thể chơng trình và tổ chức CSDL Chơng IV: Hớng dẫn cài đặt chơng trình

Một số khái niệm cơ bản về quản lý và ứng dụng tin học trong công tác quản lý

    Việc áp dụng tin học vào công việc quản lý trớc hết giải phóng cho các nhà lãnh đạo khỏi các công việc máy móc, tạo điều kiện, thời gian cho họ dốc sức vào quản lý chặt chẽ, khoa học, làm tăng tốc độ về xử lý thông tin. HTTT là hệ thống đợc tổ chức thống nhất từ trên xuống dới có chức năng tổng hợp các thông tin giúp các nhà quản lý tốt cơ sở của mình và trợ giúp ra quyết định hoạt động kinh doanh hay hoạt động giảng dạy, học tập của học sinh. Đây là chức năng thể hiện tính mở của hệ thống, tính giao diện của hệ thống thông tin đầu ra gắn với chu kỳ thời gian tùy ý theo yêu cầu của bài toán cụ thể, từ đó ta có thể lọc bớt thông tin thừa trong quá trình xử lý.

    Giới thiệu về microsoft access 1. Microsoft Access là gì?

      Ta có thể liên kết một bảng dữ liệu trong Access với một bảng khác trong Paradox hoặc một bảng trong Access với một bảng trong Dbase, ta có thể lấy kết quả của việc liên kết đó và kết nối các dữ liệu này với những bảng làm việc trong Excel một cách nhanh chóng, dễ dàng. Access cung cấp hệ thống quản lý cơ sở dữ liệu thực sự, hoàn thiện với những định nghĩa khóa chính, khóa ngoại lai, các loại luật quan hệ, các mức kiểm tra sự toàn vẹn của dữ liệu cũng nh định dạng và những định nghĩa mặc. Jet Engine là cầu nối giữa ứng dụng và các tập tin cơ sở dữ liệu vật lý, nó bao gồm một bộ các tập tin th viện liên kết động, có nhiệm vụ chuyển các yêu cầu xử lý cơ sở dữ liệu của ứng dụng phát triển bằng Access thành các lệnh vật.

      Ngôn ngữ Visual Basic 6.0 1. Microsoft Visual Basic và các phiên bản

        Công cụ gỡ rối: Khi chạy thử chơng trình có thể sử dụng công cụ gỡ rối khá mạnh của Mirosoft Visual Basis ( Debug ). Công cụ này cho phép hiệu chỉnh phần câu lệnh ngay trong khi thực hiện chơng tình đối với các lôĩ không quan trọng. Để phát huy hết khả năng Visual Basis hay Acces chúng ta phải hiểu thật rõ cơ chế xử lí dữ liệu ( Jet Engine ), Jet Engine cho phép làm việc với nhiều dang thức dữ liệu khác nhau và cung cấp giao diện lập trình h- ớng đối tợng để làm viêc với CSDL.

        JetEngin là thành phần cốt lừi của hệ quản trị CSDL Access do đú cú thể trở thành một nhà lập trình chuyên nghiệp với Visual Basis thì điều đầu tiên là Jet Engine. Tuy nhiên mỗi ngôn ngữ lập trình có một hệ thống mạnh riêng của nó, ở lĩnh vực này nó không đáp ứng đợc, không thích hợp đợc nhng ở lĩnh vực khác thì lại làm đ- ợc. Ví dụ nh Access có công cụ thiết kế báo biểu mạnh hơn nhiều so với Visual Basis, trong Visual Basis có bộ thiết kế báo biểu không do Microsoft phát triển mà lại do hãng Seagate, và đợc đa vào nh một OLE Custom Control độc lập.

        Vì vậy tuỳ theo yêu cầu của một bài toán cụ thể mà ngời lập trình chọn một ngôn ngữ thích hợp để giải quyết chúng. Visual Basis 6.0 cho phép ngời lập trình nhúng các đối tợng hay sử dụng các hàm th viện DLL một các dễ dàng. Visual Basis 4.0 hỗ trợ sự phát triển 32 - bit và bắt đầu tiến trình chuyển Visual Basis thành một ngôn ngữ lập trình hớng đối tợng đầy đủ.

        Ngoài ra Visual Basis 5.0 và 6.0 còn có công cụ trợ giúp thông minh, công cụ gỡ rối cao, các công cụ tạo lập ActiveX, cho phép truy cập nhiều nguồn dữ liệu khác nhau.

        Mối liên hệ giữa Access và Visual Basis

        Nó bao gồm cả trình biên dịch, cho phép nhà phát triển sinh ra các tập tin .EXE chạy độc lập ( dĩ nhiễn cần có thêm các th viện DLL, VBX, OCX ) còn Access hoàn toàn là một hệ quản trị CSDL. Access tỏ ra mạnh hơn khi cho phép quản lí các sự kiện tinh tế hơn chẳng hạn nh Text Box control, Access cho phép xử lí các cự kiện liên quan đến sự thay đổi dữ liệu: OnChange, BeforeUpdate, AfterUpdate trong khi Visual Basis 4.0 chỉ có thể kiểm tra sự kiện Change. Vì vậy Access cho phép phát triển các chơng trình cập nhật dữ liệu thông minh hơn do kiểm soát đợc dữ liệu nhập một cách tinh tế.

        Ban đầu Access đơn giản chỉ là quản trị CSDL quan hệ ( Relation Database Management System ) dùng trong văn phòng ( nằm trong bộ Microsft Professional Word, Exccel, Power Point ) do đó Microsft đặc biệt chú trọng. Điều này làm cho công cụ hỗ trợ thiết kế ( giao diện thiết kế, các Wizard cho phép tự động hoá các quá trình thủ. công trong quá trình thiết kế form, table, query) của Access tỏ ra rất mạnh, hơn hẳn Visual Basis. Chẳng hạn nhiều lập trình viên kinh nghiệm khi viết các câu lệnh SQL trong Visual Basis thờng dùng kềm bộ thiết kế Query trong Access để sinh ra trong câu lệnh SQL một cách dễ dàng.

        Ta thấy Access và Visual Basis khác nhau ở cách chế tạo ra các ứng dụng so với các công cụ thiết kế khác nhau nhng thành phần xử lí CSDL thì có nhiều điểm tơng đồng vì cùng sử dụng Jet Engine. Visual Basis cho phép biện dịch các ứng dụng thành tập tin EXE, trong khi Access ta phỉ phân phối luôn cả tài nguyên thiết kế. Khái ngờiệm CSDL trong Access bao gồm cả phần dữ liệu (các bảng) và phần ứng dụng ( query, form, table, report, macro, module ), trong khi.

        Hệ thống giao diện hỗ trợ thiết kế ( đặc biệt trong Access ) cũng khá rắc rối khiến ngời cha có kinh nghiệm hay lẫn lộn giữa các thức dành cho ngời dùng.

        Thông tin vào ra của hệ thống

          - Thông tin khen thởng kỷ luật: đây là những thông tin có thể xảy ra hàng năm đối với CBCC vì vậy nó cũng đợc coi là thông tin vào của hệ thống. - Thông tin về cán bộ thuyên chuyển công tác: Cán bộ trong các đơn vị có thể chuyển qua các phòng ban khác nhng vẫn nằm trong cơ quan, để xử lý việc thay đổi này bằng cách ta chỉ thay đổi mã phòng hay mã ban còn các thông tin khác vẫn giữ nguyên. - Thông tin về cán bộ bị chết đột xuất, hay thôi việc đây là phần thay đổi mà không dự đoán trớc đợc, việc này thờng ít xảy ra nhng chúng ta cũng cần phải tính đến.

          - Các bảng thống kê theo yêu cầu của lãnh đạo - Tìm kiếm thông tin về một cá nhân nào đó - Thống kê theo dõi nhân sự toàn cơ quan - Thống kê về tình hình học vấn. - Danh sách CB nghỉ hu - Danh sách CB đi học Thống kê khen thởng kỷ luật.

          Sơ đồ luồng dữ liệu

            • Kho dữ liệu: Là luồng thông tin lu trữ trong một khoảng thời gian để một hoặc nhiều chức năng truy nhập vào, chúng có thể là các tệp dữ liệu đợc l- u trong máy tính. Biểu đồ mức ngữ cảnh cho chúng ta thấy cái nhìn khái quát của hệ thống. Cho ta thấy đợc các chức năng chính của hệ thống, gồm phần DL tra cứu, thống kê theo định kỳ.

            Chức năng nhập DL làm nhiệm vụ nhập các thông tin về CB vào File HOSOCB, có kiểm tra DL trớc khi nhập và nhập các danh mục. Chức năng tra cứu: Dùng để phụ cho việc tra cứu tìm kiếm do lãnh đạo yêu cầu. Thông tin phục vụ cho việc tra cứu gồm các File CSDL mà hệ thống.

            Loại thứ hai là thống kê theo định kỳ, tháng, quý, năm nó mang tính ổn định.

            Sơ đồ dòng dữ liệu mức 2 chức năng tra cứu
            Sơ đồ dòng dữ liệu mức 2 chức năng tra cứu

            Một số Code của chơng trình

            CboPhong.Text = Data1.Recordset.Fields(20).Value CboChucvu.Text = Data1.Recordset.Fields(21).Value CboChucvuht.Text = Data1.Recordset.Fields(22).Value TxtBacluong.Text = Val(Data1.Recordset.Fields(23).Value) TxtKhenthuong.Text = Data1.Recordset.Fields(24).Value TxtKyluat.Text = Data1.Recordset.Fields(25).Value 'CboDonvi.Text = Data1.Recordset.Fields(26).Value. CboPhong.Text = Data1.Recordset.Fields(20).Value CboChucvu.Text = Data1.Recordset.Fields(21).Value CboChucvuht.Text = Data1.Recordset.Fields(22).Value TxtBacluong.Text = Val(Data1.Recordset.Fields(23).Value) TxtKhenthuong.Text = Data1.Recordset.Fields(24).Value TxtKyluat.Text = Data1.Recordset.Fields(25).Value.