§å ¸n tèt nghiƯp: Xây dựng chương trình QLKS theo moõ hỡnh Server/Client baống Visual Basic Tr-ờng đại học vinh Khoa Công nghệ thông tin Đồ án tốt nghiệp Tên Đồ án: Quản lý khách sạn theo mô hình server/client Giáo viên h-ớng dẫn Sinh viên thực Ths Lê Văn Minh Đ-ờng Xuân Tr-ờng Lớp 45 K - Khoa CNTT Vinh, tháng 5/2009 Giáo viên h-ớng dẫn: Ths Lê Văn Minh Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng §å ¸n tèt nghiƯp: Xây dựng chương trình QLKS theo moõ hỡnh Server/Client baống Visual Basic Lời nói đầu Trong công đổi không ngừng khoa học kỹ thuật công nghệ, nhiều lĩnh vực đà phát triển v-ợt bậc đặc biệt lĩnh vực công nghệ thông tin Quản lý hệ thống máy tính đ-ợc hình thành từ nhu tốc độ quản lý nh- phát triển xà hội yêu cầu cao tốc độ xử lý, quản lý đồng nhanh chóng, chia sẻ tài nguyên nhdùng chung nguồn liệu, đỡ tốn thời gian công sức Chính vai trò quan trọng máy tính với nhu cầu sống ng-ời kiến thức đà đ-ợc học tr-ờng em đà chọn ®å ¸n: Xây dựng chương trình QLKS theo mô hình Server/Client Visual Basic Do thêi gian vµ kiÕn thøc có hạn nên đồ án hạn chế, mong đ-ợc góp ý thầy cô giáo nhóm sinh viên Em xin chân thành cảm ơn thầy giáo Ths: Lê Văn Minh đà tận tình giúp đỡ để chúng em hoàn thành ch-ơng trình Xin trân trọng cảm ơn! Vinh, ngày 14 tháng 05 năm 2009 Sinh viên thực Đ-ờng Xuân Tr-ờng Giáo viên h-ớng dẫn: Ths Lê Văn Minh Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng Đồ án tốt nghiệp: Xaõy dửùng chửụng trình QLKS theo mô hình Server/Client Visual Basic Mơc lục Trang Ch-ơng I : PHâN TíCH & THIết Kế HÖ THèNG CH-ơng trình quản lý khách sạn I Phân tích đánh giá trạng 1- Khảo sát trạng Mục tiêu xây dựng ch-ơng trình QLKS Đặc tả toán Qui tr×nh qu¶n lý nh- sau 11 II Mô hình hoá liệu 12 Mô hình hoá quan niệm liệu 12 b Mô hình quan hệ liệu toán quản lý khách sạn 17 Mô hình tổ chøc d÷ liƯu .18 M« hình vật lý liệu 18 Dienthoai 20 III Mô hình hoá xử lý .24 Mô hình hoá thông l-ợng: 24 Mô hình quan niệm xử lý 25 Ch-¬ng II: néi dung ch-ơng trình 40 I Ngôn ngữ lập trình Visual Basic 40 II-MÔ HìNH CLIENT SERVER 41 Giới thiệu mô hình Client Server : 41 Mô hình Client Server : 41 Truy cËp d÷ liÖu Visual Basic : .43 C¸ch kÕt nối liệu thông qua OLE DB VB : 44 III- Giao diƯn – M· lƯnh (Code) cđa mét sè modun ch-ơng trình QLKS 47 Form thiết kế bố trí sơ đồ phòng .47 Form bố trí (giao) phòng cho khách: 50 Form thông tin phòng: .56 Ch-ơng III : KếT LUậN HƯớNG PHáT TRIểN 69 I KÕt luËn 69 II HƯớNG PHáT TRIểN 69 Lời cảm ơn 75 Tài liệu tham khảo 76 Giáo viên h-ớng dẫn: Ths Lê Văn Minh Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng Đồ án tèt nghiƯp: Xây dựng chương trình QLKS theo mô hình Server/Client baống Visual Basic Giới thiệu chung Đôi nét Khách sạn B-u điện Cửa Lò Nghệ An Năm 1996, đ-ợc thống Tổng công ty B-u Viễn thông Nghệ An (nay Tập đoàn B-u Viễn thông Việt Nam ), Trung tâm quản lý Công trình phúc lợi thuộc Tổng công ty B-u Việt Nam thành lập Nhà khách B-u điện Cửa Lò vào ngày 01/05/1996 nhằm mục đích phục vụ công nhân viên nghành tham quan nghỉ mát hành năm Nhà khách B-u điện Cửa Lò có địa chỉ: 02 Đ-ờng Bình Minh, thị xà Cửa Lò, Năm 2002 Trung tâm quản lý Công trình phúc lợi đổi thành Tổng Công ty Cp Du lịch th-ơng mại B-u điện Việt Nam theo mô hình quản lý Tổng công ty Nhà khách B-u điện Cửa Lò đổi thành Khách sạn B-u điện Cửa Lò, trực thuộc Tổng Công ty CP du lịch Th-ơng mại B-u điện Việt Nam Tính đến Khách sạn B-u điện Cửa Lò đà hoạt động đ-ợc 13 năm, phải trải qua b-ớc khó khăn nh-ng nỗ lực cán công nhân viên nh- quan tâm Tổng công ty CP Du lịch th-ơng mại B-u điện Việt Nam nói riêng tập đoàn B-u Viễn thông Việt Nam nói chung, Khách sạn B-u điện Cửa Lò ngày đà lớn mạnh mặt, l-ợng khách l-u trú nh- sử dụng dịch vụ Nhà khách ngày nhiều Với nh-ng thành nh- vậy, Khách sạn B-u điện đà không ngừng nâng cao trình độ chuyên môn nh- sở vật chất, đến phần lớn phòng làm việc đà trang bị máy tính để hỗ trợ cho công việc kinh doanh Mặc dù vậy, với tính mang tính thủ công chủ yếu sử dụng Word Excel, chắn không đáp ứng đ-ợc tầm quản lý doanh nghiệp đà phát triển Chính qua thời gian thực tập đây, em đà cố gắng khảo sát hệ thống cũ mạnh dạn thực ch-ơng trình quản lý máy tính với chức hoàn thiện hơn, ch-ơng trình đ-ợc viết ngôn ngữ Visual Basic theo mô hình Server/Client để thực số công việc vấn đề quản lý Khách sạn nh- quản lý phòng, quản lý dịch vụ với CSDL sử dụng Microsoft Acces Giáo viên h-ớng dẫn: Ths Lê Văn Minh Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng Đồ án tốt nghiệp: Xaõy dửùng chửụng trỡnh QLKS theo moõ hỡnh Server/Client baống Visual Basic Sơ đồ quản lý khách sạn B-u điện Cửa Lò Giám đốc P.Giám đốc Lễ tân TC/ H.chính Giáo viên h-ớng dẫn: Ths Lê Văn Minh Nhà hàng/ Bar Kế toán Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chửụng trỡnh QLKS theo mô hình Server/Client Visual Basic Ch-¬ng I : PHâN TíCH & THIết Kế Hệ THốNG CH-ơng trình quản lý khách sạn Trong phân tích thiết kế hệ thống có nhiều ph-ơng pháp mô hình hoá: Các ph-ơng pháp h-ớng thủ tục: - MERISE: Ph-ơng pháp hệ thống - SA: Ph-ơng pháp chức - State Charts: Ph-ơng pháp theo kiện -E/A: Ph-ơng pháp h-ớng liệu Các ph-ơng pháp h-ớng đối t-ợng: - OOA/RD: - OOA/OOD: - SOART: - UML+RUP+Rational Rose ch-ơng trình em chọn ph-ơng pháp MERISE(Methode pour Rassembler les Ides Sans Effort) Ph-ơng pháp có nguồn gốc từ Pháp, đời vào cuối thập niên 70 Ưu điểm ph-ơng pháp MERISE có sở khoa học vững chắc, đ-ợc dùng nhiều Pháp n-ớc châu Âu, điểm mạnh ph-ơng pháp chỗ cung cấp cho phân tích viên công cụ để qua tiếp cận mô tả hiểu từ tổ chức tr-ớc đề xuất ph-ơng án xử lý máy tính Nh-ợc điểm ph-ơng pháp cồng kềnh, không thích hợp việc dùng để giải đề án nhỏ ý t-ởng ph-ơng pháp MERISE sau giai đoạn tiếp cận, điều tra tổng hợp, phân chia hệ thống thành hai thành phần: liệu xử lý chia qui trình phát triển hệ thống thành mức tiếp cận: quan niệm, logic vật lý Với thành phần mức tiếp cận có mô hình t-ơng ứng, mức tiếp cận th-ờng thành phần hệ thống đảm nhận Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chửụng trỡnh QLKS theo mô hình Server/Client Visual Basic - Møc quan niệm: mức đảm nhận để xác định hệ thống thông tin, mức cần xác định câu hỏi: Hệ thống thông tin cần yếu tố gì? Chức ? Gồm liệu quy tắc quản lý nh- ? - Mức tổ chức: mức tổng hợp u tè ®· nhËn diƯn ë møc quan niƯm Trong tổng thể vận động cần trả lời câu hỏi: Ai làm ? Làm đâu ? - Møc vËt lý: lµ møc chi tiÕt vỊ liệu cần có quan hệ cụ thể Về xử lý cần có đầy đủ đặc tả cho thủ tục ch-ơng trình Các b-ớc phát triển trình xây dựng hệ thống thông tin: - B-ớc phân tích: + Xác định vấn đề + Nghiên cứu trạng tổ chức + Nghiên cứu khả thi + Xây dựng hợp đồng trách nhiệm - B-ớc thiÕt kÕ: + ThiÕt kÕ tỉng thĨ + ThiÕt kÕ chi tiết - B-ớc thực hiện: + Cài đặt hệ thống vào máy + Khai thác thích ứng I Phân tích đánh giá trạng 1- Khảo sát trạng Qua khảo sát trạng hoạt động khách sạn, ta cần phải nắm rõ đối t-ợng sau: a Đối t-ợng khách Khách thuê phòng có dạng: - Khách đoàn (khách l-u trú tập thể): nhãm nhiỊu ng-êi n-íc hc qc tÕ cđa mét tổ chức hay doanh nghiệp ( gọi chung đơn vị ) Một đơn vị có nhiều đoàn khách l-u trú khách sạn thời điểm khác Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh Sinh viên thực hiện: Đ-ờng Xu©n Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xây dựng chương trình QLKS theo mô hình Server/Client Visual Basic - Kh¸ch v·ng lai (kh¸ch l-u tró mét mình): Là loại khách thuộc đơn vị nh-ng không thuộc đơn vị Đối với hoạt động khách sạn, việc phân loại khách quan trọng dựa vào đó, khách sạn có nhiều ph-ơng thức tổ chức đón tiếp cách thích hợp, đặc biệt chế độ phục vụ loại khách b Đối t-ợng phòng Nhân viên lễ tân sau nhận khách vào phòng theo dõi khách sơ đồ phòng Sơ đồ phòng tờ giấy mô tả vị trí phòng khách sạn Phòng có khách ghi tên đoàn khách vào để theo dõi Các thông tin cụ thể khách đ-ợc ghi vào sổ đăng ký tạm trú Hàng ngày khách sạn l-u lại sơ đồ phòng mối ngày để làm báo cáo Do yêu cầu phòng có thay đổi nh- chuyển phòng, bớt khách phòng lại phải viết lại khó khăn c Sử dụng dịch vụ: Khi khách l-u trú khách sạn th-ờng hay sử dụng dịch vụ nh-: điện thoại, fax, thuê xe, massage, ăn uống nhân viên khách sạn phải ghi lại phát sinh để làm báo cáo hay toán với khách sau Thông th-ờng khách sạn phận phòng (đăng ký, phân phòng, trả phòng) nhân viên lê tân phụ trách, phần cung cấp dịch vụ khác đảm trách Các phận tách rời nh-ng lại lại có mối quan hệ chặt chẽ với đối t-ợng phục vụ khách thuê phòng Mục tiêu xây dựng ch-ơng trình QLKS Kinh doanh khách sạn gồm hai hoạt động cho thuê phòng kinh doanh loại dịch vụ có liên quan Mục tiêu xây dựng ch-ơng trình quản lý khách sạn bao gồm nội dung sau: - Tỉ chøc thèng nhÊt mét hƯ thèng c¬ së liệu nhằm l-u giữ thông toàn liệu hoạt động khách sạn nh-: Khách hàng, phòng, dịch vụ kèm theo để phục vụ cho công tác quản lý - Tin học hoá công tác quản lý khách hàng - Tin học hoá quy trình đăng ký, nhận phòng quản lý phòng - Tin học hoá việc cung cấp loại dịch vụ cho khách hàng Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chương trình QLKS theo mô hình Server/Client Visual Basic - Tin học hoá việc toán cho khách hàng - Tổng hợp lập báo cáo về: Thuê phòng, trạng phòng, công suất buồng, doanh thu khách sạn, nhà hàng dịch vụ - Sử dụng mô hình Server/Client để chuyên biệt hoá công việc: Ch-ơng trình quản lý Khách sạn hiẹu Client nơi tiếp nhạn luồng liệu khách t-ơng ứng với phần hành đ-ợc giao hoàn toàn độc lập với thao tác máy chủ Server nơi chứa sở liệu cho Client cung cấp chịu trách nhiệm xử lý, tổng hợp liệu đà có Nh- mô hình Server/Client làm cho toàn ch-ơng trình vừa thóng vừa có độc lập loại công việc Đặc tả toán Căn vào trạng mục tiêu cần giải quyết, ch-ơng trình quản lý Khách sạn quản lý xử lý nhóm thông tin nh- sau: a Đối t-ợng quản lý: - Quản lý khách: Nắm đ-ợc thông tin cá nhân khách thuê phòng: + Đối với khách nội địa: Họ tên, địa chỉ, số CMND, điện thoại + Đối với khách quốc tế: Họ tên, số hộ chiếu, quốc tịch, điện thoại Nắm đ-ợc thông tin đoàn khách: Tên đoàn, đơn vị, địa chỉ, điện thoại, fax, tài khoản, mà số thuế tổ chức đơn vị Số l-ợng chi tiết vị khách đoàn - Quản lý phòng: Mỗi phòng cần quản lý thông tin: số phòng, loại phòng, giá phòng, ngày đăng ký, ngày nhận phòng, ngày trả phòng - Quản lý hàng hoá, dịch vụ, số l-ợng, giá, đặc điểm, nơi cung cấp, trình toán b Thiết kế giao diện để nhập nghiệp vụ khách sạn sau: * Đăng ký khách: Khách tr-ớc thuê phòng phải làm thủ tục ban đầu đăng ký phòng Trong mục nhân viên lễ tân cập nhật thông tin thông tin vào máy tính để quản lý nh- sau: - Đoàn khách: Mà số đoàn, tên đoàn, nagỳ nhận phòng dự kiến, số l-ợng phòng cần thuê, đơn vị Nếu đơn vị lần đầu thuê phải nhập thông tin đơn vị: Mà số đơnvị, tên Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh Sinh viên thực hiện: Đ-ờng Xu©n Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xây dựng chương trình QLKS theo mô hình Server/Client Visual Basic đơn vị, điện thoại, , ch-ơng trình cho phép truy tìm đơn vị đà l-u trú khách sạn tr-ớc Thông tin chi tiết đoàn khách đoàn: - Khách: nhập tên khách, mà số khách, số CMND, địa chỉ, hộ chiếu, quốc tịch khách Nếu khách cũ ch-ơng trình chủ động tìm thông qua khoá mà số, số CMND, tên, số hộ chiếu * Phân phòng: bố trí vị khách vào phòng, phòng nhiều khách * Thiết kế sơ đồ phòng * Quản lý phòng (xem thông tin phòng, đổi phòng, trả phòng, in hoá đơn) * Giao diện nhập dịch vụ cho khách * Quản lý khách đoàn * Quản lý việc toán tiền phòng dịch vụ * Tìm kiếm thông tin nhà hàng dịch vụ Mô hình quản lý Do đặc thù kinh doanh mình, khách sạn th-ờng đ-ợc chia làm phận: Khách sạn nhà hàng Khách sạn quản lý phòng dịch vụ kèm theo nh- điện thoại, fax, thuê xe, hội tr-ờng, Nhà hàng dùng để quản lý dịch vụ ăn uống, giặt là, Vị trí tác nghiệp hai phận khác t-ơng đối rõ rệt Trong phận quản lý chung phải quản lý bao quát toàn hoạt động hai phận ch-ơng trình quản lý khách sạn đ-ợc tổ chức theo mô hình Mẹ-Con thích hợp Mô hình gồm Server Client, sở liệu đ-ợc đặt phận quản lý đóng vai trò nh- mét Server cã néi dung lµ theo dâi vµ tổng hợp báo cáo số liệu tổng hợp báo cáo số liệu từ CSDL Bộ phận khách sạn Client dùng để cập nhật khách thuê phòng dịch vụ liên quan Bộ phận nhà hàng Client dùng để cập nhật dịch vụ ăn uống nhà hàng khác Giữa Server Client đ-ợc nối với mạng LAN sử dụng cáp thông qua Hub trung tâm Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 10 Sinh viên thực hiện: §-êng Xu©n Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiƯp: Xây dựng chương trình QLKS theo mô hình Server/Client baèng Visual Basic Exit Do Else MoveNext End If Loop Close End With Imgtim_Click End Sub ‘ -Private Sub Dcbdv_LostFocus() Dim tim As Boolean tim = False With DE.rsDichvu MoveFirst Do While Not (.EOF) If (.Fields("tendv") = Dcbdv.Text) Or (Dcbdv.Text = "") Then txtmadv.Text = Fields("madv") tim = True Exit Do Else MoveNext End If Loop If Not tim Then MsgBox "Không có dv naøy", vbCritical, "L-u ý" Dcbdv.SetFocus End If End With End Sub Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 62 Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chương trình QLKS theo mô hình Server/Client Visual Basic ‘ -Private Sub Dcbsoph_Click(Area As Integer) cmdchuyenphong.Enabled = True cmdchuyenkh.Enabled = True End Sub ‘ -Private Sub Dcbsoph_LostFocus() timsp = False With DE.rsPhong MoveFirst Do While Not (.EOF) If (.Fields("maphong") = Dcbsoph.Text) Or (Dcbsoph.Text = "") Then timsp = True Exit Do Else MoveNext End If Loop If Not timsp Then MsgBox "Không có phòng này", vbCritical, "L-u ý" Dcbsoph.SetFocus End If End With End Sub ‘ -Private Sub fgrid_Click() fgrid.Col = txttenkh.Text = fgrid.Text fgrid.Col = txtmadp.Text = fgrid.Text Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 63 Sinh viên thực hiện: Đ-ờng Xuân Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dựng chương trình QLKS theo mô hình Server/Client Visual Basic End Sub ‘ -Private Sub Form_Load() Dim i, j sdnut = False txtngay.Text = Date lbsp.Caption = sophong fgrid.Row = fgrid.ColWidth(0) = 0: fgrid.ColWidth(1) = 2500: fgrid.Col = 1: fgrid.Text = " Tên Khách hàng" fgrid.ColWidth(2) = 1300: fgrid.Col = 2: fgrid.Text = "CMND/HC" i=1 With DE.rsQsudungphong MoveFirst txttendoan.Text = Fields("tendoan") & " - " & Fields("tendonvi") If Fields("tentinh") "" Then txtdiachi.Text = Fields("tentinh") Else txtdiachi.Text = " " End If txtngaynp.Text = Fields("ngaynp") txtgionp.Text = Fields("gionp") Do While Not (.EOF) fgrid.Row = i fgrid.Col = 1: fgrid.Text = Fields("tenkh") fgrid.Col = 2: fgrid.Text = Fields("cmnd") fgrid.Col = 3: fgrid.Text = Fields("madp") MoveNext i=i+1 Loop Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 64 Sinh viên thực hiện: §-êng Xu©n Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiƯp: Xây dựng chương trình QLKS theo mô hình Server/Client baèng Visual Basic Close End With 'Lay thong tin ve sö dung dich vu’ Imgtim_Click End Sub ‘ -Public Sub SQLsddv(soph, mtenkh) st = "" st = st + "Select *" st = st + " From Qsudungdv" st = st + " Where maphong Like " + """" + soph + """" st = st + " and tenkh Like " + """" + mtenkh + """" End Sub ‘ -Public Sub SQLdv(soph, mtenkh) st = "" st = st + "Select *" st = st + " From Qsudungdv" st = st + " Where maphong Like " + """" + soph + """" st = st + " and tenkh Like " + """" + mtenkh + """" st = st + " and tendv " + """" + "Phßng" + """" End Sub ‘ -Public Sub SQLph(soph, mtenkh) st = "" st = st + "Select *" st = st + " From Qsudungdv" st = st + " Where maphong Like " + """" + soph + """" st = st + " and tenkh Like " + """" + mtenkh + """" st = st + " and tendv Like " + """" + "Phòng" + """" Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 65 Sinh viên thực hiện: §-êng Xu©n Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiƯp: Xây dựng chương trình QLKS theo mô hình Server/Client baèng Visual Basic End Sub ‘ -Private Sub Gridsddv_Click() cmdxoa.Enabled = True End Sub Private Sub imghien_Click() txttenkh.Text = "" Imgtim_Click End Sub ‘ -Private Sub Imgtim_Click() Dim mtenkh mtenkh = "%" + txttenkh.Text + "%" SQLsddv sophong, mtenkh DE.Commands.Item("Qsudungdv").CommandText = st Gridsddv.DataMember = "Qsudungdv" DE.rsQsudungdv.Close End Sub ‘ -Public Sub Chuyenphong() 'Update table phong With DE.rsPhong MoveFirst Do While Not (.EOF) If Fields("maphong") = Dcbsoph.Text Then Fields("CK") = End If If Fields("maphong") = lbsp.Caption Then Fields("CK") = End If Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 66 Sinh viên thực hiện: Đ-ờng Xuân Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dựng chương trình QLKS theo mô hình Server/Client Visual Basic MoveNext Loop End With ' -With DE.rsChuyentraphong Open MoveFirst Do While Not (.EOF) If Fields("maphong") = lbsp.Caption Then Fields("maphong") = Dcbsoph.Text End If MoveNext Loop Close End With lbsp.Caption = Dcbsoph.Text End Sub ‘ -Private Sub txtdongia_LostFocus() If Not IsNumeric(txtdongia.Text) Then MsgBox "Nhaäp sai kiểu liệu", vbCritical, "Lưu ý" txtdongia.SetFocus End If End Sub ‘ -Private Sub txtgiotra_Click() txtgiotra.Text = Time End Sub ‘ -Private Sub txtgiotra_LostFocus() Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 67 Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an §å ¸n tèt nghiƯp: Xây dựng chương trình QLKS theo mô hình Server/Client Visual Basic If Not IsDate(txtgiotra.Text) Then MsgBox "Nhập sai", vbCritical, "Lưu ý" txtgiotra.SetFocus End If End Sub ‘ -Private Sub txtngay_Click() txtngay.Text = Date End Sub ‘ -Private Sub txtngaytra_Click() txtngaytra.Text = Date End Sub ‘ -Private Sub txtngaytra_LostFocus() If Not IsDate(txtngaytra.Text) Then MsgBox "Nhap sai", vbCritical, "Luu y" txtngaytra.SetFocus End If End Sub ‘ -Private Sub txtsl_LostFocus() If Not IsNumeric(txtsl.Text) Then MsgBox "Nhap so luong khong dung kieu", vbCritical, "Luu y" txtsl.SetFocus End If End Sub Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 68 Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chửụng trình QLKS theo mô hình Server/Client Visual Basic Ch-¬ng III : KếT LUậN HƯớNG PHáT TRIểN I Kết luận Bằng việc xây dựng ch-ơng trình Quản Lý Khách sạn theo mô hình Server/Client, giúp cho phận nh- lễ tân, nhà hàng tự động hóa phần lớn công việc mình, làm tăng suất hiệu công việc Trên sở giúp ban giám đốc nhanh chóng kiểm tra, tổng hợp, lấy kết để nắm bắt đ-ợc diễn biến khách hàng, khả đáp ứng nhu cầu từ đề định, ph-ơng án kinh doanh kịp thời Tóm lại, nhờ h-ớng dẫn nhiệt tình thầy Lê Văn Minh cố gắng thân, ch-ơng trình Quản Lý Khách sạn đ-ợc hoàn thành, t-ơng đối đáp ứng đ-ợc nhu cầu cập nhật, truy vấn thông tin nhanh chóng giải đ-ợc việc tổ chức quán sở liệu l-u trữ thông tin Tuy nhiên ch-ơng trình nh-ợc điểm , thiếu sót cần đ-ợc hoàn thiện thời gian tới Em mong nhận đ-ợc góp ý Thầy Cô bạn quan tâm đến vấn đề II HƯớNG PHáT TRIểN Ngoài việc tiếp tục nâng cấp hoàn thiện ch-ơng trình Quản Lý Khách sạn Trong h-ớng tới, ch-ơng trình Quản Lý Khách sạn đ-ợc bổ sung để kết nối tự động bán tự động với ch-ơng trình kế toán Khách sạn nh- ch-a liên kết đ-ợc Ngoài ch-ơng trình xây dựng thêm phần quản lý sở vật chất, quản lý qui trình phục vụ buồng, phòng Khách sạn, quản lý công tác nhập xuất hàng phận Nhà hàng Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 69 Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chửụng trỡnh QLKS theo mô hình Server/Client Visual Basic MéT Sè BIểU MẫU IN RA GIấY CủA CHƯƠNG TRìNH QUảN Lý KHáCH SạN Bảng kê sử dụng dịch vụ nhà hàng khách cho phòng: BảNG KÊ DịCH Vụ Đà Sử DụNG Phòng: Loại: Ngày nhận phòng: Ngày trả: Tên dịch SL Đơn Stt Ngày sd Giờ sd Tên khách 10/06/03 17:10 Nguyễn V/ A Giặt ủi 2000 2000 12/06/03 8:12 Lê Đức Bình An sáng 3000 3000 12/06/03 14:30 Lê Đức Bình Thuê xe 3000 3000 vụ giá Thành tiền Cộng 8000 PhÝ dÞch vơ (5%) 400 Th VAT (10%) 880 Cộng tiền phải trả 9280 Lễ Tân Ngày in: 10:30:25am, 20/05/2003 Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 70 Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chửụng trình QLKS theo mô hình Server/Client Visual Basic Bảng kê chi tiết sử dụng dịch vụ nhà hàng đoàn: BảNG KÊ DịCH Vụ Đà Sử DụNG Tên đoàn khách: Đơn vị: Ngày nhận phòng:.Ngày trả: Số lượng khách theo đoàn:Số lượng phòng sd: Tên dịch Thành giá tiền Ngày sd Giờ sd SP Tên khách 10/06/03 17:10 101 Ngun V/ A GiỈt 2000 2000 12/06/03 8:12 102 Lê Đức Bình An sáng 3000 3000 12/06/03 14:30 102 Lê Đức Bình Thuê xe 3000 3000 Cộng 8000 Phí dịch vơ (5%) 400 Th VAT (10%) 880 Céng tiỊn ph¶i trả 9280 vụ SL Đơn Stt Lễ Tân Ngày in: 10:30:25am, 20/05/2003 Báo cáo công suất buồng: thống kê tổng số khách, tỉ lệ loại khách công suất buồng ngày tháng theo bảng: Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 71 Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chửụng trỡnh QLKS theo moõ hỡnh Server/Client baống Visual Basic BáO CáO CÔNG SUấT BUồNG THáNG : MM/20YY Phân loại khách Công Tổng số Ngày Đoàn VÃng lai Trong n-ớc Quốc tế suất buång Kh¸ch Sk % Sk % Sk % Sk % Sp % 10 25 40 100 0 25 60 … … 40 30 75 35 30 60 … … … … … … … … … … 30 31 TC Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 72 Sinh viên thực hiện: Đ-ờng Xuân Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dựng chương trình QLKS theo mô hình Server/Client Visual Basic Tổng hợp doanh thu: phòng, nhà hàng, dịch vụ ngày tháng BáO CáO TổNG HợP DOANH THU THáNG : MM/20YY NGàY KHáCH SạN NHà HàNG DÞCH Vơ CéNG … … … 30 31 Cộng Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 73 Sinh viên thực hiện: §-êng Xu©n Tr-êng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiƯp: Xây dựng chương trình QLKS theo mô hình Server/Client baống Visual Basic Báo cáo tổng hợp khách theo đoàn: thể doanh thu đoàn tháng BáO CáO TổNG HợP DOANH THU THáNG : MM/20YY KHáCH ĐOàN Ngày stt Doanh thu Đơ Tên đoàn n vị Cộn Nhậ Trả n Khách Nhà Dịch sạn hàng vô … … … g … … Tổng cộng: d/ In bảng kê chi tiết cho loại dịch vụ: liệt kê loại dịch vụ đà bán tháng theo bảng sau: BảNG KÊ CHI TIếT DOANH THU (Từ ngày đến ngày) TÊN DịCH Vụ: Ngày Dịch vụ Diễn giải Đvt Số Đơn l-ợng giá Thành tiền 1/5/03 1/5/03 2/5/03 Tổng cộng: Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 74 Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Đồ án tốt nghiệp: Xaõy dửùng chửụng trỡnh QLKS theo mô hình Server/Client Visual Basic Lêi c¶m ơn Qua thời gian thực tập Khách sạn B-u điện Cửa Lò, với nhiệt tình giúp đỡ anh chị em khách sạn, đặc biệt thầy giáo h-ớng dẫn Ths Lê Văn Minh , em đà hoàn thành đồ án tốt nghiệp với đề tài Quản lý Khách sạn B-u điện Qua đây, xin chân thành cảm ơn tới tập thể cán công nhân viên Khách sạn B-u điện Cửa Lò, thầy giáo Lê Văn Minh với thầy cô giáo, bạn khoa CNTT có chung niềm đam mê tin học đà góp ý bổ sung cho để tài Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn Giáo viên h-ớng dẫn: Ths Lê Văn Minh 75 Sinh viên thực hiện: Đ-ờng Xuân Tr-ờng C.33.44.55.54.78.65.5.43.22.2.4 22.Tai lieu Luan 66.55.77.99 van Luan an.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.C.33.44.55.54.78.655.43.22.2.4.55.22 Do an.Tai lieu Luan van Luan an Do an.Tai lieu Luan van Luan an Do an Stt.010.Mssv.BKD002ac.email.ninhd 77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77.77.99.44.45.67.22.55.77.C.37.99.44.45.67.22.55.77t@edu.gmail.com.vn.bkc19134.hmu.edu.vn.Stt.010.Mssv.BKD002ac.email.ninhddtt@edu.gmail.com.vn.bkc19134.hmu.edu.vn