Chương Trình Quản Lý Hộ Khẩu.docx

LỜI CẢM ƠN 1 Đồ Án Tốt Nghiệp Chương trình Quản Lý Hộ Khẩu LỜI CẢM ƠN Em xin chân thành cảm ơn Khoa Công Nghệ Thông Tin, Trường Đại Học Giao Thông Vận Tải đã tạo điều kiện cho em thực hiện đề tài này[.]

KHẢO SÁT SƠ BỘ

Hiện trạng

Hiện tại phường chưa có hệ thống phần mềm quản lý nhân, hộ khẩu mà vẫn làm thủ công trên giấy tờ.

Tổ chức nhân sự cho công tác quản lý:

Nhân sự bao gồm: Người quản lý (Trưởng CA) có trách nhiệm cao nhất trong công tác quản lý nhân, hộ khẩu của địa bàn phường và một Phó Trưởng CA, các cán bộ phụ trách hỗ trợ tác nghiệp (thu thập thông tin nhân khẩu địa bàn, kiểm tra, báo cáo)

Quy trình quản lý và nhận xét, đánh giá công tác quản lý

Công việc quản lý nhân, hộ khẩu là một công việc thường xuyên của các địa bàn dân cư.

Một công dân thuộc địa bàn cư trú nào thì phải thực hiện đầy đủ nghĩa vụ của mình đối với địa bàn dân cư đó về khai báo nhân khẩu của hộ mình

Khi công dân chuyển đến địa bàn cư trú phải đến khai báo, công an địa bàn sẽ lưu lại những thông tin cá nhân của công dân đó và các công dân cùng hộ khẩu với mình(các thông tin cá nhân đó là: họ tên, ngày sinh, giới tính, số chứng minh thư, nơi đăng ký hộ khẩu thường trú, quê quán, nơi ở hiện tại, nghề nghiệp, quan hệ, ghi chú) Các thông tin này sẽ được lưu trong cơ sở dữ liệu của công an địa bàn Nếu là công dân đến cư trú lâu dài thì công an địa bàn tiến hành thủ tục nhập hộ khẩu cho công dân đó Nếu công dân chỉ đến địa bàn với mục đích cư trú tạm thời thì công dân đó sẽ được cấp cho một giấy tạm trú có thời hạn, giấy tạm trú đó chỉ có giá trị trong ba tháng Nếu sau ba tháng công dân đó vẫn tiếp tục ở đó thì phải đến công an địa bàn khai báo lại và sẽ được cấp một giấy tạm trú mới.

Khi công dân chuyển đi, công an địa bàn có công dân đó cư trú tiến hành chuyển công dân đó đến nơi tạm trú, cụ thể là sẽ cung cấp cho công dân đó giấy khai báo tạm vắng đối với những công dân có mục đích chuyển địa bàn cư trú để nhằm mục đích sẽ được làm thủ tục chuyển khẩu và sẽ bị xóa khỏi cơ sở quản lý.

Việc quản lý nhân, hộ khẩu trên sổ sách giấy tờ diễn ra rất phức tạp và khó khăn cho người quản lý, đặc biệt là sẽ làm mất nhiều thời gian vào công tác tìm kiếm, kiểm kê và báo cáo.

Mẫu khai báo tạm trú, tạm vắng

Các thông tin cần quản lý

1.3.1 Thông tin về người dùng.

1.3.2 Thông tin về các danh mục.

 Danh mục kiểu hộ khẩu

 Kiểu hộ khẩu được phân theo thời gian cư trú, mục đích cư trú.

 Hộ khẩu kiểu KT1: là hộ khẩu thường trú

 Hộ khẩu kiểu KT2: trong đó gồm hai kiểu

 KT2 đến: hộ khẩu địa phương khác chuyển đến.

 Hộ khẩu kiểu KT3: là hộ khẩu ở ngoài địa bàn quản lý, nhưng có nhà ở ổn định trong khu vực quản lý.

 Hộ khẩu kiểu KT4: thuộc hộ khẩu ngoài tỉnh(địa bàn cư trú) đến thuê trọ để làm ăn sinh sống hoặc học tập.

1.3.3 Thông tin về hồ sơ.

1.3.3.1 Thông tin về hộ khẩu cần quản lý.

1.3.3.2 Thông tin về nhân khẩu cần quản lý.

 Bí danh (tên thường gọi)

 Số chứng minh thư nhân dân

 Nơi cấp chứng minh thư

 Ngày cấp chứng minh thư nhân dân

 Quan hệ với chủ hộ

1.3.4.1 Báo cáo số lượng hộ khẩu

1.3.4.2 Báo cáo số lượng nhân khẩu

1.3.4.3 Thông tin về các đối tượng cá biệt trong địa bàn

Tổ chức

 Là người có quyền và trách nhiệm cao nhất tại Phường, theo dõi kiểm tra quá trình làm việc của toàn thể các đồng chí trong Phường.

 Đảm bảo việc quản lý chung của công an Phường, giải quyết các vấn đề nảy sinh trong quá trình làm việc.

 Cập nhật thông tin nhân khẩu thường xuyên trong địa bàn cư trú

 Xử lý, và báo cáo thống kê các nhân khẩu trong địa bàn vào cuối tháng, cuối quý và cuối năm Thống kê các đối tượng trong địa bàn đã và đang có biểu hiện phạm tội cần được quản lý nghiêm khắc hơn

1.4.2 Trưởng công an Xã, Phường

 Giám sát mọi hoạt động của các cán bộ công an trong địa bàn

 Nhận mọi báo cáo thống kê từ cấp dưới

 Có trách nhiệm báo cáo tình hình với các cấp cao hơn

1.4.3 Cán bộ phụ trách thông tin

 Ghi các đối tượng cá biệt

 Ghi các đối tượng chuyển đến

 Xóa các đối tượng chết

 Báo số lượng nhân khẩu các cấp

PHÂN TÍCH THIẾT KẾ CƠ SỞ DỮ LIỆU

Sơ đồ phân rã chức năng

Quản lý hồ sơ Tìm kiếm

Quản lý danh mục Báo cáo - thống kê

Danh mục đặc điểm cư trú

Tìm kiếm trên địa bàn

Thời gian cư trú Đặc điểm cư trú

Thông tin cá biệtThông tin hộ khẩu

