ĐỒ án tốt NGHIỆP bài TOÁN QUẢN lý KHÁCH sạn

Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh LỜI NÓI ĐẦU Để quán triệt nguyên tắc " HỌC ĐI ĐÔI VỚI HÀNH ", nhằm tạo điều kiện cho sinh viên làm quen với thực tế, có nhìn tổng hợp, giúp cho sinh viên chúng em hạn chế bỡ ngỡ trường, hàng năm nhà trường tổ chức cho sinh viên thực tập sở theo nội dung ngành nghề đào tạo Đây điều kiện thuận lợi giúp chúng em phát huy lực thân khả áp dụng lý thuyết trang bị trường vào thực tế Cơng nghệ thơng tin có bước phát triển mạnh mẽ Máy tính điện tử khơng cịn phương tiện quý mà ngày gần gũi với người Đứng trước bùng nổ thông tin, tổ chức doanh nghiệp tìm biện pháp để xây dựng hồn thiện hệ thống thơng tin nhằm tin học hố hoạt động tác nghiệp đơn vị Mức độ hồn thiện tuỳ thuộc vào q trình phân tích thiết kế hệ thống Từ nhu cầu nêu trên, thời gian thực tập tốt nghiệp em sử dụng vốn kiến thức ỏi tìm hiểu phân tích tốn quản lý khách sạn Nó mang tính chất thử nghiệm để học hỏi, trao đổi kinh nghiệm làm quen với thực tế Đề tài gồm phần: Phần I: Tổng quan toán Phần II: Cài đặt hệ thống Kết luận Hướng phát triển Tài liệu tham khảo Phụ lục Tuy cố gắng học hỏi dựa kiến thức học thực tế khách sạn khả thời gian có hạn nên báo cáo em khơng thể tránh khỏi thiếu sót Em kính mong q Thầy bạn bè thơng cảm góp ý để em kịp thời lấp kín lỗ hổng kiến thức chương trình đạt hiệu cao Em xin chân thành cảm ơn Cô Nguyễn Kim Anh hết lịng bảo để em hồn thành đồ án Nha Trang, tháng 08 / 2003 Sinh viên thực Đỗ Thị Liên Đỗ Thị Liên - Lớp TH40 Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Phần I TỔNG QUAN BÀI TOÁN Đỗ Thị Liên - Lớp TH40 Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Chương I: NHIỆM VỤ, MỤC TIÊU VÀ KHẢO SÁT BÀI TOÁN I Nhiệm vụ mục tiêu tốn Nhiệm vụ tốn - Tìm hiểu cấu tổ chức Khách sạn Minh Hoàng - Tìm hiểu nhiệm vụ qui trình thực cơng việc Khách sạn - Khảo sát tình hình thực tế Khách sạn - Áp dụng kiến thức Cơ sở liệu Phân tích - thiết kế hệ thống thông tin quản lý để xây dựng chương trình quản lý Khách sạn tự động thực số cơng việc máy tính thay phần công việc cho người Mục tiêu toán Nghiên cứu thử nghiệm tốn Phân tích - Thiết kế hệ thống thơng tin quản lý Từ phân tích thiết kế cài đặt chương trình Quản lý Khách sạn II Khảo sát tốn Vài nét khách sạn Minh Hồng Khách sạn Minh Hoàng xây dựng sử dụng vào năm 1996 ơng Đào Hồng Hải làm chủ Khách sạn nằm số 2A Củ chi - Đồng đế - Nha Trang Do kinh phí có hạn nên Khách sạn vào hoạt động với qui mô tương đối nhỏ Khách sạn gồm tầng ( tổng cộng 30 phòng) Tầng gồm phòng tiếp tân, phòng giám đốc Tiền sảnh rộng rãi, có khn viên đậu xe Tầng có lợi có chỗ nghỉ mát cho khách, khách trị chuyện Khách sạn có loại phịng, tất phịng có đầy đủ tiện nghi như: Ti vi, tủ lạnh, Telephone Đội ngũ cán nhân viên nhiệt tình lịch sự, vui vẻ dẫn cho khách khách có yêu cầu (trong giới hạn cho phép) Khách sạn nằm gần mặt đường thuận tiện cho việc lại tuyến đường xun biển Khách đến nghỉ khách sạn cảm thấy thoải mái dễ chịu Khách sạn luôn quan tâm nâng cấp chất lượng phục vụ Các quý khách đơn vị có nhu cầu khách sạn liên hệ trực tiếp qua số máy: 058.832220 Rất hân hạnh phục vụ đón tiếp q vị đến khách sạn chúng tơi Cơ cấu tổ chức khách sạn SƠ ĐỒ TỔ CHỨC GIÁM ĐỐC PHÒNG TIẾP TÂN Đỗ Thị Liên - Lớp TH40 PHÒNG BẢO VỆ PHÒNG PHỤC VỤ Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh  Giám đốc Khách sạn Có nhiệm vụ quản lý trực tiếp khách sạn, vấn đề khách sạn phải thơng qua giám đốc giám đốc có quyền định tất thông tin xử lý khách sạn  Phịng tiếp tân Có nhiệm vụ hồn thành cơng việc đăng ký, giao phịng cho khách nhận lại phịng, lập phiếu tốn thu tiền khách, nhận yêu cầu khách, giới thiệu giải đáp thắc mắc khách  Phòng bảo vệ Bảo vệ có nhiệm vụ giữ xe, khuân hành lý giữ gìn an ninh trật tự khách sạn Theo dõi thiết bị khách sạn chịu trách nhiệm hệ thống ánh sáng  Phòng phục vụ Kiểm tra dọn vệ sinh phòng Phục vụ ăn, uống, giặt ủi đưa đón khách xe khách sạn khách có yêu cầu  Ghi vào sổ thuê khách: Ngày 20/12/2002 Mã sổ: A201 Mã sổ: A202 Phịng: 201 Phịng: 202 Nguyễn Đình Lập Nguyễn Trung Khánh CMND: 125001413 CMND125003534 Ngô Đăng nghĩa Lê Đình Thái CMND: 125006768 CMND:125006554 Quê quán: Thái Bình Quê quán: Bắc Ninh h h 15/12/2002 - 18 20/12/2002 09h 14/12/2002 - 15h 20/12/2002  Ghi vào sổ dịch vụ STT PHÒNG DỌN 205 201 101 Đỗ Thị Liên - Lớp TH40 NGƯỜI DỌN TIME DỌN Thu Qúi 15h Hà 9h30 GHI CHÚ Yêu cầu khơng dọn Có giặt ủi Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh  Ghi vào phiếu tốn Khách sạn Minh Hồng Số PHIẾU THANH TOÁN TIỀN Họ tên khách: Ngày đến.: Giờ đến : Số phòng: Ngày đi: Giờ đi: TIỀN NGÀY Phòng Dịch vụ TỔNG SỐ TIỀN TỔNG CỘNG Tổng số tiền chữ: Ngày tháng năm KHÁCH (Ký) GIÁM ĐỐC (Ký) TIẾP TÂN (Ký) Đặc tả toán Một khách sạn cần tự động hoá việc quản lý Sau tìm hiểu, khảo sát trạng em nắm thông tin sau:  Quản lý khách hàng: Mỗi khách hàng khách sạn khách sạn quản lý thông tin sau: Họ tên, giới tính, địa chỉ, điện thoại_Fax(nếu có), E_mail(nếu có), số CMND_Passport (hoặc văn khác có hình), quốc tịch Nếu khách hàng cơng chức quản lý thêm thông tin sau: Tên quan, địa quan, E_mail quan  Quản lý phòng: Các phòng khách sạn quản lý dựa vào phòng số, loại phịng, giá Khách sạn gồm có ba loại phòng 1, 2, tương ứng với sau 150.000đ, 200.000đ, 250.000đ (trong có 10% VAT) Ngồi phòng trang bị tiện nghi, nên tiện nghi quản lý theo mã tiện nghi, tên tiện nghi Còn trang bị tiện nghi theo phòng quản lý dựa vào phòng số số lượng tiện nghi phòng  Quản lý đăng ký _ th phịng: Tất thơng tin đăng ký thuê phòng quản lý dựa số đăng ký, họ tên khách đăng ký, ngày đến, đến, ngày đi, đi, số lượng người lớn, số lượng trẻ em số tiền đặt cọc Đỗ Thị Liên - Lớp TH40 Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh  Quản lý thông tin nhận phịng: Khách sạn quản lý thơng tin sau: Số nhận phòng, họ tên người nhận phòng, ngày nhận, nhận Tất thơng tin nhận phịng dựa vào thơng tin đăng ký th phịng khai báo trước Vì khách hàng có đăng ký nhận phịng theo thơng tin mà khách đăng ký  Quản lý việc trả phịng: Dựa thơng tin đăng ký th phịng thơng tin nhận phịng, việc trả phịng khách sạn quản lý thơng tin sau: Số trả phòng, ngày trả, trả, họ tên người trả (có thể trả phịng trước thời hạn đăng ký) Nếu khách hàng muốn gia hạn thêm thời gian khách sạn phải tiến hành làm thủ tục đăng ký lại Bên cạnh việc trả phòng khách khách sạn kiểm tra lại tình trạng phịng  Quản lý thơng tin huỷ đăng ký: Cũng việc quản lý cơng việc việc huỷ đăng ký quản lý thông tin sau: Số huỷ đăng ký, ngày huỷ đăng ký, huỷ đăng ký, họ tên người huỷ đăng ký  Quản lý nhân viên phục vụ khách sạn: Tất nhân viên làm việc khách sạn quản lý thông tin sau: Họ nhân viên, Tên nhân viên, Chức vụ nhân viên Ngoài khách sạn cịn quản lý thơng tin dịch vụ: tên dịch vụ; tiện nghi Tại khách sạn có nhiều loại dịch vụ như: điện thoại, ăn uống, giặt ủi, đưa đón khách, chuyên chở đồ cho khách (khi khách yêu cầu) Quy trình quản lý: Khi khách hàng có nhu cầu khách sạn khách hàng liên hệ với khách sạn để tiến hành làm thủ tục đăng ký phịng khách hàng làm thủ tục thuê nhận phòng để ( trường hợp phịng cịn trống ) Có hai hình thức liên hệ: đến trực tiếp, qua điện thoại Khi khách hàng làm thủ tục đăng ký khách hàng phải khai báo đầy đủ thơng tin thơng tin quan (nếu có) Bộ phận Lễ tân (BPTL) yêu cầu Hầu hết khách hàng phải đặt cọc số tiền định dựa vào loại phịng mà đăng ký Trường hợp tổ chức th phịng tổ chức cử đại diện đến khách sạn làm thủ tục đăng ký Việc quản lý thông tin tổ chức quản lý thông tin quan công ty, thông tin người đại diện quản lý thông tin công chức hay nhân viên quan Trong thời gian trước ngày nhận phịng tối thiểu tuần khách hàng đăng ký theo đoàn phải gửi cho khách sạn bảng bố trí phịng thành viên để khách sạn phân bố phòng cho hợp lý Khi khách hàng đến nhận phịng số tiền đặt cọc, khách hàng phải gửi cho BPLT CMND_Passport ( văn có hình cịn thời hạn sử dụng ) BPLT vào để kiểm tra lại thông tin khách đăng ký phòng Sau kiểm tra xong BPLT trả lại văn khách hàng làm xong thủ tục trả phịng Sau BPLT kiểm tra lại tình trạng phịng để tiến hành giao phịng cho khách Nếu khách khơng đồng ý làm thủ tục đổi phòng cho khách ( phòng trống ) Đỗ Thị Liên - Lớp TH40 Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Trong thời gian khách sạn, khách sử dụng loại dịch vụ, yêu cầu phục vụ Mọi yêu cầu BPLT đảm nhiệm đáp ứng phạm vi hoạt động khách sạn Khách hàng sử dụng dịch vụ chưa tốn Bộ phận dịch vụ ghi hố đơn nợ chuyển đến BPLT tính vào hố đơn tổng Sau đặt phịng khách huỷ đăng ký phải bồi thường cho khách sạn theo quy định thoả thuận Vì tiền đặt cọc phải có trước nhận phịng Để tránh rủi ro số tiền đặt cọc phải lớn hay số tiền phải bồi thường Tuy nhiên trước ngày nhận phịng khách huỷ đăng ký khơng phải bồi thường Khi hết thời hạn thuê phòng đăng ký khách phải trả phịng cho khách sạn Khi khách làm thủ tục trả phòng, BPLT kiểm tra lại tình trạng phịng, tổng hợp lại hố đơn sử dụng dịch vụ chưa toán thời gian khách khách sạn sau tổng hợp in hoá đơn tổng để khách toán trả lại CMND_Passport cho khách Hình thức tốn khách sạn chủ yếu tiền mặt (tiền Việt nam_VNĐ)  Ghi chú: Giá phịng thay đổi theo mùa, khách quen trẻ em Nếu khách hàng vợ chồng phải có giấy đăng ký kết Cơng việc tin học hoá nhằm đáp ứng: Cập nhật thơng tin Danh mục khách hàng Danh mục phịng Danh mục dịch vụ Danh mục nhân viên Xem thông tin in cần Danh sách khách hàng (DSKH) khách sạn DSKH đăng ký thuê phòng DSKH huỷ đăng ký Danh sách phòng Danh sách nhân viên Phiếu tốn tiền Tra cứu thơng tin Khách hàng theo tiêu chí họ tên, phịng số Hố đơn sử dụng dịch vụ Hố đơn tiền phịng Đỗ Thị Liên - Lớp TH40 Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Chương II: CƠ SỞ LÝ THUYẾT VÀ CÔNG CỤ PHÁT TRIỂN I Cơ sở lý thuyết Các khái niệm - Cơ sở liệu: Là tập hợp bảng liệu có quan hệ với cho cấu trúc chúng mối quan hệ bên chúng tách biệt với chương trình ứng dụng bên ngoài, đồng thời nhiều người dùng khác nhiều ứng dụng khác khai thác chia xẻ cách chọn lọc lúc cần - Thực thể: Là hình ảnh cụ thể đối tượng hệ thống thông tin quản lý Một thực thể xác định Tên thuộc tính - Thuộc tính: Là yếu tố liệu thơng tin thực thể - Lớp thực thể: Là thực thể thuộc tính - Lược đồ quan hệ: Tập thuộc tính quan hệ Lược đồ quan hệ gồm thuộc tính thực thể với mệnh đề ràng buộc VD: Lược đồ quan hệ R = = ( A1:D1,A2:D2, , An :Dn , M) Trong đó: R lược đồ quan hệ Ai : tên thuộc tính Di : miền xác định thuộc tính M : mệnh đề ràng buộc Nội dung lược đồ quan hệ gọi - Các phép toán tối thiểu: * Tìn kiếm liệu theo tiêu chuẩn chọn, không làm thay đổi trạng thái sở liệu * Thay đổi cấu trúc sở liệu * Thay đổi nội dung sở liệu * Xử lý, tính tốn sở liệu Khái niệm phụ thuộc liệu dạng chuẩn - Một thuộc tính gọi phụ thuộc vào thuộc tính khác giá trị thuộc tính phụ thuộc vào giá trị thuộc tính Sự phụ thuộc gián tiếp hay trực tiếp - Một quan hệ có nhóm thuộc tính mà giá trị chúng qui định giá trị thuộc tính khác, nhóm thuộc tính gọi khố - Với quan hệ tuỳ vào phụ thuộc thuộc tính vào khố có mà ta phân chia quan hệ thành dạng chuẩn khác Các dạng chuẩn bản: * Dạng chuẩn Đỗ Thị Liên - Lớp TH40 Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh * Dạng chuẩn * Dạng chuẩn Các liệu lưu trữ dạng chuẩn tránh tượng dư thừa liệu, tạo cho liệu có tính độc lập cao Các quan hệ chưa dạng chuẩn phân rã thành quan hệ nhỏ có dạng chuẩn 3 Khái niệm dẫn khoá dẫn Để tìm kiếm thơng tin nhanh theo tiêu chuẩn tạo thơng tin dẫn theo tiêu chuẩn Các thơng tin dẫn thơng tin giúp ta tìm kiếm liệu nhanh Các thơng tin gọi khố dẫn Khố dẫn trường nhiều trường trường hợp phải thứ tự Với cách tạo khoá theo tiêu chuẩn ta tìm kiếm liệu nhanh theo tiêu chuẩn Mục tiêu tính ưu việt mơ hình quan hệ - Cho lược đồ liệu dễ sử dụng, mơ hình đơn giản, người dùng không cần biết cấu trúc vật lý liệu Tiện lợi cho người dùng cuối không chuyên tin học - Tăng cường tính độc lập liệu, đặc biệt độc lập vật lý - Cho khả có ngơn ngữ thao tác bậc cao - Tối ưu việc tìm kiếm liệu sở liệu, hệ quản trị tự tìm cách truy nhập - Cải thiện nâng cao toàn vẹn liệu bảo mật liệu - Có thể phục vụ cho nhiều chương trình ứng dụng - Có sở toán học phong phú chắn: * Lý thuyết quan hệ * Dạng chuẩn có độ bền vững đầy đủ thông tin II Công cụ phát triển Lựa chọn cơng cụ Do tính chất sở liệu tốn chương trình sử dụng ngơn ngữ lập trình Visual Basic 6.0 việc tạo giao diện chương trình chính, kết hợp với Microsoft Access 97 tạo sở liệu Chương trình chạy Win95/ Win98 Visual Basic ngơn ngữ lập trình thông dụng Windows Visual Basic 6.0 hỗ trợ quản lý Cơ sở liệu Internet, đặc biệt quản lý sở liệu Visual Basic có nhiều tính Các điều khiển cho phép ta viết chương trình ứng dụng kết hợp giao diện, cách xử lý tính Office 97 trình duyệt Web Internet Explorer Mặt khác, dùng Visual Basic tiết kiệm thời gian công sức so với ngơn ngữ lập trình khác xây dựng ứng dụng Visual Basic gắn liền với khái niệm lập trình trực quan (Visual), nghĩa thiết kế chương trình ta nhìn thấy kết qua thao tác giao diện chương trình thực Đây thuận lợi lớn so với ngơn ngữ lập trình khác, Visual Basic cho phép ta chỉnh sửa đơn giản, nhanh chóng màu sắc, kích thước hình dáng đối tượng có mặt ứng dụng Bên cạnh đó, Visual Basic cịn hỗ trợ tính kết nối mơi trương liệu Access, SQL, Việc liên kết liệu thực nhiều cách Trong thiết kế DataEnvironment điểm VB 6.0 Nó dùng để quản lý cách trực quan việc kết nối sở liệu Nghĩa ta có thiết kế DataEnvironment Đỗ Thị Liên - Lớp TH40 Trang Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh ứng dụng ta quản lý tất thơng tin gắn liền với kết nối nơi, kỹ thuật cổ điển nhúng thông tin kết nối CSDL chương trình Chương trình "Quản lý khách sạn" chương trình quản lý sở liệu (lưu trữ, tra cứu ) khách sạn Do việc dùng ngơn ngữ VB 6.0 thích hợp Mơi trường làm việc - Hệ thống máy tính chủ yếu sử dụng khách sạn máy PC - Đa số người sử dụng thực tế làm quen với tin học với hệ điều hành Windows - Hệ thống chương trình quản lý khách sạn tiện dụng chạy mơi trường mạng Tuy nhiên cài máy lẻ, áp dụng với sở chưa ứng dụng mạng máy tính quản lý III Tổng quan lý thuyết Đây chương trình quản lý thực tin học hoá vào lĩnh vực quản lý khách sạn mà trước họ quản lý theo lối thủ công Cơ sở liệu tốn phân tích thiết kế theo phương pháp MERISE (Methode pour Rassembler les Idees Sans Effort: Các phương pháp để tập hợp ý tưởng không cần cố gắng ) - Một số mặt mạnh phương pháp Merise có sở khoa học vững chắc, phương pháp phân tích dùng nhiều Pháp Châu Âu phải phân tích thiết kế hệ thống lớn Là phương pháp dung thiết kế hệ quản trị sở liệu hoàn hảo từ yêu cầu ban đầu, giúp bước cảm nhận hồn thành hệ thống thơng tin cách logic Tuy nhiên phương pháp có số nhược điểm cồng kềnh, để giải áp dụng nhỏ , việc áp dụng phương pháp nhiều lúc đưa đến việc kéo dài thời gian, nặng nề khơng đáng có Phương pháp phân tích Merise Là phương pháp khảo sát thực tin học hoá cho hệ thống quản lý Đặc trưng phương pháp xem xét, tách biệt liệu xử lý đảm bảo tính khách quan trình phân tích cung cấp đầy đủ mơ hình để diễn đạt bước cập nhật Hệ thống bao gồm liệu xử lý biểu diễn ba mức: - Mức quan niệm - Mức tổ chức ( logic ) - Mức vật lý * Mức quan niệm liệu: Là mức cảm nhận để xác định hệ thống thông tin, mức cần trả lời câu hỏi: Hệ thống thông tin cần yếu tố gì? Chức sao? Gồm liệu qui tắc nào? * Mức tổ chức: Là mức tổng hợp yếu tố nhận diện mức quan niệm Trong tổng thể vận động cần phải trả lời câu hỏi: Ai làm? Làm đâu nào? * Mức vật lý: Đỗ Thị Liên - Lớp TH40 Trang 10 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Chương II: CÀI ĐẶT CH ƯƠNG TRÌNH I Thiết kế sở liệu Access - Chương trình sử dụng sở liệu Microsoft Access 97 kết nối với Visual Basic 6.0 điều khiển Data Environment - Tên File sở liệu: "Lien.mdb" Các Table tạo toán Table_KHACHHANG Table_HUYDK Table_PHONG Table_DANGKY Table_NPHONG Table_DICHVU Table_TRAPHONG Table_TNGHI Table_SDDV Table_CONGCHUC Table_COQUAN Table_TTBI Tuy nhiên, giới hạn điểm qua số bảng sau Table_KHACHHANG, Table_ DANGKY: Đỗ Thị Liên - Lớp TH40 Trang 60 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Ràng buộc ĐỐI TƯỢNG Ràng buộc khố KHACHHANG COQUAN PHONG DICHVU TNGHI DANGKY HUYDK NPHONG TRAPHONG SDDV NHANVIEN TTHBI CONGCHUC Ràng buộc khoá ngoại CONGCHUC Đỗ Thị Liên - Lớp TH40 RÀNG BUỘC TOÀN VẸN MAKH khố MACQ khố MAP khố MADV khố MATN khố MAKH, SoDK, MAP khố MAKH, SoDK khố MAKH, SoDK khố MaNV khố MaKH, MaCQ khố MACQ khố ngoại tham chiếu từ bảng COQUAN Trang 61 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Mối quan hệ bảng Dùng công cụ Relationships MS Access để thiết lập mối quan hệ bảng Cài đặt chương trình Sau số thủ tục thực chương trình  Thủ tục mở kết nối liệu Sub Open_mdb() Dim db_name, str As String db_name = App.Path & "\Lien.mdb" str = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & db_name & "" DE1.CN1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & db_name & "" DE1.CN1.Open cn.Open str End Sub  Hàm kiểm tra ngày tháng Public Function Test_Day(ngay As String) As Boolean Dim KTNgay As Integer Dim so Đỗ Thị Liên - Lớp TH40 Trang 62 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh so = CInt(Val(Trim(Right(ngay, 4)))) KTNgay = CInt(Val(Left(ngay, 2))) If CInt(Val(Trim(Right(ngay, 4)))) < 1000 Then MsgBox "Nam phai co chu so.Vui long nhap lai.", vbOKOnly + vbExclamation, "Thong bao" Test_Day = False Exit Function End If If CInt(Val(Trim(Mid(ngay, 4, 2)))) < Or CInt(Val(Trim(Mid(ngay, 4, 2)))) > 12 Then MsgBox "Ngay thang khong hop le Vui long nhap lai", vbOKOnly + vbExclamation, "Thong bao" Test_Day = False Else Select Case CInt(Val(Trim(Mid(ngay, 4, 2)))) Case 1, 3, 5, 7, 8, 10, 12 If KTNgay < Or KTNgay > 31 Then MsgBox " Thang " & Mid(ngay, 4, 2) & " co 31 ngay", vbOKOnly + vbExclamation, "Thong bao" Test_Day = False Else Test_Day = True End If Case If KTNgay < Or KTNgay > 29 Then MsgBox " khong hop le", vbOKOnly + vbExclamation, "Thong bao" Test_Day = False Else If namnhuan(Right(ngay, 4)) = False Then If KTNgay > 28 Then MsgBox "Nam " & Right(ngay, 4) & " thang co 28 Vui long nhap lai", vbOKOnly + vbExclamation, "Thong bao" Test_Day = False End If Else Test_Day = True End If End If Case Else If KTNgay < Or KTNgay > 30 Then MsgBox "Ngay khong hop le! thang " & (Mid(ngay, 4, 2)) & _ Đỗ Thị Liên - Lớp TH40 Trang 63 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh " chi co 30 Vui long nhap lai.", vbOKOnly + vbExclamation, "Thong bao" Test_Day = False Else Test_Day = True End If End Select End If End Function  Thủ tục đăng ký thuê phòng Input : THƠNG TIN ĐĂNG KÝ TH PHỊNG Output : Thơng tin đăng ký thuê phòng ghi vào bảng DANGKY Xử lý: Private Sub Luu_Du_Lieu() Dim rs As New ADODB.Recordset Dim rs1 As New ADODB.Recordset Dim str If Trim(txtSoDK) = "" Or Trim(txtMaKH) = "" Or Trim(txtMaP) = "" Then MsgBox "Chu y: MaKH, SoDK, MaP khong duoc trong", vbOKOnly + vbExclamation, "Thong bao" Me.MousePointer = Exit Sub End If Test_NULL str = "select*from PHONG where MaP='" & Trim(txtMaP) & "'" rs1.Open str, cn, adOpenKeyset, adLockOptimistic, adCmdText If txtMaP = rs1!MaP Then rs1.Update rs1.Close str = "select*from Dangky where SoDK='" & Trim(txtSoDK) & "' " rs.Open str, cn, adOpenKeyset, adLockOptimistic, adCmdText If rs.EOF = True Then rs.AddNew rs!MaKH = txtMaKH rs!soDK = txtSoDK rs!NgayDK = txtNgayDK rs!MaP = txtMaP rs!Ngayden = txtNgayden rs!Gioden = txtGioden rs!Ngaydi = txtNgaydi rs!Giodi = txtGiodi rs!SLNL = txtSLNL Đỗ Thị Liên - Lớp TH40 Trang 64 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh rs!SLTE= txtSLTE rs!Giathue = txtGiathue rs!Tiencoc = txtTiencoc rs.Update rs.Close Else Dim kiemtra If txtSoDK = rs! SoDK Then kiemtra = MsgBox(" Khach hang co So dang ky [" & txtSoDK & "]da ton tai Neu ban muon SUA thong tin khach hang thi bam Yes", vbYesNo + vbQuestion, "Thong bao") If kiemtra = vbNo Then Exit Sub Else rs!MaKH = txtMaKH rs!SoDK = txtSoDK rs!NgayDK = txtNgayDK rs!MaP = txtMaP rs!Ngayden = txtNgayden rs!Gioden = txtGioden rs!Ngaydi = txtNgaydi rs!Giodi = txtGiodi rs!SLNL = txtSLNL rs!SLTE = txtSLTE rs!Giathue = txtGiathue rs!Tiencoc = txtTiencoc rs.Update End If End If End If End If Lock_Text Display_Listview cmdNEW.SetFocus Me.MousePointer = End Sub  Hàm kiểm tra ngày đến Private Function KTNgayden(Ngayden As String) As Boolean Dim rs As New ADODB.Recordset Dim str str = " select * from Dangky where SoDK='" & Trim(txtSoDK.Text) & "'" rs.Open str, cn, adOpenKeyset, adLockOptimistic, adCmdText If rs.EOF = True Then Đỗ Thị Liên - Lớp TH40 Trang 65 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh If txtNgayDK = "" Then MsgBox " Ban chua nhap dang ky ! ", vbOKOnly + vbExclamation, "Thong bao" KTNgayden = False txtNgayDK.SetFocus Exit Function Else If CDate(Ngaythang(Ngayden)) < txtNgayDK Then MsgBox " Ngayden phai >= [" & txtNgayDK & "] ", vbOKOnly + vbExclamation, "Thong bao" KTNgayden = False Else KTNgayden = True End If End If Else If CDate(Ngaythang(Ngayden)) < rs!NgayDK Then MsgBox " Ngayden phai >= [" & txtNgayDK & "] ", vbOKOnly + vbExclamation, "Thong bao" KTNgayden = False Else KTNgayden = True End If End If End Function II Thiết kế giao diện Có lẽ khâu quan trọng lập trình thiết kế Sau thiết kế giao diện, bạn cần thiết kế cấu trúc chương trình Cách thiết kế khác dẫn đến hoạt động khác bảo trì theo khác Code VB tổ chức theo dạng phân nhánh Một ứng dụng thông thường chứa nhiều mô-đun Mỗi biểu mẫu có mơ-đun, có thêt có thêm mơ-đun chuẩn chứa đoạn chương trình dùng chung có thêm mơ-đun lớp Có hai loại giao diện SDI (giao diện đơn tài liệu - single document interface) MDI (giao diện đa tài liệu - multiple document interface) Ví dụ : Notepad ví dụ SDI, Microsoft Excel - Microsoft Word MDI Dưới số Form chương trình Đỗ Thị Liên - Lớp TH40 Trang 66 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Form_Main Form _Khachhang Đỗ Thị Liên - Lớp TH40 Trang 67 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Form _DANGKY Form_NHANPHONG Đỗ Thị Liên - Lớp TH40 Trang 68 Đồ án tốt nghiệp Đỗ Thị Liên - Lớp TH40 Gvhd: Nguyễn Kim Anh Trang 69 Đồ án tốt nghiệp Đỗ Thị Liên - Lớp TH40 Gvhd: Nguyễn Kim Anh Trang 70 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Kết luận Mặc dù cố gắng tìm hiểu cơng việc " Quản lý khách sạn " không tránh khỏi thiếu sót Mong q Thầy , Cơ bạn đóng góp ý kiến để em rút nhiều kinh nghiệm quý báu bước vào sống Q trình khảo sát, phân tích - thiết kế cài đặt bàitoán quản lý khách sạn hồn thành cơng việc sau: - Cập nhật, lưu trữ, thêm thông tin: * Khách hàng đăng ký thuê phòng * Khách hàng nhận phòng * Khách hàng huỷ đăng ký * Khách hàng sử dụng dịch vụ * Khách hàng trả phịng * Thơng tin nhân viên khách sạn - Báo biểu: * Danh mục phòng * Danh sách khách hàng đăng ký thuê phòng * Danh sách khách hàng nhận phòng * Danh sách khách hàng sử dụng dịch vụ - Tra cứu: * Thông tin khách hàng * Thông tin nhân viên khách sạn * Hoá đơn dịch vụ * Hoá đơn tổng hợp Bài tốn thiết kế cài đặt ngơn ngữ Visual Basic cho phép chạy môi trường Windows kế thừa tính mạnh Windows như: - Cho giao diện thân thiện với người sử dụng - Chạy theo chế độ đa nhiệm - In ấn nhanh chóng thuận lợi Bài tốn quản lý khách sạn chủ yếu áp dụng với khách sạn có quy mơ tương đối nhỏ, đặc thù khách sạn nên công tác quản lý với khách sạn khác Ở em tìm hiểu cơng tác quản lý khách sạn Minh hồng nên chương trình chủ yếu áp dụng cho công tác quản lý khách sạn mà thơi Do thời gian hạn chế trình độ hiểu biết thân chưa nhiều nên việc phân tích thiết kế cài đặt tốn quản lý khách sạn chưa hoàn thiện phần mềm quản lý Nó mang tính chất học hỏi, trao đổi bắt đầu làm quen với thực tế Nhưng qua đợt thực tập này, em học hỏi nhiều kinh nghiệm q trình phân tích thiết kế cài đặt chương trình quản lý, đồng thời bổ sung kiến thức cho thân Em xin chân thành cảm ơn Cơ Nguyễn Kim Anh tận tình giúp đỡ để em hồn thành đồ án Em bày tỏ lòng biết ơn sâu sắc tới quý Thầy Cô khoa Công nghệ thông tin trường Đại học Bách khoa Hà nội, Thầy Cô khoa Công nghệ thông Đỗ Thị Liên - Lớp TH40 Trang 71 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh tin trường Đại học Thuỷ sản dạy suốt khoá học Tơi cảm ơn bạn đóng góp ý kiến động viên để tơi hồn thành đồ án Hướng phát triển - Chương trình cho phép nhân viên khách sạn tiếp cận hệ thống Nên hướng cần phải phân quyền sử dung hệ thống cho khách tiếp cận với hệ thống - Mở rộng toán cho nhiều khách sạn riêng biệt - Thống kê danh sách khách hàng theo khoảng thời gian - Đưa doanh thu cho khách sạn khoảng thời gian định - Ngoài để chương trình tối ưu hơn, ta xây dựng thêm hệ thống cung cấp thông tin phòng, giá cho phép đặt phòng qua mạng Đỗ Thị Liên - Lớp TH40 Trang 72 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Tài liệu tham khảo  1 - " Microsoft Visual Basic & Lập trình sở liệu 6.0 ", Nguyễn Thị Ngọc Mai (chủ biên), Nhà xuất lao động -Xã hội  2 - " Những thực hành sở liệu Visual Basic ", Ks Đinh Xuân Lâm, Nhà xuất thống kê  3 - " Bài giảng Microsoft Access ", Ths.Nguyễn Đình Thuân  4 - "Bài giảng sở liệu & phân tích thiết kế hệ thống thông tin quản lý ", Ths Nguyễn Hữu Trọng  5 - " Phân tích thiết kế hệ thống thông tin quản lý ", Ths Đinh Thế Hiển, Nhà xuất thống kê - 2000  6 - " Một số luận văn tốt nghiệp " anh chị khoá trước Đỗ Thị Liên - Lớp TH40 Trang 73 Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh Phụ lục Cài đặt Visual Basic 6.0 Sử dụng chương trình Setup, ta cài đặt Visual Basic máy tính Chương trình Setup cài đặt VB thnàh phần khác từ đĩa CD vào đĩa cứng Chương trình cịn cài đặt tập tin cần thiết để xem tài liệu đĩa CD MSDN (Microsoft Developer Network) Ta thi hành VB cách copy tập tin từ đĩa CD-ROM vào đĩa cứng Ta phải dùng chương trình Setup để giải nén cài đặt tập tin vào thư mục thích hợp a Cấu hình cài đặtVB 6.0 - Microsoft Windows 95 trở lên Microsoft Windows NT Workstation 4.0 trở lên - Bộ vi xử lý 486DX / 66MHz trở lên - Một ổ đĩa CD-ROM - Màn hình VGA hình độ phân giải cao hỗ trợ Microsoft Windows - 16 MB RAM cho Win95, 32MB RAM cho Win NT Workstation - Một thiết bị chuột thiết bị trỏ tương thích b Đọc tập tin Readme Tập tin liệt kê sửa đổi tài liệu VB từ phát hành Kiểm tra phần đầu tập tin để nắm thông tin mới, chi tiết cài đặt VB c Quá trình cài đặt - Đặt đĩa CD-ROM vào ổ đĩa CD-ROM - Dùng lệnh thích hợp với mơi trường hệ điều hành để thi hành chương trình Setup chứa thư mục gốc đĩa số Chẳng hạn với Win 98, chọn Start  Run  nhập vào E:\Setup (giả sử E tên ổ đĩa CD máy để cài đặt) - Chọn Install Visual Basic 6.0 - Lần lượt làm theo hướng dẫn hình d Khởi động Visual Basic Sau hoàn tất thủ tục cài đặt, ta khởi động VB cách sử dụng nút Start công việc Windows Nếu hệ thống hỗ trợ AutoPlay, ta khởi động VB cách đặt đĩa VB vào ổ đĩa Cài đặt Microsoft Access 97 Microsoft Acces 97 nằm Microsoft Office 97 Đưa đĩa CD chứa Office 97 vào máy thực lệnh Setup để bắt đầu trình cài đặt Nên chọn mục Custom để cài đầy đủ Access Đỗ Thị Liên - Lớp TH40 Trang 74 ... Đồ án tốt nghiệp Gvhd: Nguyễn Kim Anh  Giám đốc Khách sạn Có nhiệm vụ quản lý trực tiếp khách sạn, vấn đề khách sạn phải thông qua giám đốc giám đốc có quyền định tất thông tin xử lý khách sạn. .. đưa đón khách, chuyên chở đồ cho khách (khi khách yêu cầu) Quy trình quản lý: Khi khách hàng có nhu cầu khách sạn khách hàng liên hệ với khách sạn để tiến hành làm thủ tục đăng ký phịng khách. .. tháng năm KHÁCH (Ký) GIÁM ĐỐC (Ký) TIẾP TÂN (Ký) Đặc tả toán Một khách sạn cần tự động hoá việc quản lý Sau tìm hiểu, khảo sát trạng em nắm thông tin sau:  Quản lý khách hàng: Mỗi khách