ứng dụng tin học hoá vào quản lý hộ khẩu

Quản Lý Hộ Khẩu Đất nớc ta bớc sang giai đoạn phát triển kinh tế đa kinh tế đất nớc đuổi kịp nớc khu vực giới Thời kỳ phát triển nớc ta thời đại ngày trọng phát triển đội ngũ tầng lớp trí thức trẻ, với nguồn nhân lực Song song với việc phát triển theo đờng XHCN, nhà nớc ta trì pháp luật để quản lý dất nớc Còn quản lý công dân đợc giao cho quan quản lý hộ khẩu, nhân Trong giai đoạn đất nớc nghèo nàn lạc hậu, việc quan quản lý hộ theo dõi thông tin cá nhân vất vả, chủ yếu dùng thủ công nên công việc dễ nhàm trán buồn tẻ nhng với lòng yêu nghề đồng chí hoàn thành tốt nhiệm vụ Tuy nhiên hiệu suất chậm đòi hỏi nhiều ngời vào Ngày đất nớc phát triển, công nghệ thông tin vào sống Để giúp đồng chí ngành quản lý nhân không thấy nhàm chán công việc mạnh dạn đề xuất phơng án: ứng dụng tin học hoá vào Quản lý hộ Điều giúp tiết kiệm đợc nhân lực độ xác cao Hoàn thành đợc chơng trình xin chân thành cảm ơn giúp đồng chí ngành cung cấp tài liệu cô giáo Đặng Thị Phan Giang giúp đỡ trình thực đề tài Quản Lý Hộ Khẩu Chơng I : Giới thiệu chung Hệ thống quản lý hộ đợc thực từ xuống dới có phân cấp rõ ràng để nhằm mục đích theo dõi sát thông tin cá nhân giúp cho ngời quản lý tránh nhầm lẫn thời gian Để khắc phục đợc cồng kềnh hệ thống quản lý thủ công, xin mạnh dạn đề xuất phơng án quẩn lý đơn giản khoa học với độ xác cao Tôi xin đợc trình bày dới đây: I Nội dung toán quản lý Kể từ đợc sinh đến trởng thành công dân phải trải qua nhiều giai đoạn sống Cùng với gắn liền với theo dõi quan quản lý hộ Công việc đòi hỏi cần cù, tỷ mỉ có trách nhiệm cao ngời quản lý hộ Chẳng hạn sinh bắt đầu sống mới, lúc bớc đợc khai sinh thông qua quan quản lý hộ địa phơng Đây bớc để trở thành công dân Tiếp đến trởng thành đến nơi mới, công có trách nhiệm báo cáo với quan sở giúp cho quan quản lý nhân quản lý xã hội theo dõi thống kê cách rễ ràng Cơ quan quản lý hộ phải có nhiệm vụ thống kê đợc số ngời đi, số ngời để lu vào hồ sơ tiện theo dõi Mỗi cá nhân đợc lu vào hồ sơ riêng ( lu túi đựng hồ sơ lu máy) Khi công dân quan quản lý nhân không đợc huỷ hồ sơ mà cần phải lu vào nơi riêng đến cần dùng tới Cơ quan quản lý hộ phải thờng xuyên kiểm tra, theo dõi thống kê theo ngày-thángquý-năm Về số ngời đi, số ngời đến, số ngời đợc sinh ra, số ngời Để bổ xung thêm lu vào hồ sơ có sàng lọc II Quy tắc quản lý Một quan quản lý nhiều hộ Một cá nhân chịu quản lý quan Một cá nhân có hồ sơ III Đơn vị sử dụng hệ thống Cơ quan quản lý nhân hộ huyện ứng Hoà, tỉnh Hà Tây Quản Lý Hộ Khẩu Chơng II: khảo sát trạng xác lập dự án I Khảo sát trạng Trong trình điều tra tìm hiểu thu thập thông tin vận động giúp đỡ tạo điều kiện đồng chí ngành, với việc quan sát trực tiếp số giấy tờ, hồ sơ đồng chí, nhận thấy trông hồ sơ phải có giấy đăng ký tạm trú, tạm vắng Nh trờng hợp tất sinh viên xa công tác lĩnh vực Dới nội dung giấy tạm vắng cần phải có Cộng hoà xã hội chủ nghĩa việt nam Độc lập- Tự do- Hạnh phúc o0o -Đơn xin tạm trú tạm vắng Kính gửi nơi xin đăng ký Tên ngời làm đơn Địa chỉ: Nghề nghiệp: Số CMTND: Lý do: Xác nhận quan Ngời làm đơn Đây mẫu tờ khai quan trọng mà thiếu hồ sơ tạm trú tạm vắng điều kiện để ngời nh tất sinh viên bày tỏ nguyện vọng mong muốn Từ cho quan quản lý biết giải tốt vấn đề nguyện vọng tránh chủ quan, khách quan ngời quản lý Quản Lý Hộ Khẩu Kết thu đợc từ đợt điều tra cha cao Vì số khách quan nhng chủ yếu công tác bảo mật nghành, nên đôi lúc việc điều tra phải dựa số giấy tờ có liên quan, việc gặp nhiều khó khăn II Xác lập dự án Phạm vi điều tra quan quản lý nhân huyện ứng Hoà tỉnh Hà Tây Mục tiêu: đảm bảo yêu cầu nghiệp vụ, tăng khả xử lý thông tin với độ xác an toàn cao đồng thời mang lại lợi ích kinh tế, giảm chi phí nhân lực, giảm chi phí hoạt động Khắc phục đợc yếu hệ thống cũ Phác hoạ giải pháp: ứng dụng tin học hoá Phơng tiện Nhân công Máy Một ngờiời Thao tác thủ công Hồ sơ Nhiều ngời Từ hai hệ thống ta thấy hệ thống quản lý máy tối u Vì làm giảm hệ thống quản lý cồng kềnh xuống mức thấp số lợng ngời quản lý Tránh xáo trộn, nhầm lẫn trình tìm kiếm phù hợp với phát triển kinh tế tri thức mang lại lợi ích kinh tế cao Dự án cần đợc thông qua đợc triển khai tất quan ngành Nhất quan từ xa đến trung thành với phơng pháp thủ công để quản lý Nhng trớc hết cần phải thử nghiệm nơi đó, quan cần cử cán ngành đại diện quan đến tham quan theo dõi học tập Từ triển khai quan phơng án có tính khả thi cao Còn mà bớc đầu ta triển khai rộng khắp tất quan không tránh khỏi bỡ ngỡ, thiếu lòng tin nghi ngờ đầu t lãng phí, ngại tiếp cận công nghệ Nếu muốn làm đợc nh bớc ta nên lập ban điều hành dự án để giám sát hớng dẫn Khi việc vào ổn định, có nề nếp thành thục coi nh dự án thành công nh nhiệm vụ ban điều hành xong Quản Lý Hộ Khẩu Tiến trình thực thi ứng dụng Kế hoạch Thực Bớc (một tháng) Làm quen hệ thống Bớc (ba tháng) Thử nghiệm có tham quan theo dõi học tập Triển khai toàn diện hệ thống Bớc Quản Lý Hộ Khẩu Chơng III: phân tích Hệ thống I Đồ phân cấp chức Quản lý hộ Tìm kiếm Qlý sinh Q.lý tử Qlý nhập cư X.nhận sinh X.nhận Mất Quản lý Làm giấy Khai sinh Làm giấy Quản lý đến Mất QLHS sinh QLHS Mất Quản Lý Hộ Khẩu Quản lý sinh Đây bớc khởi đầu trình hình thành phát triển ngời Việc quản lý sinh cần đòi hỏi tất bớc mà không đợc bỏ xót thừa khâu Nh khâu xác nhận sinh tởng trừng nh đơn giản nhng lại khâu thiếu Vì theo đồng chí ngành cho biết, ngời đợc sinh giấy xác nhận nơi đợc sinh không đợc làm hồ sơ, giấy khai sinh ( đủ thủ tục cần có ) trừ số trờng hợp ngoại lệ Cũng nh hồ sơ thiếu giấy khai sinh cha làm kịp không đợc làm khai sinh Mà bắt buộc ngời ngời cần khai sinh phải đợi, vấn đề thuộc nguyên tắc bất di bất dịch ngành mà thay đổi đợc sống sau ngời Vì làm qua loa đại khái Nếu mà làm đợc nh tất hồ sơ có giá trị mặt pháp lý Quản lý tử Công việc quản lý tử công việc cuối liên quan đến công dân Không nghĩ mà ta lơ công tác, bớc phải mà không đợc bỏ qua Nhiệm vụ xác nhận ngời thuộc quan sở nơi c trú Để khẳng định ngời thuộc hộ nơi quản lý Nếu ngời nơi khác không thuộc vùng quản lý quan pháp luật, trạm xá, bệnh viện phải có trách nhiệm xác nhận trờng hợp ngời Khi đẫ có giấy xác nhận quan quản lý hộ ngời phải có trách nhiệm viết giấy xác nhận lu vào hồ sơ Hồ sơ đợc niêm phong lu vào nơi quy định cần ding tới tránh thất lạc Quản lý nhập c Khi công dân muốn chuyển đến nơi khác cần báo cáo cho quan quản lý hộ xin giấy tạm vắng ( làm, công tác mà không yêu cầu chuyển khẩu) Còn muốn cắt phải báo cáo để quan quản lý hộ có trách nhiệm làm thủ tục cần thiết Ngợc lại với đến, ngời muốn chuyển đến nơi phải báo cáo cho quan quản lý hộ làm thủ tục giấy tờ cần thiết ( nh giấy tạm trú) để có hồ sơ tạm trú Còn công dân muốn chuyển đến nơi cần có đồng ý nơi định chuyển đến xem có tiếp nhận hay không Nếu có làm thủ tục cần thiết quan quản lý hộ cũ ( nh cắt ) để việc chuyển thủ tục nơi tiếp nhận đợc dễ dàng Quản Lý Hộ Khẩu Hai việc chuyển chuyển đến phải đợc tiến hành song song lúc Nếu hai bên làm chậm Hơn khó khăn công tác quản lý hộ khẩu, lúc ngời chuyển trở thành hộ trôi Mà trờng hợp nhiều xã hội làm cho quan quản lý hộ khó việc thống kê trì ổn định xã hội Tìm kiếm Cũng chức phụ nhng lại thiếu, chức tìm kiếm kiểm tra rõ sai xót khâu quản lý Kiểm tra số ngời đi, ngời đến, số ngời vừa mất, vừa chào đời, để từ đa số liệu xác Nhng nơi để tra cứu tìm kiếm thông tin cá nhân giúp đỡ cho quan điều tra cách nhanh mà qua khâu trung gian II Biểu đồ luồng liệu Mức ngữ cảnh Trong biểu đồ ta thấy có hai từ kiểm tra có nghĩa quan quản lý hộ có nhiệm vụ kiểm tra thống kê số lợng ngời khu vực quản lý cách thờng xuyên Thống kê số lợng ngời nội trú có số lợng bao nhiêu, lại Đồng thời kiểm tra thống kê số ngời ngoại trú có bao nhiêu( bao gồm để tiện Kiểmcảtranhững ngời đến)Thống kê,theo báo dõi cáo Ngời ngoại trú phải có trách nhiệm báo cáo choQ.cơ cách sớm lý quan hộ quản lý hộ sở Công dân CA hộ tịch trớc 24 kể từ chuyển đến Còn ngời nội trú phải kiểm báotrờng hợp có đợc Yêu thống kê hay có vừa tra nhng trongKhai sinhcầu hay không? Nếu có thay đổi cần báo cáo lại để quan quản hộ làm thống kê lại hồ sơ quan để tiện theo dõi Tránh tình trạng lơ công tác điều tra thống kê cuối dẫn đến sai lệch số lợng Quản Lý Hộ Khẩu Mức đỉnh Công dân L.giấy ksinh Quản lý sinh Bệnh viện Hồ sơ gốc Xnhận sinh Quản lý tử Xác nhận Công dân Thống kê Báo cáo Lên d.s Qlý nhập cư Báo cáo Thống kê Tìm kiếm Trong mức nói tổng thể trình mà cha nói đợc cụ thể Nhng mức ngữ cảnh qua biểu đồ ta hình dung đợc trình xác minh, làm hộ cách rõ ràng Chúng ta thấy tất khâu phải làm thủ công nên đòi hỏi phải tỷ mỉ có độ xác cao Chỉ riêng khâu lu hồ sơ làm máy Vì lúc tất khâu hoàn thành công việc thống kê đợc phận tìm kiếm giám sát kiểm tra bớc trình để việc lập hồ sơ đợc tốt Ví dụ sinh phải có giấy xác nhận nơi ngời đợc sinh đâu? để tiện cho việc lập hồ sơ sinh, tuỳ thuộc vào nơi mà có giấy xác nhận Nếu bệnh viện phải có giấy xác nhận bệnh viện, viết rõ lý để lu hồ sơ đợc rõ ràng minh bạch Cũng giống nh quản lý sinh tử quan quản lý hộ phải xác định đợc mật độ dân số bao nhiêu, ngời đăng ký tạm trú tạm vắng Còn lại ngời số hộ thờng trú tự Tất công Quản Lý Hộ Khẩu việc cần phải nắm sát tình hình không đợc đại khái khách quan Sẽ dẫn đến công việc quản lý hộ không đợc tốt hồ sơ thống kê không đợc sát với thực tế, tránh việc ngồi quan để lên danh sách thống kê Vì hộ đợc thay đổi theo giờ, ngày Cho nên cần có giám sát,đòi hỏi khâu tìm kiếm phải làm nhiệm vụ để tránh quan liêu quan Mức dới đỉnh * Quản lý sinh: Qlý nơi sinh Công dân Tìm kiếm Quyết định Làm giấy Khai sinh Hồ sơ gốc sai xót Lập hồ sơ Nhìn biểu đồ ta hiểu rõ công việc lập hồ sơ sinh quan quản lý hộ khẩu, để tiến hành làm đợc hồ sơ phải đủ trình tự bớc Trớc tiên phận quản lý nơi sinh phải có nhiệm vụ viết giấy xác nhận ngời đợc sinh Tiếp đến phận kiểm tra mà ta thấy biểu đồ kiểm tra giấy xác nhận có thủ tục nguyên tắc hay không? không cầnLập báogiấy cho ngời biết Nếu Xácsinh nhậnvàtửlập hồ sơ đợc tiến hành.Công công viẹc làm giấy khai Giấy dân khai sinh đợc lu hồ sơ để tiện quản lý, lúc phận tìm kiếm lại kiểm tra thêm lần cuối Nếu không thấy có sai coi nh việc lập hồ sơ Cơchuyển quan hưu xong vàoquan nơi bảo quản hồ sơ gốc Một ý quan trọng hồ sơ gốc phải đợc làm thủ công đợc viết tay không đợc tẩy xoá Báo cáo Làm giấy tử * Quản lý tử: Tìm kiếm Hồ sơ gốc 10 Sai xót Lập hồ sơ Quản Lý Hộ Khẩu hình lại thông báo xoá cho ngời dùng biết Còn không muốn kích vào No để thoát Một nút trợ giúp có tác dụng làm tơi ghi di chuyển trỏ ghi đầu : Đó nút làm tơi Private Sub Command4_Click() Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient rs.Open "Select * From sohokhau", cnn, adOpenDynamic, adLockOptimistic, adCmdText Set DataGrid1.DataSource = rs End Sub Sau thực song công việc muốn thoát khỏi giao diện làm việc viết kiện click command thoát Private Sub Command9_Click() cnn.Close Unload Me End Sub 83 Quản Lý Hộ Khẩu 8.Thống kê sổ hộ địa bàn H Giao thống k hộ Yêu cầu thiết kế Phải có đầy đủ chức giống nh form sổ hộ để biết tổng số sổ hộ quản lý Trong giao diện form sổ hộ hình sử dụng frame (frame1 có commandbutton frame có 1textbox 5label, 2command, 2combobox, DataGird để hiển thị thông tin sổ hộ Lập trình Để truy cập vào file liệu lấy thông tin cập nhật thông tin dùng th viện ADO thông qua hệ thống DSN với sở liệu Access Trong hệ thống khai báo trỏ Rs dùng để truy cập vào ghi bảng sổ hộ Dim rs As ADODB.Recordset Dim rs1 As ADODB.Recordset 84 Quản Lý Hộ Khẩu Khi form đợc nạp Datagrid hiển thị tất thông tin bảng sổ hộ khẩu, Datagrid cho phép xem liệu không cho phép cập nhật hay sửa đổi liệu điều đảm bảo cho việc ngời sửa đổi lung tung liệu đợc Set DataGrid1.DataSource = rs H2: Lới hiển thị liệu Riêng combo1 nạp trờng sohk form hiển thị hình Thủ tục đợc viết kiện form_load() Combo1.Clear While Not rs.EOF Combo1.AddItem rs!sohk rs.MoveNext Wend Và combo2 nạp trờng quanhechuho form hiển thị Combo2.Clear While Not rs1.EOF Combo2.AddItem rs1!quanhechuho Rs1.MoveNext Wend Khi kích chuột chọn mã hộ combo ghi tơng ứng hiển thị cho ta thấy phải xây dựng thêm kiện combo combo_click() Private Sub Combo1_Click() Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient 85 Quản Lý Hộ Khẩu rs.Open "select * From sohokhau where sohk='" & Combo1.Text & "'", cnn, adOpenDynamic, adLockOptimistic, adCmdText Set DataGrid1.DataSource = rs End Sub Khi dùng chuột chọn trờng combo2 kiện combo_click xảy Private Sub Combo1_Click() Set rs1 = New ADODB.Recordset Rs1.CursorLocation = adUseClient rs.Open "select * From sohokhau where quanhechuho='" & Combo2.Text & "'", cnn, adOpenDynamic, adLockOptimistic, adCmdText Set DataGrid1.DataSource = rs1 End Sub Mặt khác form hiển thị ta không cho phép ngời dùng truy cập vào frame nhấn nút thêm mới, tìm kiếm,sửa đ ợc truy cập vào Frame1.Enabled = True Frame2.Enabled = False Để nhập thông tin vào sổ hộ hay nói cách khác làm sổ hộ cho hộ gia đình Thì phải mở giao diện sổ hộ di chuột chọn vào command 1_click() thêm lúc tất thông tin cần nhập hiển thị frame khung chứa liệu gồm combo textbox có chức nhập liệu vào gồm có Label để hiển thị nhãn hớng dẫn ngời dùng 86 Quản Lý Hộ Khẩu H3: Khung nhập liệu Khi nhập đầy đủ thông tin theo yêu cầu lại dùng chuột nhấn vào nút chấp nhận Khi thông tin bạn vừa nhập đợc nạp vào chơng trình hay nói cách khác làm song sổ hộ cho hộ gia đình Private Sub Command1_Click() Set rsadd = New ADODB.Recordset rsadd.Open "Select * From sohokhau adOpenDynamic, adLockOptimistic, adCmdText ", cnn, rsadd.AddNew Combo1.Text = "" Text1.Text = "" combo2.Text = "" plaod = "New" Frame1.Enabled = True Frame2.Enabled = False End Sub Một dễ nhận thấy sau nhấn nút thêm combo textbox bị xoá trắng Chú ý nhập liệu phải nhập đầy đủ thông tin không thông báo cho biết ta cha nhập Các bạn thấy đề cập đến nút chấp nhận Tôi nghĩ bạn phải tự đặt câu hỏi, nút chấp nhận nh mà làm xong công việc lại phải dùng đến vậy? Sau nội dung mà làm nên điều nút chấp nhận Private Sub Command7_Click() On Error GoTo loi 87 Quản Lý Hộ Khẩu Select Case plaod Case "New" rsadd!sohk = Combo1.Text rsadd!tentvien = Text1.Text rsadd!quanhechuho = Combo2.Text rsadd.Update Label8.Caption = "" & rs.RecordCount Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient rs.Open "Select * From sohokhau", cnn, adOpenDynamic, adLockOptimistic, adCmdText Set DataGrid1.DataSource = rs Label8.Caption = "" & rs.RecordCount Case "Edit" rs!sohk = Combo1.Text rs!tentvien = Text1.Text rs!quanhechuho = Combo2.Text rs.Update End Select Frame1.Enabled = False Frame2.Enabled = True Exit Sub Loi: MsgBox "Hãy kiểm tra lại thông tin bạn nhập vào" End Sub Trong kiện click nút chấp nhận phải đặt Textbox Combo ứng với Label tơng ứng nhập đủ liệu ta nhấn nút chấp nhận 88 Quản Lý Hộ Khẩu Khi nhập không theo nội dung hình thông báo Hãy kiểm tra lại thông tin bạn nhập vào Khi bạn cần thực lại cho xong Trong nội dung nút chấp nhận,xoá bạn thấy có dòng lệnh Label8.Caption = "" & rs.RecordCount Mục đích dòng lệnh form hiển thị thống kê đợc tổng số sổ hộ có địa bàn đợc đặt kiện form_load Đặt nội dung nút chấp nhận để thực thêm ghi tự động tăng lên Còn đặt nội dung nút xoá tự động giảm ghi ta xoá Khi thiết kế nút chấp nhận lại nghĩ ta chấp nhận mà không bỏ qua muốn Vậy nên lại thiết kế nút trợ giúp để không muốn thực công việc bạn vừa làm song, việc nhấn vào nút Bỏ qua song Nội dung nút bỏ qua nh sau: Private Sub Command8_Click() Select Case plaod Case "New", "Edit" rsadd.CancelUpdate End Select Frame1.Enabled = False Frame2.Enabled = True End Sub Còn ngời làm sổ hộ làm sai không thông tin gia đình đến gặp trực tiếp ngời phụ trách để sửa lại Khi muốn sửa lại thông tin giao diện thiết kế command2 sửa Khi nhấn vào nút sửa thông tin cần sửa lên hình để ngời phụ trách sửa Trong th viện ADO có hỗ trợ sửa trực tiếp ghi hiển thị lới DataGird Trong trờng hợp sửa khung nhập liệu trớc sửa trớc nhấn vào nút sửa phải di chuột đến ghi cần sửa trớc sau nhấn vào nút sửa Sau sửa nh ý nhấn chuột vào nút chấp nhận để thoát khỏi frame quay chế độ ban đầu ẩn frame 89 Quản Lý Hộ Khẩu Private Sub Command2_Click() plaod = "Edit" Combo1.Text = "" & rs!sohk Text1.Text = "" & rs!tentvien combo2.Text = "" & rs!quanhechuho Frame1.Enabled = True Frame2.Enabled = False End Sub Ngợc lại với sửa xoá, chơng trình để xoá thông tin không cần thiết cần phải xây dựng kiện cho nút xoá Private Sub Command3_Click() If rs.EOF Or rs.BOF Then MsgBox "ko co ban ghi xoa" Exit Sub End If i = MsgBox("co xoa ko?", vbYesNo + vbQuestion) If i = vbYes Then rs.Delete End If MsgBox "da xoa" Set DataGrid1.DataSource = rs End Sub Khi cần xoá thông tin chọn thông tin nhấn vào nút xoá Khi hình lên thông báo có xoá không Mục đích thông báo trì hoãn hay nói cách khác cho bạn xuy nghĩ có nên xoá không Nếu muốn xoá bạn kích vào nút Yes lúc ghi chọn đợc xoá hình lại thông báo xoá cho ngời dùng biết Còn không muốn kích vào No để thoát 90 Quản Lý Hộ Khẩu Một nút trợ giúp có tác dụng làm tơi ghi di chuyển trỏ ghi đầu : Đó nút làm tơi Private Sub Command4_Click() Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient rs.Open "Select * From sohokhau", cnn, adOpenDynamic, adLockOptimistic, adCmdText Set DataGrid1.DataSource = rs End Sub Khi ngời quản lý muốn tìm thông tin sổ hộ mà không nhớ rõ thông tin xác sổ Mà nhớ chi tiết nhỏ nên khó muốn tìm phải lục đống hồ sơ Để giúp ngời quản lý tìm kiếm thông tin sổ hộ cách nhanh mà không thời gian Thì đợc viết chơng trình kiện Tìm kiếm Private Sub Command5_Click() plaod = "Find" Combo1.Text = "" Text1.Text = "" combo2.Text = "" Frame1.Enabled = True Frame2.Enabled = False End Sub Mục đích kiện trợ giúp giúp ngời quản lý tìm kiếm thông tin kích chuột vào nút tìm kiếm hình giao diện thông tin sổ hộ Khi bạn muốn tìm tới sổ có tủ bạn quản lý mà nhớ rõ chút thông tin sổ đó, nhập thông tin mà bạn nhớ vào khung liệu sau nhấn vào nút chấp nhận Màn hình thông tin sổ mà bạn cần, hay nói cách khác thông tin vị trí sổ tủ để bạn lấy dùng Nội dung nút tìm kiếm đợc thiết kế nh nút 91 Quản Lý Hộ Khẩu thêm nhng khác chỗ tìm kiếm không cần nhập đủ thông tin lên textbox combo Sau thực song công việc muốn thoát khỏi giao diện làm việc viết kiện click command thoát Private Sub Command9_Click() cnn.Close Unload Me End Sub Giới thiệu chơng trình Để tiện cho ngời quản lý làm tốt công việc thiết kế form trợ giúp Tôi khuyên bạn mở form trợ giúp trớc làm việc đọc rõ cách thức làm tránh bỡ gỡ công việc Sau nội dung form trợ giúp đợc thiết kế Label, 1command thoát lới hiển thị Listbox(đợc thiết kế để hiển thị nội dung trợ giúp) 92 Quản Lý Hộ Khẩu H1: Giao diện form trợ giúp Thoát khỏi ứng dụng muốn thoát khỏi ứng dụng mà không cấn di chuột nhiều xây dựng nút thoát Menu Bar Chỉ với dòng lệnh: END Khi di chuyển chuột vào nhấn tất giao diện đợc đóng không thi hành ứng dụng 93 Quản Lý Hộ Khẩu Tổng kết - đánh giá I Hạn chế chơng trình - Chơng trình có tính chuyên nghiệp cha cao - Cha giải đợc chọn vẹn vấn đề nảy sinh trình quản lý - Chơng trình cha đạt tính thẩm mỹ cao nh đạt đợc yêu cầu ngời dùng - Rất mong đợc tất bạn đọc góp ý thêm để chơng trình đợc hoàn thiện II Hớng phát triển chơng trình Chơng trình chạy máy đơn lẻ, yêu cầu tất yếu chơng trình phải nâng cấp để chạy môi trờng client-server Đây chơng trình ứng dụng thực tế lớn phức tạp Trong tơng lai với ổn định hệ thống nghiệp vụ công tác quản lý quan, chơng trình tiếp tục hoàn thiện để đáp ứng cách tốt cho công tác quản lý nhân địa bàn Cùng với phát triển ngành công nghệ thông tin phần nềm chắn mở hệ thống quản lý vững cho quan 94 Quản Lý Hộ Khẩu Tài liệu tham khảo Microsoft Visual Basic & Lập trình sở liệu 6.0 Data Report NXB: Lao động xã hội NXB: Thống kê 95 Quản Lý Hộ Khẩu Nhận xét thực tập tốt nghiệp giáo VIÊN hớng dẫn Tên đề tài: Hệ thống quản lý hộ Sinh viên thực hiện: Lớp: Nhận xét nội dung thực tập tốt nghiệp Nhận xét sinh viên thời gian làm thực tập tốt nghiệp Hà Nội, ngày tháng năm 2005 Giáo viên hớng dẫn 96 Quản Lý Hộ Khẩu Mục lục Chơng I : Giới thiệu chung .2 I Nội dung toán quản lý II Quy tắc quản lý .2 III Đơn vị sử dụng hệ thống Chơng II: khảo sát trạng xác lập dự án I Khảo sát trạng II Xác lập dự án Chơng III: phân tích Hệ thống I Đồ phân cấp chức .6 Quản lý sinh Quản lý tử Quản lý nhập c Tìm kiếm .8 II Biểu đồ luồng liệu Mức ngữ cảnh Mức đỉnh Mức dới đỉnh .10 III Mô hình thực thể / liên kết 13 Xác định kiểu thực thể .13 Quan hệ thực thể 15 Chơng IV: thiết kế cài đặt chơng trình .17 I Thiết kế sở liệu 17 Bảng thờng trú .17 Bảng sổ hộ 18 Bảng chứng minh th nhân dân 18 Bảng tạm trú 18 II Thiết kế giao diện 19 Giao diện 19 Giao diện thống kê sổ hộ 20 3.Giao diện cập nhật nhân 30 Quản lý tạm trú-vắng 41 Quản lý thờng trú 51 Quản lý theo giấy chứng minh th nhân dân .63 Thống kê nhân địa bàn .72 8.Thống kê sổ hộ địa bàn 84 Giới thiệu chơng trình 92 Tổng kết - đánh giá .94 I Hạn chế chơng trình 94 II Hớng phát triển chơng trình 94 Tài liệu tham khảo .95 97 [...]... điểm Một cơ quan có thể quảnlý nhiều hồ sơ, nhiều tạm trú, tạm vắng Một cơ quan có thể quản lý nhiều địa điểm 16 Quản Lý Hộ Khẩu Chơng IV: thiết kế và cài đặt chơng trình Khi xây dựng chơng trình quản lý hộ khẩu để làm đợc các thông tin liên quan đến quản lý, kết nối dữ liệu và thống kê nhân khẩu, tôi đã lựa chọn công cụ lập trình Visual-Basic để xây dựng chơng trình Quản lý hộ khẩu Sau đây là nội dung... thể "chứng minh th nhân dân": CMTND Số CMTND Ngày cấp Đơn vị cấp Số chứng minh th nhân nhân Ngày cấp Đơn vị cấp Kiểu thực thể "sổ hộ khẩu" : 13 Quản Lý Hộ Khẩu Sổ hộ khẩu Sổ hộ khẩu Sổ HK Tên thành viên Quan hệ chủ hộ Tên thành viên Quan hệ chủ hộ Kiểu thực thể "tạm trú": Số tạm trú Tạm trú Số tạm trú Ngày đăng ký Thời hạn Ngày đăng ký Thời hạn 14 Quản Lý Hộ Khẩu 2 Quan hệ giữa các thực thể Nhìn vào. .. số nhân khẩu Menu sổ hộ khẩu 2 Giao diện thống kê sổ hộ khẩu H Giao sổ khẩu Yêu cầu thiết kế Phải có đầy đủ các chức năng để nhập thông tin cho một hộ gia đình vào sổ hộ khẩu Trong giao diện của form sổ hộ khẩu trên màn hình tôi sử dụng 2 frame trong đó ( frame 1 có 7 command button và frame 2 có 1 textbox và 3 label, 2 command button, 2 combo box, 1 DataGird để hiển thị thông tin về sổ hộ khẩu Lập... cho phép ngời dùng truy cập vào frame 1 cho đến khi nhấn nút thêm mới, tìm kiếm,sửa thì nó mới đ ợc truy cập vào Frame1.Enabled = True Frame2.Enabled = False Để nhập thông tin vào sổ hộ khẩu hay nói cách khác là làm một sổ hộ khẩu cho một hộ gia đình Thì phải mở giao diện sổ hộ khẩu và di chuột chọn vào 22 Quản Lý Hộ Khẩu command 1_click() thêm mới lúc đó tất cả các thông tin cần nhập sẽ hiển thị trên... DataGrid1.DataSource = rs End Sub Khi ngời quản lý muốn tìm thông tin một sổ hộ khẩu mà không nhớ rõ thông tin chính xác về sổ đó Mà chỉ nhớ một trong các chi tiết rất nhỏ nên rất khó khi muốn tìm phải lục cả đống hồ sơ Để giúp ngời quản lý tìm kiếm thông tin trong sổ hộ khẩu một cách nhanh nhất mà không mất thời gian là mấy Thì đợc tôi viết chơng trình trong sự kiện Tìm kiếm 27 Quản Lý Hộ Khẩu Private Sub Command5_Click()... ngời quản lý tìm kiếm thông tin khi kích chuột vào nút tìm kiếm thì màn hình giao diện sẽ hiện ra các thông tin của sổ hộ khẩu Khi đó bạn muốn tìm tới cuốn sổ nào có trong tủ bạn quản lý mà chỉ nhớ rõ một chút thông tin về cuốn sổ đó, hãy nhập thông tin mà bạn nhớ vào khung dữ liệu sau đó nhấn vào nút chấp nhận Màn hình sẽ hiện ra thông tin về cuốn sổ mà bạn cần, hay nói cách khác là hiện ra thông tin. .. điều kiện lọc của sổ hộ khẩu Sau khi đã thực hiện song công việc muốn thoát khỏi giao diện mình đang làm việc thì tôi viết sự kiện click của command thoát Private Sub Command9_Click() cnn.Close Unload Me End Sub 29 Quản Lý Hộ Khẩu 3.Giao diện cập nhật nhân khẩu H1: Giao diện quản lý nhân khẩu Yêu cầu thiết kế Phải có đầy đủ các chức năng của một bộ hồ sơ nhân khẩu để nhập thông tin vào Trong giao diện... giữa các kiểu thực thể tồn tại trong hệ thống 15 Quản Lý Hộ Khẩu Cơ quan hộ khẩu quản lý công dân thông qua hồ sơ và giấy tạm trú tạm vắng Còn công dân phải có đủ giấy khai sinh, tạm trú, CMTND, xác nhận tử (nếu có) Nh vậy một bộ hồ sơ bắt buộc phải có: Giấy khai sinh, CMTND, tạm trú, tạm vắng, xác nhận tử(nếu có) Một cơ quan quản lý hộ khẩu có thể quản lý nhiều công dân Một công dân chỉ có một hồ... trình 20 Quản Lý Hộ Khẩu Để truy cập vào các file dữ liệu lấy thông tin và cập nhật thông tin tôi dùng th viện ADO thông qua hệ thống DSN với cơ sở dữ liệu là Access Trong hệ thống tôi khai báo các con trỏ Rs dùng để truy cập vào các bản ghi của bảng sổ hộ khẩu Dim rs As ADODB.Recordset Dim rs1 As ADODB.Recordset Khi form đợc nạp thì trên Datagrid 1 sẽ hiển thị tất cả các thông tin về bảng sổ hộ khẩu, ... số 6 Gioitinh Text 5 Chữ 7 SoCMT Text 7 Số 17 Mã sinh viên Mã lớp Họ tên sinh viên Ngày, tháng, năm sinh Địa chỉ sinh viên Giới tính Số CMT Quản Lý Hộ Khẩu 2 Bảng sổ hộ khẩu tt Khoá Tên trờng Kiểu DL Kích Dạng cỡ thức Giá trị Not Mô tả null ngầm định 1 sohk sohk Text 7 Chữ và số Chữ và số 2 tenthanhvien Text 7 3 quanhechuho Text 5 Số Kíc Dạng Sổ hộ khẩu Tên thành viên Quan hệ chủ hộ 3 Bảng chứng minh