2.1.2 Mô tả chức năng chính của hệ thống

 Chức năng quản lý người dùng

 Thay đổi, sửa đổi thông tin người dùng

 Tìm kiếm người dùng trong hệ thống

 Chức năng quản lý danh mục

 Danh muc quận, huyện: Thêm mới, sửa, xóa, lưu thông tin quận của quận, huyện muốn làm việc.

 Danh mục phường, xã: Thêm mới, sửa, xóa, lưu thông tin của phường, xã muốn làm việc.

 Danh mục khu phố (Thôn): Thêm mới, sửa, xóa, lưu thông tin của khu phố muốn làm việc.

 Danh mục dân tộc: Thêm mới, sửa, xóa, lưu thông tin của danh mục dân tộc.

 Danh mục tôn giáo: Thêm mới, sửa, xóa, lưu thông tin của danh mục tôn giáo.

 Danh mục nghề nghiệp: Thêm mới, sửa, xóa, lưu thông tin của danh mục nghề nghiệp.

 Danh mục trình độ: Thêm mới, sửa, xóa, lưu thông tin của danh mục trình độ.

 Danh mục quê quán: Thêm mới, sửa, xóa, lưu thông tin của danh mục quê quán.

 Dang mục đặc điểm cư trú: Thêm mới, sửa, xóa, lưu thông tin của danh mục đặc điểm cư trú.

 Chức năng quản lý hồ sơ

 Quản lý hộ khẩu: Thêm mới, sửa, xóa, lưu thông tin mã hộ khẩu, tên chủ hộ trong hồ sơ hộ khẩu.

 Quản lý nhân khẩu: Thêm mới, sửa, xóa,lưu thông tin nhân khẩu trong

 Tìm kiếm người theo các thông tin trong hồ sơ hộ khẩu như là: tên hộ khẩu và kiểu hộ khẩu.

 Tìm kiếm người theo thông tin cá nhân: họ và tên, ngày sinh, giới tính, quê quán, nghề nghiệp…

 Tìm kiếm theo thông tin địa bàn: quận, huyện, phường, xã, khu phố.

 Tìm kiếm theo thông tin hình thức cư trú: tạm trú, tạm vắng, thường trú.

 Tìm kiếm theo thông tin thời gian cư trú(đối với các công dân tạm trú) ngày đến, ngày đi.

 Chức năng báo cáo thống kê

 Báo cáo thông tin nhân khẩu trên địa bàn quản lý

 Thống kê số lượng hộ,nhân khẩu trên địa bàn

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

2.2.1 Sơ đồ luồng dữ liệu mức bối cảnh.

Người quản lý Công dân cư trú

Quản lý nhân, hộ khẩu Phiếu yêu cầu khai báo

Thông tin công Xác thực thông dân tin

Công dân thay đổi địa bàn cư trú vì một lý do nào đó (học tập, làm ăn và sinh sống) đều phải khai báo với cán bộ quản lý nhân khẩu địa bàn chuyển đến lẫn địa bàn chuyển đi Công dân chuyển đến địa bàn mới phải đăng kí với cán bộ quản lý địa bàn đó, để làm thủ tục cấp phép cư trú Cán bộ quản lý phải có trách nhiệm xác thực các thông tin mà công dân cư trú cung cấp, nếu đúng thì mới cấp phép cư trú Còn đối nếu đi làm ăn hoặc học tập, nếu chuyển khẩu sẽ được chuyển vào hồ sơ lưu trữ.

3.2.2 sơ đồ luồng dữ liệu mức đỉnh

Người quản lý Công dân cư trú

Lưu Thông tin yêu cầu

Tìm Thông tin tìm kiếm kiếm Thông tin nhận được

Công tác quản lý nhân, hộ khẩu của công an địa bàn bao gồm các chức năng:

 Chức năng quản lý người dùng: quản lý thông tin của cán bộ phụ trách địa bàn mình quản lý: Thêm mới, sửa đổi, xóa bỏ, tìm kiếm.

 Chức năng quản lý danh mục: quản lý các danh mục địa bàn: Quận, huyện, phường, xã, khu phố Quản lý các danh mục thông tin cá nhân: dân tộc, tôn giáo, trình độ, đặc điểm cư trú, nghề nghiệp.

 Chức năng quản lý hồ sơ: với hai chức năng chính là quản lý hồ sơ hộ khẩu và hồ sơ nhân khẩu. trú

 Chức năng báo cáo thống kê: báo cáo thông tin nhân hộ khẩu, các đối tượng tạm vắng, đối tượng tạm trú, đối tượng tiền án tiền sự Thống kê số lượng hộ khẩu, số lượng nhân khẩu, số nam, số nữ, số nhân khẩu tạm vắng, số nhân khẩu tạm trú.

2.2.2.1 sơ đồ luồng dữ liệu chức năng quản lý người dùng

Hồ sơ người quản lý

Hiển thị Thông tin hiển thị

Thông tin người quản lý

Cán bộ mới về địa bàn nhận công tác, gặp người quản trị hệ thống đăng ký sử dụng chương trình Người quản trị sẽ lưu các thông tin người dùng trong hệ thống, người sử dụng sẽ được cung cấp quyền đăng nhập hệ thống với tên đăng nhập và password. Người quản trị có quyền sửa đổi hoặc xóa cán bộ sử dụng hệ thống nếu cán bộ đó có sự thay đổi về chức vụ hoặc chuyển nơi công tác.

Người quản lý Hồ sơ danh mục

In Thông tin lưu trữ

2.2.2.2.1 Sơ đồ luồng dữ liệu chức năng quản lý danh mục quận, huyện

Người quản lý Danh mục quận huyện

2.2.2.2.2.Sơ đồ luồng dữ liệu chức năng quản lý danh mục phường, xã

Người quản lý Danh mục phường xã

2.2.2.2.3.Sơ đồ luồng dữ liệu chức năng quản lý danh mục khu phố (Thôn)

Người quản lý Danh mục khu phố

2.2.2.2.4 Sơ đồ luồng dữ liệu chức năng quản lý danh mục dân tộc

Người quản lý Danh mục dân tộc

2.2.2.2.5 Sơ đồ luồng dữ liệu chức năng quản lý danh mục tôn giáo

Người quản lý Danh mục tôn giáo

2.2.2.2.6 Sơ đồ luồng dữ liệu chức năng quản lý danh mục nghề nghiệp

Người quản lý Danh mục nghề nghiệp

2.2.2.2.7 Sơ đồ luồng dữ liệu chức năng quản lý danh mục trình độ

Người quản lý Danh mục trình độ

2.2.2.2.8 Sơ đồ luồng dữ liệu chức năng quản lý danh mục quê quán

Người quản lý Danh mục quê quán

2.2.2.2.9 Sơ đồ luồng dữ liệu chức năng quản lý danh mục đặc điểm cư trú

Người quản lý Danh mục đặc điểm cư trú

2.2.2.3 Sơ đồ luồng dữ liệu chức năng quản lý hồ sơ

Hồ sơ nhân hộ khẩu

Hai chức năng chính trong quản lý hồ sơ là:

Quản lý hồ sơ hộ khẩu

Quản lý hồ sơ nhân khẩu

2.2.2.3.1 Sơ đồ luồng dữ liệu chức năng quản lý hồ sơ hộ khẩu

Khi một hoặc một nhóm công dân đến cư trú tại địa bàn phải trình báo với công an quản lý tại địa bàn đó Công an tại địa bàn sẽ tạo hồ sơ hộ khẩu cho một hoặc một nhóm công dân đó với một người đứng ra làm chủ hộ Nếu công hộ khẩu đó chuyển đi hoặc có sự thay đổi về chủ hộ, thì cán bộ quản lý có thể thực hiện chức năng xóa bỏ hoặc sửa đổi thông tin của chủ hộ đó.

2.2.2.3.2 Sơ đồ luồng dữ liệu chức năng quản lý hồ sơ nhân khẩu

Một công dân chuyển đến địa mới sẽ được cán bộ quản lý tạo lập hồ sơ nhân khẩu trong hộ khẩu mà công dân đó chuyển đến Nếu chuyển đi cán bộ quản lý thực hiện xóa bỏ và có thay đổi thông tin cho những đối tượng cá biệt đang được theo dõi trên địa bàn.

2.2.2.4 Sơ đồ luồng dữ liệu chức năng tìm kiếm

Tìm kiếm theo địa bàn

Tìm kiếm theo đặc điểm cư trú

Tìm theo thông tin cá nhân

Thông tin tạm trú tạm vắng Địa bàn cư trú

Khi cán bộ cần thông tin về nhân khẩu nào đó trên địa bàn quản lý, có thể tìm kiếm theo các cách sau:

Tìm kiếm theo tên chủ hộ mà nhân khẩu đó đăng ký.

Tìm kiếm theo thông tin cá nhân: họ tên, ngày sinh, giới tính….

Tìm theo thời gian cư trú tại địa bàn.

Tìm tổng hợp trên địa bàn.

Công tác quản lý nhân, hộ khẩu phải luôn chính xác Vì vậy cán bộ quản lý phải thực hiện báo cáo – thống kê thường xuyên về nhân, hộ khẩu trên địa bàn mình quản lý, đảm bảo an ninh trật tự nơi cư trú.

Người quản lý Hồ sơ nhân,hộ khẩu

Thông tin yêu cầu Thông tin nhận được

Thông tin nhận đượcThông tin yêu cầu

Diễn tả và quản lý dữ liệu

Từ các thông tin mà nhà quản lý cần, nếu dùng tên một cách chính xác theo như thực tế thì việc quản lý cơ sở dữ liệu của chúng ta sẽ gặp khó khăn Vì vậy để đơn giản hóa, chúng ta sẽ mã hóa các tên gọi để tiện cho công tác quản lý cơ sở dữ liệu.

Thông tin về người dùng

 Danh mục đăc điểm cư trú

 Mã đặc điểm cư trú – CuTruID

 Tên kiểu cư trú - CuTru

Thông tin về hồ sơ

 Thông tin về hộ khẩu cần quản lý.

 Số chứng minh thư nhân dân - SoCMND

 Nơi cấp chứng minh thư - NoiCap

 Ngày cấp chứng minh thư nhân dân - NgayCap

 Quan hệ với chủ hộ - QuanHe

Thiết kế các bảng dữ liệu

Tên Kiểu dữ liệu Mô tả Ghi chú

QuanHuyenID Nvarchar(50) Mã quận, huyện Khoá chínhQuanHuyen Nvarchar(50) Tên quận, huyện

PhuongXaID Nvarchar(50) Mã phường, xã Khóa chính PhuongXa Nvarchar(50) Tên phường, xã

QuanHuyenID Nvarchar(50) Mã quận, huyện Khoá ngoại

KhuPhoID Nvarchar(50) Mã khu phố Khóa chính

KhuPho Nvarchar(50) Tên khu phố

PhuongXaID Nvarchar(50) Mã phường, xã Khóa ngoại QuanHuyenID Nvarchar(50) Mã quận, huyện Khoá ngoại

NgheNghiepID Nvarchar(50) Mã nghề nghiệp Khóa chính NgheNghiep Nvarchar(50) Tên nghề nghiệp

TenCH,KieuHK,PhuongXaID,KhuPhoID,QuanHuyenID)

HoKhauID Nvarchar(50) Mã hộ khẩu Khóa chính

TenCH Nvarchar(50) Tên chủ hộ

KieuHK Nvarchar(50) Kiểu hộ khẩu

KhuPhoID Nvarchar(50) Mã khu phố Khóa ngoại

PhuongXaID Nvarchar(50) Mã phường, xã Khoá ngoại QuanHuyenID Nvarchar(50) Mã quận, huyện Khóa ngoại

TonGiaoID Nvarchar(50) Mã tôn giáo Khóa chính

TonGiao Nvarchar(50) Tên tôn giáo

TrinhDoID Nvarchar(50) Mã trình độ Khóa chính

TrinhDo Nvarchar(50) Tên trình độ

DanTocID Nvarchar(50) Mã dân tộc Khóa chính

DanToc Nvarchar(50) Tên dân tộc

 NhanKhau(NhanKhauID,HoTen,BiDanh,NSinh,GioiTinh,SoCMND,N oiCap,NgayCap,QueQuanID,NoiHT,NoiDKHK,NgheNghiepID,NgayD en,NoiTruocDen,NgayDi,NoiDen,LyDo,TonGiaoID,TrinhDoID,DanTo cID,CuTruID,QuanHe,Ghihu,ChuHoID,Anh,MaCB)

NhanKhauID Nvarchar (50) Mã nhân khẩu Khóa chính

HoTen Nvarchar (50) Họ và tên

NoiCap Nvarchar(50) Nơi cấp CMND

QueQuanID Nvarchar (50) Mã quê quán

NoiDKHK Nvarchar(50) Nơi đăng kí hộ khẩu

NgheNghiepID Nvarchar(50) Mã nghề nghiệp Khóa ngoại

NgayDen Datetime Ngày đến cư trú

NoiTruocDen Nvarchar(50) Nơi trước đến

TonGiaoID Nvarchar(50) Mã tôn giáo Khoá ngoại

TrinhDoID Nvarchar (50) Mã trình độ Khoá ngoại

QuanHe Nvarchar(50) Quan hệ với chủ hộ

ChuHoID Nvarchar(50) Mã chủ hộ Khoá ngoại

Anh Ntext ảnh nhân khẩu

NoiHT Nvarchar(50) Nơi ở hiện tại

LyDo Nvarchar(50) Lý do chuyển đi hoặc đến

MaCB Nvarchar Mã cán bộ Khóa ngoại

 CanBo(MaCB,TenCB,ChucVu,DienThoai)

MaCB Nvarchar Mã cán bộ Khóa chính

TenCB Nvarchar Tên cán bộ

DienThoai Numberic Số điện thoại

MaDN Nvarchar Mã đăng nhập Khóa chính

TenDN Nvarchar Tên đăng nhập

MaCB Nvarchar Mã cán bộ Khóa ngoại

Sơ đồ thực thể liên kết

3.1 Tổng quan về Microsoft NET

Trong thế giới điện toán, những cải tiến và thay đổi vẫn thường xuyên xảy ra Đây là những biến đổi tất yếu và có tác động thúc đẩy sự phát triển một thách thức đối với bất kì nhà lập trình nào hay những công việc truyền thông về Công Nghệ Thông Tin nào là theo kịp những biến đổi liên tục và những sự phát triển công nghệ.

Như một nhà quản lí doanh nghiệp hay người đưa ra các quyết định, sự am hiểu về công nghệ và tác động của nó đối với công việc kinh doanh nhiều lúc là cho bạn cảm thấy nản lòng Tuy nhiên, những thay đổi thường xuyên nhất trong công nghệ luôn đem lại cho bạn thành quả tốt nhất Ngày nay, do Công Nghệ Thông Tin liên tục phát triển, cho nên những nền tảng của công nghệ đó có thể thay đổi để điều tiết những sự phát triển mới và những nhu cầu mới trên thị trường Thậm trí một vài năm trở lại đây, chỉ có một số ít người biết đến Internet Ngày nay, Internet đã thâm nhập hầu như mọi nơi mọi chỗ trong cuộc sống của chúng ta.

Sự khởi xướng của ý tưởng NET là một bước đột phá mới của Microsoft Nó bao hàm nhiều quan niệm hiện hữu và những triết lý Microsoft đưa ra công nghệ mà nó cho phép ý tưởng NET trở thành hiện thực.

3.1.1 Định nghĩa NET Để bắt đầu công việc khảo sát NET, chúng ta phải xác định rõ ranh giới công việc cần thực hiện vì NET có nghĩa một nền tảng hơn là một sản phẩm đơn lẻ, cho nên cách định nghĩa nó có thể đa dạng, có phần hơi khó hiểu và mơ hồ một cách đơn giản NET được định nghĩa dưới dạng một khung ứng dụng (application framework) .NET cung cấp một khung cho những ứng dụng nào được xây dựng, nó xác định những ứng dụng truy nhập các hàm như thế nào qua các hệ thống và các mạng .NET cung cấp một nền tảng mà trên đó các giải pháp và dịch vụ Web có thể được xây dựng, một nền tảng giải phóng những sự ràng buộc và tự bản thân nó giải phóng khỏi Microsoft Windows (về

TỔNG QUAN VỀ NGÔN NGỮ LẬP TRÌNH

Tổng quan về Microsoft NET

Trong thế giới điện toán, những cải tiến và thay đổi vẫn thường xuyên xảy ra Đây là những biến đổi tất yếu và có tác động thúc đẩy sự phát triển một thách thức đối với bất kì nhà lập trình nào hay những công việc truyền thông về Công Nghệ Thông Tin nào là theo kịp những biến đổi liên tục và những sự phát triển công nghệ.

Như một nhà quản lí doanh nghiệp hay người đưa ra các quyết định, sự am hiểu về công nghệ và tác động của nó đối với công việc kinh doanh nhiều lúc là cho bạn cảm thấy nản lòng Tuy nhiên, những thay đổi thường xuyên nhất trong công nghệ luôn đem lại cho bạn thành quả tốt nhất Ngày nay, do Công Nghệ Thông Tin liên tục phát triển, cho nên những nền tảng của công nghệ đó có thể thay đổi để điều tiết những sự phát triển mới và những nhu cầu mới trên thị trường Thậm trí một vài năm trở lại đây, chỉ có một số ít người biết đến Internet Ngày nay, Internet đã thâm nhập hầu như mọi nơi mọi chỗ trong cuộc sống của chúng ta.

Sự khởi xướng của ý tưởng NET là một bước đột phá mới của Microsoft Nó bao hàm nhiều quan niệm hiện hữu và những triết lý Microsoft đưa ra công nghệ mà nó cho phép ý tưởng NET trở thành hiện thực.

3.1.1 Định nghĩa NET Để bắt đầu công việc khảo sát NET, chúng ta phải xác định rõ ranh giới công việc cần thực hiện vì NET có nghĩa một nền tảng hơn là một sản phẩm đơn lẻ, cho nên cách định nghĩa nó có thể đa dạng, có phần hơi khó hiểu và mơ hồ một cách đơn giản NET được định nghĩa dưới dạng một khung ứng dụng (application framework) .NET cung cấp một khung cho những ứng dụng nào được xây dựng, nó xác định những ứng dụng truy nhập các hàm như thế nào qua các hệ thống và các mạng .NET cung cấp một nền tảng mà trên đó các giải pháp và dịch vụ Web có thể được xây dựng, một nền tảng giải phóng những sự ràng buộc và tự bản thân nó giải phóng khỏi Microsoft Windows (về động không phụ thuộc vào một nền tảng (platform) nào Đây là một cách để tạo ra các trao đổi thông tin (truyền thông) giữa những hệ thống đa dạng và các ứng dụng cũng như tích hợp nhiều thiết bị vào trong vệc trao đổi thông tin này. Ý tưởng NET được thiết kế để hỗ trợ chúng ta tiến tới một Web thân thiện hơn, tích hợp tốt hơn, một nơi mà ở đó các ứng dụng và các quá trình giao dịch có thể tương tác với nhau một cách tự do không phụ thuộc vào chương trình và nền tảng Tóm lại, NET làm cho thông tin trên Web có thể được tiếp cận một cách dễ dàng: bạn có thể sử dụng bất kì nền tảng nào .NET còn có thể hỗ trợ các hệ thống máy phục vụ và ứng dụng liên lạc với nhau một cách thông suốt và xây dựng hệ thống tính toán phân tán trên Web, làm cho Web trở thành một nơi tương tác năng động hơn giữa các dịch vụ Web, các ứng dụng và khách hàng

3.1.2 Tác động của NET đối với chuyên gia CNTT

Những nhà phát triển cảm thấy có một tác động mạnh mẽ từ ý tưởng NET Để hiểu tác động này, đầu tiên chúng ta phải biết công việc phát triển ứng dụng đã thay đổi như thế nào Trước đây các nhà phát triển xây dựng ứng dụng trên các dịch vụ hệ thống cục bộ. Một ứng dụng riêng biệt được xây dựng để chạy trên các dịch vụ được cung cấp bởi một hệ điều hành riêng biệt Trong hệ thống này những nhà phát triển đã có kiểm soát một cách cụ thể ứng dụng hoạt động như thế nào trên nền tảng đó Những ứng dụng cho những nền tảng riêng biệt thì không liên lạc(truyền thông tốt) tốt được với nhau. Giai đoạn thứ hai của sự thay đổi xuất hiện có nghĩa các nhà phát triển phải chuyển sang một mức độ khác, gọi là mức thứ n (n-tier) Điều đó cho phép các nhà phát triển tạo ra các ứng dụng mà nó hoạt động trên một mức mạng Nói cách khác, sự phát triển xuất hiện liên tục từ các dịch vụ hệ thống cục bộ cho đến các dịch vụ mạng toàn cầu.

Sự phát triển này đã tạo ra khả năng phát triển các phần mềm doanh nghiệp mà thực chất tập chung hơn vào công việc kinh doanh mà nó tạo ra năng suất làm việc cao hơn.Chúng ta hiện đang ở vào giai đoạn tiếp theo của công cuộc thay đổi thông qua XML một sự thay đổi cơ bản theo cách các ứng dụng đã được mô tả trước đây khi mà chúng ta nghĩ về những ứng dụng như một sản phẩm một dịch vụ Web hoàn tất nột vài kiểu giao dịch và trao đổi thông tin Khi xây dựng trên XML, các dịch vụ Web có thể sử dụng bởi bất kỳ người nào với bất lỳ thiết bị đơn lẻ nào tại bất kỳ thời điểm đã cho nào. Đặc tính này cho phép bất cứ số lượng tiến trình chuyên biệt nào xuất hiện liên tục trên Internet không có sự can thiệp của người dùng.

Quy trình dịch vụ Web được hoàn thành bởi việc sử dụng cả hai đặc tính chương trình ghép nối lỏng và ghép nối chặt Qui trình nghiệp vụ của việc tính toán n-tier (ghép nối chặt) được kết hợp với các chuẩn truyền thông điệp ghép nối lỏng và các phương pháp truy nhập dữ liệu trên Internet Do ý tưởng NET được tìm thấy trên cơ sở của XML và khái niệm dịch vụ Web, các nhà phát triển có một cách mới để tạo ra các ứng dụng mà nó hoạt động và tích hợp dễ dàng hơn Sự thách thức của các nhà phát triển là tích hợp nhứng khái niệm đó với cái mà nền tảng NET được xây dựng trên nó.

3.1.2 Tác động của NET đối với con người.

Nền tảng NET có thể có tác động sâu sắc đến kinh nghiệm người dùng (theo hướng tích cực) Trước khi khảo sát khả nǎng này, chúng ta hãy xem xét mô hình tính toán hiện thời Hiện tại, việc tính toán người dùng chủ yếu là nằm ở phần cứng và hệ điều hành Những người dùng sở hữu những thiết bị phần cứng như PC, laptop hay PDA và họ cài đặt phần mềm và cấu hình các hệ thống đó Dữ liệu chủ yếu được quản lý và thao tác (và cả dữ liệu đã mất) cũng trên các hệ thống đó Do sự tǎng trưởng của công nghệ, số lượng PC tại gia và vǎn phòng ngày càng tǎng lên nhanh chóng Có ai đã từng nghĩ rằng một người dùng có thể cần đến 13 Gbyte ổ cứng? Mô hình tính toán hiện thời gây ra nhiều vấn đề do số lượng người sử dụng máy tính của họ ngày càng nhiều Người dùng phải chú ý đến dữ liệu và thiết bị của chính họ và Internet được coi không gì hơn là một thứ đồ chơi tô vẽ.

3.1.3 Cơ sở hạ tầng NET. này chắc chắn không phải là một nhiệm vụ dễ dàng Để nó có thể làm việc được, chiến lược NET phải cung cấp một cơ sở hạ tầng mà trên đó các dịch vụ web có thể được xây dựng May thay, NET đã cung cấp cơ sở hạ tầng này để giải phóng các nhà lập trình tập trung hơn vào việc xử lí các tác vụ kinh doanh hơn là chú trọng đến việc lập trình bản thân nó Tại mức cơ sở hạ tầng NET xem những thành phần chương trình như những dich vụ web, nó lấy ra những đặc tính tốt nhất của COM của Microsoft và trộn lẫn chúng với ý tưởng truyền thông điệp ghép nối lỏng Do những đặc tính này mà cơ sở hạ tầng tồn tại cho người lập trình và như vậy họ có thể tập trung vào công việc xử lý các tác vụ kinh doanh cần sự phát triển mà không cấn phải tao ra các thành phần riêng biệt hoạt động với nhau Cơ sở hạ tầng NET tạo ra framework trên đó các dịch vụ web được xây dựng Ba thành phần cho NET framework là.

3.1.4.1 Thực thi ngôn ngữ chung CLR(Common Language Runtime)

Tất cả các ngôn ngữ lập trình đều có một runtime(thi hành), một dịch vụ hoạt động cùng với ngôn ngữ lập trình Common Language Runtime là một thành phần cốt lõi(cơ bản nhất) của NET Nó cung cấp nền cơ sở mà trên đó các ứng dụng cho NET được xây dựng CLR quản lí nhiều khía cạnh của chu trình phát triển Chẳng hạn, khi làm việc với COM, các nhà phát triển phải lưu tâm đến vấn đề quản lí bộ nhớ, những sự khởi tạo luồng và loại bỏ nó, các thành phần bảo mật và những vấn đề tương tự. Điều đó gây ra một số khó khăn do các nhà phát triển phải tiêu tốn quá nhiều thời gian vào các vấn đề nảy sinh đó một cách tự động và giải phóng cho các nhà phát triển tập trung vào việc xử lý giao dịch logic CLR cung cấp một runtime chung mà nó được sử dụng với tất cả các ngôn ngữ Thành phần này làm cho NET có một khả năng “hỗ trợ mọi ngôn ngữ”.

3.1.4.2 Các thành phần hợp nhất(Unified Programming Classes).

Những thư viện lớp lập trình hay các giao diện lập trình ứng dụng (API) được sử dụng bởi nhiều ngôn ngữ khác nhau Để sử dụng những ngôn ngữ lập trình khác nhau, các nhà phát triển nghiên cứu các bộ thư viện lớp khác nhau để lamg việc với các ngôn ngữ lập trình khác nhau Vấn đề này đã làm chậm quá trình phát triển ứng dụng và làm cho công việc phát triển trở nên tẻ ngắt và lãng phí nhiều thời gian .NET cung cấp các lớp lập trinhg hợp nhất với một bộ API dùng chung cho mọi ngôn ngữ lập trình Các ngôn ngữ có thể tương tác với một ngôn ngữ khác và các lớp lập trình hợp nhất này cho phép các nhà phát triển lựa chọn bất cứ ngôn ngữ nào mà họ muốn trong khi chỉ cần duy nhất một bộ API mà thôi.

3.2 Các công cụ phát triển.

.NET Framework và Visual Studio NET là các công cụ cho những người phát triển để tạo ra các dịch vụ Web XML .NET Framework là một tập hợp những giao diện lập trình và là tâm điểm của nền tảng NET của Microsoft Nó cung cấp cơ sở hạ tầng để xây dựng và chạy các dịch vụ Web.

Visual Studio Net cung cấp một môi trường phát triển mức cao để xây dựng các ứng dụng trên NET framework Với bộ Visual Studio NET chúng ta có thể đơn giản hóa việc tạo, triển khai và tiếp tục phát triển các ứng dụng Web và các dịch vụ Web có sẵn một cách an toàn, bảo mật và khả năng biến đổi được Visual Studio NET là một bộ đa ngôn ngữ các công cụ lập trình Ngoài C#(Visual C#.NET), Visual Studio NET còn hỗ trợ Visual Basic, Visual C++, Visual J#.NET và các ngôn ngữ script như VBScript và Jscript Tất cả các ngôn ngữ này đều cho phép truy cập vào NET Framework.

 Visual C#.NET là một ngôn ngữ lập trình đơn giản, hiện đại, hướng đối tượng an toàn kiểu (type-safe) và có nguồn gốc từ các ngôn ngữ C và C++ C# là một ngôn ngữ rất thân thiện với người lập trình C và C++ C# là kết quả của việc kết hợp hiệu năng dựng Web và đòi hỏi quyền được cung cấp một môi trường đồng bộ với HTML, XML và SOAP Tóm lại C# là một ngôn ngữ lập trình hiện đại và là một môi trường phát triển đầy tiềm năng để tạo ra các dịch vụ Web XML, các ứng dụng dựa trên Microsoft NET và cho cả nền tảng Microsoft Windows cũng như tạo ra các ứng dụng Internet thế hệ kế tiếp một cách nhanh chóng và hiệu quả.

 Visual Basic NET (VB.NET) cho phép bạn tạo ra những ứng dụng đầy sức mạnh cho nền tảng Microsoft Windows với thời gian ngắn nhất, kết hợp chặt chẽ việc truy cập cơ sở dữ liệu từ một phạm vi rộng của các kịch bản dữ liệu, tạo ra những thành phần với mã nhỏ nhất và xây dựng các ứng dụng trên cơ sở Web khi sử dụng những kỹ năng hiện tại.VB.NET có nhiều đặc tính ngôn ngữ mới và được cải tiến như sự kế thừa, giao diện và overloading và là cho nó trở thành một ngôn ngữ lập trình hướng đối tượng đầy tiềm năng Ngoài ra, những người phát triển Visual Basic bây giờ có thể tạo đa luồng(multithreaded) Các nhà phát triển cũng sẽ tìm thấy nhiều đặc tính mới và được cải tiến, ví dụ như các giao diện, những thành viên dùng chung, các constructor cùng với một số kiểu dữ liệu mới, xử lý ngoại lệ có cấu trúc và ủy quyền.

SQL Server 2000

SQL Server 2000 là một hệ thống quản lý cơ sở dữ liệu(Relational Database

Management System (RDBMS)) sử dụng Transact_SQL để trao đổi dữ liệu giữa Client computer và SQL Server computer Một RDBMS bao gồm databases, databáe engine và các ứng dụng dùng quản lý dữ liệu và các bộ phận khác nhau trong

RDBMS. lớn(Very Large Database Environment) lên đến Tera-Byte và có thể phục vụ cùng lúc cho hàng ngàn user SQL Server 2000 có thể kết hợp “ăn ý” với các server khác như Microsoft Internet Information Server (IIS), E-Commerce Server, Proxy Server… SQL Server có 7 editions:

 Enterprise: chứa đầy đủ các đặc trưng của SQL Server và có thể chạy tốt trên hệ thống lên đến 32 CPUs và 64 GB RAM Thêm vào đó nó có các dịch vụ giúp cho việc phân tích dữ liệu rất hiệu quả(Analysis Services).

 Standard: Rất thích hợp cho các công ty vừa và nhỏ vì giá thành rẻ hơn nhiều so với Enterprise Edition, nhưng nó lại bị giới hạn một số chức năng cao cấp khác, edition này có thể chạy tốt trên hệ thống lên đến 4 CPU và 2 GB RAM.

 Personal: Được tối ưu hóa để chạy trên PC nên có thể cài đặt trên hầu hết các phiên bản windows kể cả window 98.

 Developer: Có đầy đủ các tính năng của Enterprise Edition nhưng được chế tạo đặc biệt như giới hạn số lượng người kết nối vào Server cùng một lúc….

 Deskop Engine(MSDE): Đây chỉ là một engine chạy trên desktop và không có user interface(giao diện) Thích hợp cho việc triển khai ứng dụng ở máy client Kích thước database bị giới hạn khoảng 2 GB.

 Win CE: Dùng cho các ứng dụng chạy trên Windowns CE

 Trial: Có các tính năng của Enterprise Edition, download free, nhưng giới hạn thời gian sử dụng.

3.3.2 Các thành phần quan trọng trong SQL Server 2000.

SQL Server 2000 được cấu tạo bởi nhiều thành phần như Relational Database

Engine, Analysis Server và English Query… Các thành phần này khi phối hợp với nhau tạo thành một giải pháp hoàn chỉnh giúp cho việc lưu trữ và phân tích dữ liệu một cách dễ dàng.

 Relational Database Engine- Cái lõi của SQL Server: Đây là một engne có khả năng chứa data ở các quy mô khác nhau dưới dạng table và support tất cả các kiểu kết nối(data connection) thông dụng của Microsoft như

ActiveX Data Object(ADO), OLE DB and Open Database Connectivity (ODBC) Ngoài ra nó còn có khả năng tự điều chỉnh (tune up) ví dụ như sử dụng thêm các tài nguyên của máy khi cần và trả lại tài nguyên cho hệ điều hành khi một user log off. Replication – cơ chế tạo bản sao(Replica):

Giả sử bạn có một database dùng để chứa dữ liệu được các ứng dụng thường xuyên cập nhật một ngày bạn muốn có một cái database giống y hệt như thế trên server khác để chạy báo cáo (report database) Vấn đề là report server của bạn cũng cần phải được cập nhật thường xuyên để đảm bảo tính chính xác của các báo cáo Bạn không thể dùng cơ chế back up and restore trong trường hợp này Lúc đó cơ chế replication của SQL Server sẽ được sử dụng để đảm bảo cho dữ liệu ở 2 database được đồng bộ.

 Data Tranformation Service (DTS) – Một dịch vụ chuyển dịch data vô cùng hiệu quả.

Nếu bạn làm việc trong một công ty lớn trong đó data được chứa trong nhiều nơi khác nhau và ở các dạng khác nhau cụ thể như chứa trong Oracle, DB2(của IBM), SQL server, Microsoft Access… DTS không chỉ hỗ trợ bạn di chuyển database mà còn hỗ cả định dạng (format) database.

 Analysis Server – Dịch vụ phân tích dữ liệu.

 SQL Server Tools - Đây là một bộ đồ nghề của người quản trị cơ sở dữ liệu(DBA).

GIỚI THIỆU CHƯƠNG TRÌNH

Điều kiện và phần mềm ứng dụng đi kèm để sử dụng

Để chương trình có thể chạy được khi cài vào máy mới cần cài đặt một số phần mềm sau:

Các lớp chính của chương trình

4.2.1 Lớp kết nối cơ sở dữ liệu

Thực hiện chức năng kết nối tới cơ sở dữ liệu

Dim LcTen_May As String

Dim LcTen_Csdl As String

' tao thuoc tinh de lay gia tri ten server

Public Property McTen_May() As String

Set(ByVal value As String)

Public Property McTen_CSDL() As String

Public Function McKet_Noi_Data() As SqlClient.SqlConnection

Dim LcCn As New SqlClient.SqlConnection

Dim LcStr_Conn As String = "Data source=" & Me.McTen_May & "; " &

"Initial catalog=" & Me.McTen_CSDL & ";" & "password=sa;" & "user id=sa;" LcCn = New SqlClient.SqlConnection(LcStr_Conn)

4.2.2 Lớp lựa chọn giá trị

Thực hiện bắt cờ trong các trường hợp thêm, sửa, xóa

Set(ByVal value) source = value

Set(ByVal value) data = value

4.2.3 Lớp formmain của chương trình

Thực hiện các thao tác chính của chương trình

Private px As New frmphuongxa

Private DataConnect As New Connection

Public nodeQh, nodePxa, nodeKPho As TreeNode

Public rowQh, rowPxa, rowKpho As DataRow

Private Sub menuitthoat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemcaidat.Click

Private Sub menuitpx_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) frmphuongxa.ShowDialog()

Private Sub frmmain_Load(ByVal sender As System.Object, ByVal e As

System.EventArgs) Handles MyBase.Load

Private Sub menuitnghenghiep_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitnghenghiep.Click frmnghenghiep.ShowDialog()

Private Sub menuittongiao_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuittongiao.Click frmtongiao.ShowDialog()

Private Sub menuitquequan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitquequan.Click frmquequan.ShowDialog()

Private Sub menuittrinhdo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuittrinhdo.Click frmtrinhdo.ShowDialog()

Private Sub khuphoMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles khuphoMenuItem.Click

Dim frmkp As New frmkhupho

'frmkp.MdiParent = Me frmkp.ShowDialog()

Private Sub menuitemhk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemhk.Click frmchuho.ShowDialog()

Private Sub menuitemnk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemnk.Click frmnhankhau.ShowDialog()

Private Sub btn1_Click(ByVal sender As System.Object, ByVal e As

Private Sub butnhankhau_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) frmnhankhau.ShowDialog()

Private Sub menuitemthaydoi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemthaydoi.Click frmdoimatkhau.ShowDialog()

Private Sub menuitemtg_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemtg.Click frmtacgia.ShowDialog()

Private Sub menuitemkhaibao_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemkhaibao.Click frmkhaibaonguoidung.ShowDialog()

Private Sub menuitemxaclap_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemxaclap.Click frmxaclapdv.ShowDialog()

Private Sub menuthongtindv_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuthongtindv.Click frmthongtindonvi.ShowDialog()

Private Sub TheoĐịaBànToolStripMenuItem_Click(ByVal sender As

System.Object, ByVal e As System.EventArgs) Handles

Private Sub Label4_Click(ByVal sender As System.Object, ByVal e As

Private Sub TToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e

As System.EventArgs) Handles TToolStripMenuItem.Click

Private Sub menuitemddcutru_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) frmdacdiemcutru.ShowDialog()

Private Sub menuitempx_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) frmphuongxa.ShowDialog()

Private Sub menuitemqh_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemqh.Click frmquanhuyen.ShowDialog()

Private Sub menuitempx_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitempx.Click frmphuongxa.ShowDialog()

Private Sub menuitemngaydendi_Click(ByVal sender As System.Object, ByVal e

As System.EventArgs) Handles menuitemngaydendi.Click

Private Sub menuitemcutru_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemcutru.Click frmtimkiemcutru.ShowDialog()

Private Sub menuitemtkho_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemtkho.Click frmtimkiemchuho.ShowDialog()

Private Sub menuitemthoat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemthoat.Click

Private Sub TổngHợpToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TổngHợpToolStripMenuItem.Click frmbaocaonhankhau.ShowDialog()

Private Sub TreeViewmain_AfterSelect(ByVal sender As System.Object, ByVal e

As System.Windows.Forms.TreeViewEventArgs) Handles

Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click

Private Sub menuitemkhac_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuitemkhac.Click frmdacdiemcutru.ShowDialog()

Private Sub NhâToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NhâToolStripMenuItem.Click frmthongkenhankhau.ShowDialog()

Private Sub NhânKhẩuTạmVắngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

Private Sub NhânKhẩuTạmTrúToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

Private Sub InTạmTrúTạmVắngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

Private Sub InBáoCáoNhânKhẩuToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click frmquanhuyen.ShowDialog()

Private Sub ToolStripButton3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton3.Click frmphuongxa.ShowDialog()

Private Sub ToolStripButton4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton4.Click frmkhupho.ShowDialog()

Private Sub ToolStripButton5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton5.Click frmdantoc.ShowDialog()

Private Sub ToolStripButton6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton6.Click frmquequan.ShowDialog()

System.EventArgs) Handles ToolStripButton8.Click frmtongiao.ShowDialog()

Private Sub ToolStripButton9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton9.Click frmtrinhdo.ShowDialog()

Private Sub ToolStripButton10_Click(ByVal sender As System.Object, ByVal e

As System.EventArgs) Handles ToolStripButton10.Click frmnghenghiep.ShowDialog()

As System.EventArgs) Handles ToolStripButton11.Click frmdacdiemcutru.ShowDialog()

As System.EventArgs) Handles ToolStripButton12.Click frmchuho.ShowDialog ()

As System.EventArgs) Handles ToolStripButton13.Click frmnhankhau.ShowDialog()

 Tìm theo thông tin hộ khẩu

Private Sub btntim_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs) Handles btntim.Click

Dim LcCn As SqlConnection = DataConnect.McKet_Noi_Data

Dim strsql As String = "select HoTen from NhanKhau where ChuHoID ='" & Me.cbomach.Text & "'"

Dim da As SqlDataAdapter = New SqlDataAdapter(strsql, LcCn)

Dim ds As New DataSet da.Fill(ds, "NhanKhau")

Dim datable As DataTable = ds.Tables(0)

For Each r In datable.Rows

 Tìm theo thông tin cá nhân

Private Sub btntim_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs) Handles btntim.Click

If checkht.Checked = True Then

MessageBox.Show("Bạn chưa nhập tên để tìm kiếm", "Thông báo", MessageBoxButtons.OK)

MessageBox.Show("Bạn chưa nhập tiêu chí tìm kiếm", "Thông báo", MessageBoxButtons.OK)

If Checksocmnd.Checked = True And checkht.Checked = False And

Checkgioitinh.Checked = False And CheckBoxnamsinh.Checked = False Then

MessageBox.Show("Bạn chưa nhập số CMND muốn tìm", "Thông báo", MessageBoxButtons.OK)

If CheckBoxnamsinh.Checked = True Then

MessageBox.Show("Bạn chưa nhập năm sinh muốn tìm", "Thông báo", MessageBoxButtons.OK)

If Checksocmnd.Checked = True And checkht.Checked = True And

Checkgioitinh.Checked = True And CheckBoxnamsinh.Checked = False Then

If txthoten.Text = "" Or txtgioitinh.Text = "" Or txtsocmnd.Text = "" Then MessageBox.Show("Bạn chưa nhập đủ thông tin để tìm kiếm", "Thông listview_SearchAll()

 Tìm theo đặc điểm cư trú

If (Me.cbocutru.Text = "") Then

MessageBox.Show("Bạn chưa chọn tiêu chí để tìm kiếm", "Thông báo", MessageBoxButtons.OK)

Dim strsql As String = "select * from NhanKhau where CuTruID='" &

Dim mycmd As SqlCommand = New SqlCommand(strsql, LcCn)

Dim myread As SqlDataReader = mycmd.ExecuteReader

Dim Col_List As New ListViewItem(myread.Item("NhanKhauID").ToString) Col_List.SubItems.Add(myread.Item("HoTen").ToString)

Col_List.SubItems.Add(myread.Item("BiDanh").ToString)

Col_List.SubItems.Add(myread.Item("NSinh").ToString)

Col_List.SubItems.Add(myread.Item("GioiTinh").ToString)

Col_List.SubItems.Add(myread.Item("SoCMND").ToString)

Col_List.SubItems.Add(myread.Item("NgayCap").ToString)

Col_List.SubItems.Add(myread.Item("NoiCap").ToString)

Col_List.SubItems.Add(myread.Item("QueQuanID").ToString)

Col_List.SubItems.Add(myread.Item("NoiDKHK").ToString)

Col_List.SubItems.Add(myread.Item("NoiLV").ToString)

Col_List.SubItems.Add(myread.Item("NgayDen").ToString)

Col_List.SubItems.Add(myread.Item("NoiTruocDen").ToString)

Col_List.SubItems.Add(myread.Item("NgayDi").ToString)

Col_List.SubItems.Add(myread.Item("NoiDen").ToString)

Col_List.SubItems.Add(myread.Item("TonGiaoID").ToString)

Col_List.SubItems.Add(myread.Item("TrinhDoID").ToString)

Col_List.SubItems.Add(myread.Item("DanTocID").ToString)

Col_List.SubItems.Add(myread.Item("CuTruID").ToString)

Col_List.SubItems.Add(myread.Item("QuanHe").ToString)

Col_List.SubItems.Add(myread.Item("GhiChu").ToString)

Col_List.SubItems.Add(myread.Item("ChuHoID").ToString)

ListViewchitietcutru.Items.Add(Col_List)

Các modul chính của chương trình

4.3.1 Modul Load Data lên combobox

Private value As New values

Public Sub LoadFillCombo(ByVal sql As String, ByVal table As Object, ByVal cbo As ComboBox, ByVal id As String)

Dim LcCn As SqlClient.SqlConnection = DataConnect.McKet_Noi_Data

Dim da As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter(sql, LcCn)

Dim ds As New DataSet da.Fill(ds, "table")

's DefaultView to the datagrid control

Dim dv As DataView = ds.Tables("table").DefaultView cbo.DataSource = dv cbo.DisplayMember = id

4.3.2 Modul Load Data lên Treeview

 Load dữ liệu địa bàn hành chính trong chương trình

Public Sub Load_Treeview(ByVal tv As TreeView)

Dim ds As New DataSet()

Dim daquanhuyen As New SqlDataAdapter("select QuanHuyen,QuanHuyenID from QuanHuyen", LcCn)

Dim daphuongxa As New SqlDataAdapter("select

PhuongXa,PhuongXaID,QuanHuyenID from PhuongXa", LcCn)

Dim dakhupho As New SqlDataAdapter("select

KhuPho,KhuPhoID,PhuongXaID from KhuPho", LcCn) daquanhuyen.Fill(ds, "QuanHuyen") daphuongxa.Fill(ds, "PhuongXa") dakhupho.Fill(ds, "KhuPho")

LcCn.Close() ds.Tables("PhuongXa").Columns("QuanHuyenID")) ds.Relations.Add("donvi1", ds.Tables("PhuongXa").Columns("PhuongXaID"), ds.Tables("KhuPho").Columns("PhuongXaID"))

Dim nodeQh, nodePxa, nodeKPho As TreeNode

Dim rowQh, rowPxa, rowKpho As DataRow

For Each rowQh In ds.Tables("QuanHuyen").Rows nodeQh = New TreeNode nodeQh.Text = rowQh("QuanHuyen")

'nodeQh.Index = rowQh("QuanHuyenID") tv.Nodes.Add(nodeQh)

For Each rowPxa In rowQh.GetChildRows("donvi") nodePxa = New TreeNode nodePxa.Text = rowPxa("PhuongXa") nodeQh.Nodes.Add(nodePxa)

For Each rowKpho In rowPxa.GetChildRows("donvi1") nodeKPho = New TreeNode nodeKPho.Text = rowKpho("KhuPho") nodePxa.Nodes.Add(nodeKPho)

Next ds.Dispose() daquanhuyen.Dispose() daphuongxa.Dispose()

Dim ds As New DataSet()

Dim dahk As New SqlDataAdapter("select TenCH,ChuHoID from HoKhau", LcCn)

Dim dank As New SqlDataAdapter("select HoTen,NhanKhauID,ChuHoID from NhanKhau", LcCn) dahk.Fill(ds, "HoKhau") dank.Fill(ds, "NhanKhau")

Try ds.Relations.Add("nhankhau", ds.Tables("HoKhau").Columns("ChuHoID"), ds.Tables("NhanKhau").Columns("ChuHoID"))

Dim nodehk, nodenk As TreeNode

Dim rowhk, rownk As DataRow

For Each rowhk In ds.Tables("HoKhau").Rows nodehk = New TreeNode nodehk.Text = rowhk("TenCH")

For Each rownk In rowhk.GetChildRows("nhankhau") nodenk = New TreeNode nodenk.Text = rownk("HoTen") nodehk.Nodes.Add(nodenk)

Next ds.Dispose() dahk.Dispose() dank.Dispose()

MessageBox.Show("Chưa có CSDL", "Thông báo", MessageBoxButtons.OK) End Try

Thực hiện lưu trữ dữ liệu báo cáo theo các hình thưc báo cáo

Public myreport As New ReportDocument

Public Sub Result_Report(ByVal str As String, ByVal tbl As Object, ByVal local

Dim da As SqlDataAdapter = New SqlDataAdapter(str, LcCn)

Dim ds As New DataSet da.Fill(ds, "tbl") myreport.Load(local) myreport.SetDataSource(ds)

In Tạm trú tạm vắng

Private Sub frmhienthigiaybao_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim str As String = "select

HoTen,NSinh,NgheNghiepID,SoCMND,NoiHT,NoiDen,LyDo,CuTruID,MaCB,Noi LV,NgayDen,NgayDi from NhanKhau " str = str + " WHERE HoTen LIKE '%" + Trim(frm.txthoten.Text) + "%'"

Dim da As SqlDataAdapter = New SqlDataAdapter(Str, LcCn)

Dim ds As New DataSet da.Fill(ds, "NhanKhau") myreport.Load("E:\HOTAM\QLNK12\Reports\tttvCrystalReport.rpt") myreport.SetDataSource(ds)

4.4 Giao diện chính và cách sử dụng chương trình

4.4.1 Chức năng quản lý người dùng

Click menu  Truy cập  Quản lý người dùng

4.4.2 Chức năng quản lý danh mục

Click menu  Danh mục chọn một danh mục muốn làm việc

Người sử dụng sẽ có các chưc năng thêm, sửa, xóa Để thực hiện được chức năng sửa xóa, người dùng chọn một bản ghi bên cạnh rồi sau đó mới thực hiện chức năng đã nêu Trong quá trình thêm sửa, người dùng không muốn thực hiện tiếp  bấm chức năng hủy.

Tương tự như vậy cho các danh mục khác.

Click menu Quản lý hồ sơ  Hồ sơ nhân khẩu Để xem thông tin chi tiết của nhân khẩu nào, ta click vào tên nhân khẩu đó trên cây bên trái và thông tin hiển thị bên phải phần ghi chú là phần để cho người sử dụng cập nhật thông tin của nhân khẩu thường xuyên trên địa bàn quản lý(thông tin cá biệt) để xem hình của đối tượng, chọn đối tượng cần xem rồi  Xem Muốn tìm người  Tìm người

4.4.4.1 Chức năng tìm kiếm theo hộ

Click menu Tìm kiếm  Tìm kiếm theo hộ

4.4.4.2 Chức năng tìm kiếm theo thông tin cá nhân

Click menu Tìm kiếm  Tìm theo thông tin cá nhân

Click menu Tìm kiếm  Tìm theo thông tin cư trú

4.4.4.4 Chức năng tìm kiếm theo thời gian

Click menu Tìm kiếm  Tìm theo ngày đến ngày đi(thời gian cư trú)

4.4.5 Chức năng báo cáo thống kê

Click menu  Báo cáo – thống kê  Báo cáo  Báo cáo tổng hợp

4.4.5 In tạm trú tạm vắng

Định dạng
Số trang	86
Dung lượng	2,1 MB