酒店前台招聘信息

酒店前台招聘信息

职位描述/要求:

职位性质:全职 性别:男女不限 招聘人数:3人

学历要求:高中/中专以上学历 语言要求:流利标准的普通话、会听会讲广东方言 简历要求:中文 工作经验:两年以上

薪酬待遇:中专:基本工资:1500元/月;

大专:基本工资:1800元/月;

本科:基本工资:2100元/月;

福利:购买“五险一金”、伙食补贴、交通补贴、“五一、中秋、国庆”等国家传统节日额外增发奖金;

工作时间/假期:1天8小时制、每月轮休6天;

任职资格:

1、高中/中专以上学历、年龄在35周岁以下、身高1.6m以上;

2、身体健康、品貌端正、身材匀称、五官端庄、 普通话标准、会听会讲广东地方方言;

3、两年以上前台接待工作经验、办公软件操作熟练;

4、反映灵活、工作有热情、有耐心;

5、具有良好的服务意识和团队意识;

6、具有良好的沟通协调能力及服务意识、反应灵敏、举止文雅;

7、敬业乐业、具有较强的责任心和吃苦耐劳的职业素养。

岗位描述:

1、为客人办理住宿和离店手续,尽量落实宾客的特殊需求,安排客房并进行相关信息录入 ;

2、做好预定宾客抵店前的准备工作,并把已预定房留存起来;

3、负责客人换房、开门、留言、行李寄存、叫醒等服务;

4、处理其他临时性前台工作 ;

5、 掌握预定工作知识,必要时能办理预定当日房和他日订房,也要懂得取消预订的程序;

6、 了解客房位置,可出租房的类型和各种房价;

7、 管理好客房钥匙;

8、办理结账和离店手续;

9、做好行政楼层客人的接待工作;

10、把住店散客、团队发生的账单登入进客账,并管理好客账;

11、按准确步骤处理邮件包裹和留言;

12、每天阅读和记录交班记事本以及布告板,了解当天酒店内举办的各种活动和会议消息;

13、使用准确的电话礼仪;

14、了解有关安全和紧急事故处理程序,懂得预防事故的措施;

15、保持总台区域的清洁和整齐;

16、以规范的服务礼节,树立公司品牌优质,文雅的服务形象。

 

第二篇:VB酒店前台管理信息系统论文

目 录

摘 要 ........................................................... II

Abstract .......................................................... 1

第1章 绪论 ...................................................... 2

1.1 工作背景及开发意义 ...................................... 2

1.2 系统开发环境 ............................................ 3

1.2.1 Visual Basic简介 ................................... 3

1.2.2 ACCESS简介 ......................................... 4

1.2.3 面向对象技术 ........................................ 4

1.3 系统特性 ................................................ 5

第2章 系统分析 .................................................. 5

2.1 需求分析 ................................................ 5

2.2 系统功能分析 ............................................ 6

第3章 详细设计 ................................................. 10

3.1 登录模块设计 ........................................... 10

3.2 系统主界面的设计 ....................................... 12

3.3 系统管理模块设计 ....................................... 12

3.3.1 顾客预定房间模块的设计 ........................... 13

3.3.2 入住登记的设计 ................................... 13

3.3.3 客房信息管理的设计 ............................... 15

3.3.4 预定信息检索 ................................... 16

3.3.5 维修明细检索 ........................................ 17

3.3.6 登记信息检索 ........................................ 18

第4章 系统实施 ................................................. 18

4.1 系统实施环境 ........................................... 18

4.2 系统安装说明 ........................................... 19

第5章 系统维护和系统评价 ....................................... 21

5.1 系统维护 ............................................... 21

5.2 系统评价 ............................................... 22

结 论 ........................................................... 23 I

致 谢 ........................................................... 24

参考文献 ......................................................... 25

附录 ............................................................. 26

摘 要

现代化的酒店是集客房、餐饮、通讯、娱乐,商务文化及其他各种服务与设施为一体化的消费场所,酒店组织庞大,服务项目多,信息量大,要想提高劳动生产,降低成本,提高服务质量和管理水平,促进经济效益,必须借助计算机来进行现代化的信息管理。该系统是运用Microsoft ACCESS2000数据库和Microsoft Visual Basic6.0编程工具开发实现的。具有操作简单、界面友善、灵活性好、系统安全性高、运行稳定等特点,是酒店管理者的理想选择。

本论文包括六章内容,分别从绪论,系统分析,系统设计,详细设计,系统实施,系统维护和系统评价,总结介绍了本酒店管理系统的开发全过程。

关键词:酒店管理;数据;查询

II

Abstract

The modernized hotel is the collection guest room, the dining, the communic- ation, the entertainment, the commercial culture and other each kind of service and the facility for the integrated expense place, the hotel organization huge, service project many, the information content is big, must want to enhance the labor prod- uction, reduces the cost, improves the grade of service and the management level, the promotion economic efficiency, must draw support from the computer to carry on modernized the information management. This system is utilizes Microsoft SQLserver2000 database and Microsoft Visual Basic6.0 development kit develop- ment realization,"Hotel Management system management system" has included the system administration subsystem, the storehouse management subsystem, the establishment management subsystem, the statistical analysis subsystem, the infor- mation print subsystem, the system maintenance subsystem and so on six big mo- dules, has the operation simply, the contact surface friendly, the flexibility good, the system security is high, moves steadily grades the characteristic, is the hotel superintendent's ideal choice.

This text includes seven parts. It introduces the aviation company managem- ent information system’s developing completed procedure from the system’s intro- duction and necessary of developing, the theory base of system’s development, the system’s an hotel management, the system’s designing, the system’s practice,kee- ping and prospect .

Key words:Hotel Management;Data; Obje

1

第1章 绪论

1.1 工作背景及开发意义

近年来,随着改革开放步伐的加快和中西方文化的交流与发展,我国人民生活水平显著提高,全社会对餐饮业的需求量也越来越大,伴随着消费的持续增长,酒店行业已经成为现代社会中发展最快的行业之一。要想在激烈的市场竞争中生存,就必须在经营管理、餐饮服务等方面提高管理意识。而对酒店的经营状况起决定作用的是对酒店日常营业的管理。另外,餐饮行业具有管理复杂、货品繁多、菜品多样、价格多变、折扣灵活、现金量大以及报表需求复杂多样等特点。如何用先进的管理手段,提高酒店的管理水平,是每一家酒店的经营者所面临的重要课题。

所以应势而出的酒店管理系统有着很好的可行应用性。一直以来人们都采用传统人工的方式管理账单以及菜表,这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了很多的困难,同时,也加大了管理者的工作量和工作难度。本系统很好的克服了这些缺点,并且有检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等优点。这些优点能够极大地提高宾馆管理的效率,也是宾馆的科学化、正规化管理,与世界接轨的重要条件。

系统以ACCESS作为后台数据库,Visual Basic 6.0为前台开发工具,运用自顶向下逐层分解的模块化结构设计思想、面向对象的设计方法,完成了酒店管理系统的主要模块。

2

1.2 系统开发环境

1.2.1 Visual Basic简介

Microsoft Visual Basic(简称VB)是在原有的BASIC语言的基础上进一步发展,至今已包含了数百条语句、函数和关键词。无论对专业人员还是初学者,Visual Basic都提供了整套开发工具,可以说它是开发Windows应用程序最迅速、最简捷的方法。英文Visual的意思是“视觉的”,“可视的Basic”这个名字可能抽象了点,但实际上它却是最直观的编程方法,之所以叫做“可视”,你只要看到VB的界面就会明白,实际上你无需编程,就可以完成许多步骤。在VB中引入了控件的概念,在Windows中控件的身影无处不在,各种各样的按钮、文本框、无线钮,都是控件的种类,VB把这些控件模式化,并且每个控件都有若干属性用来控制控件的外观,工作方法。这样你就可以像在画板上一样,随意点几下鼠标,一个按钮就完成了,这些在以前的编程语言下是要经过相当复杂的工作的。“Basic”指的是BASIC语言,因为VB是在原有的BASIC语言的基础上发展起来的。

Visual Basic是在Basic语言的基础上发展而来的,是在Windows环境中广泛应用程序开发工具。Visual Basic功能强、效率高、易学习,无论是专业人员,还是非专业人员,都可以很容易地掌握Visual Basic。

Visual Basic最大的两个特点是“可视化”和“事件驱动”。“可视化程序设计”是指开发图形用户界面(GUI)的一种方法,用这种方法,程序员不用编写大量代码去描述界面元素的外观和位置,而只是把预先建立的界面元素(如文本 3

框、命令按钮或更复杂的控件等)用鼠标拖放到屏幕上的适应位置即可。“事件驱动”是指Windows应用程序的运行是通过事件来驱动的,用户或系统触发了一个事件,就执行程序员在此事件中编写的一段代码。

1.2.2 ACCESS简介

Access 是微软公司推出的基于Windows的桌面关系数据库管理系统(RDBMS),是Office系列应用软件之一。它提供了表、查询、窗体、报表、页、宏、模块7种用来建立数据库系统的对象;提供了多种向导、生成器、模板,把数据存储、数据查询、界面设计、报表生成等操作规范化;为建立功能完善的数据库管理系统提供了方便,也使得普通用户不必编写代码,就可以完成大部分数据管理的任务。

1.2.3 面向对象技术

面向对象方法是软件工程方面的重要成就之一,它吸收了传统方法的数据抽象﹑信息隐蔽﹑模块化等思想,强调以对象作为问题分析﹑系统设计的主体,使软件系统与客观世界之间有自然的对应关系。面向对象方法按照人们习惯的思维方式建立问题的模型和构造系统,使软件系统更易于理解和维护,它的继承和多态等技术为软件复用和扩充创造了条件。面向对象程序设计把数据和程序(代码)封装在一个对象中,数据称为对象的状态,程序称为对象的行为。对象的状态是该对象定义的属性的值的集合,行为是代码的集合。面向对象程序设计要求通过定义在对象行为上的界面对该对象传递信息来激活行为。应用 4

面向对象的程序设计方法,用户只需编写很少的代码,使开发工作变得简单。

1.3 系统特性

1.实用性原则

本系统是以宾馆管理为基础开发的通用宾馆管理系统,适合中、小宾馆企业的使用。

2.可靠性原则

本系统有较高的可靠性,在系统设计及程序设计上也考虑到了系统可靠性。

3.可扩充性原则

本系统在系统的功能,结构方面具有可扩充性。以便适应企业以后发展的需要,做出相应的功能结构上的调整。

4.经济性原则

本系统注重系统的性价比,时刻为用户着想,在同等功能的基础上尽可能的减少企业的投入。

第2章 系统分析

系统分析的目的是要明确应用系统应该实现的目标,即所有的功能。系统分析的结果就是系统设计的基础。

2.1 需求分析

需求分析是数据库系统开发的第一步也是最重要的一步,是软件需求的完整陈述,是开发者和用户对最终软件产品的功能和性能等方面达成的共识。一个分析充分,理解准确,书写清晰,可读性好的需求分析是软件工作人员制作高质量,高效率软件的可靠保证。研究表明,需求阶段的错误如果不能及时得 5

到纠正,将在后续阶段造成巨大代价。错误发现的越晚,代价就越高对于酒店管理系统也不例外。

以往的酒店管理都是以人工的方式进行菜单的管理,利用人工结账和报表、账单的统计工作,这样做不仅工作效率不高而且很容易出错,基于上述种种弊端,要求有一个合理而有效的计算机管理系统对酒店的日常情况进行管理。这个系统必须能够完成日常手工能完成的各项操作,并且把顾客开台点菜、结账、营业额统计、查询打印报表连接成一个有效的数据库管理系统,相互制约,避免手工操作出现的漏洞和错误,达到对酒店高效合理的管理。因此,为了提高工作效率,开发一个酒店管理系统既是可行的又是适应现代化管理的需求。

2.2 系统功能分析

经过对此项目的需求分析,本酒店管理系统需要完成的功能主要有:

1、主管理界面:房态图、押金交结图;

2、基本业务:预定、入住、续房、结账、维修;

3、基本信息:客房信息、团体信息、会员信息;

4、查询统计:预定单查询、客房消费查询、维修明细表、日报表查询及打印;

5、系统设置:用户设置、用户权限设置、密码设置、用户查询。

登录系统后进入主界面如图。在系统功能设计中,系统维护功能主要有添加用户,删除用户,和管理员密码修改,所示。只有管理员用户才有权限进入本界面。添加、删除用户是在数据表用户信息表中添加和删除用户及权限。初始管理员用户和密码都为admin。管理员密码数据库的用户信息表项里。代码实现请参考附录程序源代码。

6

添加用户:在用户名称中输入要添加用户的名,原始密码为12345,可以修改,之后点添加。完毕。如果系统已经添加的该用户,系统自动提示,重新添加。

删除用户:选中要删除的用户,直接点删除、系统有提示是否真的删除,点是,就删除了此用户。

用户密码修改:普通和管理员用户的密码修改。

修改密码:在旧密码输入你的登录密码,在新密码中输入新密码,在新密码核实中再输入一次新密码。之后点修改。系统提示。操作已成功!。这样下一次再进入本系统时本用户的密码就改为新密码。其中密码数据用户信息表中姓名和密码字段对应的记录。代码实现请参考附录程序源代码。

2.3 功能模块图

VB酒店前台管理信息系统论文

7

2.4 E-R图

VB酒店前台管理信息系统论文

8

2.5 数据流程图

该过程的流程图如下图:

VB酒店前台管理信息系统论文

9

第3章 详细设计

详细设计阶段的根本目标是确定应该怎样实现所需要的系统,也就是说,经过这个阶段的设计工作,应该得出目标系统的精确描述,从而在编码阶段可以把这个描述直接翻译成用某种程序语言书写的程序。

详细设计阶段的任务还不是具体的编写程序,而是要设计出程序的“蓝图”,以后程序员将根据这个蓝图写出实际的程序代码。系统设计的总体任务是实现酒店各种信息的系统化、规范化、和自动化。因此,详细设计的结果基本上决定了最终的程序代码的质量,考虑程序代码的质量是必须注意的,程序的“读者”有两个,那就是计算机和人。

在软件的生存周期中,设计测试方案,诊断程序错误,修改和改进程序等等都必须首先读懂程序,实际上对于长期使用的软件程序而言,人读程序的时间可能要比写程序的时间还要长很多。因此,衡量程序的质量不仅要看它的逻辑是否正确,性能是否满足要求,更主要的是要看它是否易于阅读和理解。详细设计的目的不仅是逻辑上正确的实现每个模块的功能,更重要的是设计出的处理过程应该尽可能的简明易懂。

3.1 登录模块设计

为了保证系统的安全,保证只有管理权的用户才能正常使用和操作系统,登录过程的设计必不可少。

本系统是通过ADO连接访问数据库用户表中的“用户名”和“密码”来登录。在系统登录界面中,使用了ListView控件以大图标的方式显示操作员,使得界面更形象、更直观。如果在权限设置中设置了操作员,那么就会在此界面 10

中显示操作员的名称,双击所选择的操作员图标就会将所选择的操作员姓名添加到“用户名”文本框中,然后在输入该用户名的登录口令后,按下〈Enter〉或者点击[确定]按钮即可登录系统。

登录的数据流程如图4-1所示:

登录窗体的设计界面如图4-2所示:

VB酒店前台管理信息系统论文

11

3.2 系统主界面的设计

在主界面的窗体中加入了一个Label控件、一个Toolbar控件、一个 ImageList控件、一个Adodc控件和十个Check控件,通过系统菜单和Toolbar控件按钮来控制和调用其他子程序完成相关的操作。

由于程序中对数据库连接的连接串是整个程序共用的,所有窗体都是用它连接数据源,而且还有一些跨窗体的变量,所以在此我在“工程”→“添加模块”菜单中添加一个公共的模块来存放这些全局变量。

设置ODBC数据源完毕后,要使用ADO连接数据源,因此在“工程”菜单中的“引用”子菜单,进入引用窗体,选中其中的“Microsoft Active Data Objects 2.0 Library”项,单击“确定”按钮。ADO引用完毕。

3.3 系统管理模块设计

系统管理模块下主要实现顾客预定、入住登记、预定信息查询、登记信息

VB酒店前台管理信息系统论文

12

检索、维修明细检索等功能。是本系统的核心。

3.3.1 顾客预定房间模块的设计

在系统主界面中单击[点菜管理]按钮,进入到点菜管理窗口中,首先要选中的一个房间,然后单击[预定]按钮,进入到顾客预定设置窗体中,在窗体中输入顾客姓名和人数之后,单击[预定]按钮,系统自动填入房房间信息。现在房间已经成功地完成了房间操作。如图4-4所示:

VB酒店前台管理信息系统论文

3.3.2 入住登记的设计

接下来顾客就可以进行入住登记操作了。入住登记操作的设计如图4-5所示:

13

在窗体中填完所需信息之后,单击[确定]按钮来完成对所选入住登记的操作。

VB酒店前台管理信息系统论文

14

3.3.3 客房信息管理的设计

在主界面中单击[客房信息管理]按钮,就可以进入到客房信息管理的窗体中了。 如图4-8所示:

图4-8 顾客结账窗体的设计

15

3.3.4 预定信息检索

VB酒店前台管理信息系统论文

16

3.3.5 维修明细检索

VB酒店前台管理信息系统论文

17

3.3.6 登记信息检索

VB酒店前台管理信息系统论文

第4章 系统实施

在管理信息系统中的生命周期中,经过系统规划、系统分析和系统设计阶段后,便开始系统实施阶段。系统实施阶段要继承以前各阶段的工作成果,将技术设计转化为物理实现。系统实施的主要内容包括物理系统的实施,程序设计与调试,项目管理,人员培训,数据准备与录入,系统转换和评价等。系统实施作为系统的最后物理实现阶段,对于系统的质量、可靠性、可维护性等有着十分重要的影响。

4.1 系统实施环境

本酒店管理系统实施的环境如下:

18

1.硬件运行环境要求:

本系统要求计算机配置有Pentium 90MHz或更高档次的微处理器,或任何运行Microsoft Windows NT Workstation的Alpha处理器,内存64兆以上。 操作系统:windows98或者以上版本。

2.软件要求:

安装有ACCESS和 Visual Basic6.0软件的计算机。

4.2 系统安装说明

酒店管理系统的安装说明:

1.酒店管理系统的文件夹复制到桌面。

2.在ACCESS 的查询分析器中打开该文件夹中的SQL,其路径为D:\Documents and Settings\Administrator\桌面\毕业设计\酒店管理系统\SQL\Data_jdgl.,运行它将建立名为data_jdgl的数据库。

在ODBC中建立数据源,并将其连接。

(1)单击“控制面板”/“管理工具”/“数据源ODBC(32位)”,打开“ODBC数据源管理器”对话框。

(2)单击“用户DSN”选项卡,在此选项卡中单击“添加”按钮,打开“创建数据源”对话框,在此对话框中选定“ACCESS”选项,然后单击“完成”按钮,打开“创建到ACCESS的新数据源”对话框。

(3)在“创建到ACCESS的新数据源”对话框中的“名称”文本框中输入数据源名称“jdgl”;在“服务器”列表中选择或输入服务器名称。

(4)单击“下一步”按钮,在“Microsoft ODBC ACCESS DSN配置”对话框 19

中,选择“使用用户输入登录ID和密码的ACCESS验证”选项;“登录ID”文本框输入“sa”;“密码”文本框为空,然后单击“下一步”按钮。

(5)在“Microsoft ODBC ACCESS DSN配置”对话框中,勾选“更改默认的数据库为”,然后在列表中选择“Data_jdgl”数据库。

(6)单击“下一步”按钮,然后在弹出的对话框中再单击“完成”按钮。 至此,ODBC就配置成功了。

运行酒店管理系统.exe文件,则该酒店管理系统软件安装成功,即可应用。

20

第5章 系统维护和系统评价

5.1 系统维护

新系统在正式投入正常运行后,为了让管理信息系统长期高效地工作,必须加强对管理信息系统运行的日常管理。系统的维护目的是保证它的正常而可靠地运行,并能使系统不断得到改善和提高,以充分发挥作用。因此系统维护就是为了保证系统中的各个要素随着环境的变化始终处于最新的,正确的工作状态之中,即系统维护是信息系统可靠运行的重要技术保障,我们必须给予充分的重视。

系统维护工作的内容按维护对象的不同可以分为:系统应用程序的维护,数据维护,代码维护和硬件设备维护。按维护的类型分为:纠错性维护,适应性维护,完善性维护和预防性维护。

对于本酒店管理系统的维护。我们不仅要注意工作环境和设施的管理,更主要的是对系统每天运行状况,数据输入和输出情况,以及系统的安全与完备性及时如实记录和处置。这些工作主要由系统运行值班人员来完成。系统运行的日常维护管理包括数据收集,数据整理,数据录入及处理结果的整理与分发,硬件的简单维护及设施管理。酒店管理系统的运行情况能反映出系统在大多数情况下的状态和工作效率,对于系统的评价与改进具有重要的参考价值。因此,在此系统的运行情况是一定要及时,准确,完整地记录下来,不但要记录正常情况,还要记录意外情况发生时间,原因和处理结果。

21

5.2 系统评价

管理信息系统投入运行后,要在平时运行管理工作的基础上,定期地对其运行状况进行集中评价。进行这项工作的目的是通过对新系统运行过程和绩效的审查,来检查新系统是否达到了预期目的,是否充分利用了系统内各种资源(包括计算机硬件资源,软件资源和数据资源),系统的管理工作是否完善,以及指出系统改进和扩展的方向是什么等。系统评价的主要依据是系统日常运行记录和现场实际监测数据。评价的结果可以做为系统改进的依据。通常,新系统的第一次评价与系统的验收同时进行,以后每隔半年或一年进行一次。参加首次评价工作的人员有系统研制人员,系统管理人员,用户,用户领导和系统外专家。以后各次的评价工作主要是系统管理人员和用户参加。

系统的评价的内容包括:

(1)对信息系统的功能评价

(2)对现有硬件和软件的评价

(3)对信息系统的应用评价

(4)对信息系统的经济效益评价

22

结 论

经过十几周紧张而充实的毕业设计后,我的课题——酒店管理系统也即将完成,在这里我对我的这次毕业设计做个总结。

通过这次的毕业设计,使我认识到了在开发系统前,一定要按照软件工程的要求按以下几步进行:可行性研究、需求分析、总体设计、详细设计、测试和维护。对于每一个阶段应完成的任务,应注意的一些问题一定要有一个很深的了解,否则软件的开发将存在很大的困难。软件开发是一项严肃而艰苦的工作,做到十全十美很难,但应尽量减少由于疏忽和考虑不周到而带来的不足。并且,在计算机软件这个行业中,由于科技的发展和知识的更新速度太快,所以,怎样抓住有限的时间学习更多更好的技能也是我们值得考虑的问题。经过四年的理论学习结合实践的演练,使我获益匪浅。

当然,由于个人的经验不足,我所完成的酒店管理系统虽然可以完成基本的酒店管理功能,但是还有很多不足,很多方面有待改进完善。而且在本系统中,界面的设计也并不是那么美观,代码的编写也有很多不尽人意的地方,这都需要以后不断的学习和改进。

在这次毕业设计中,在库连接及代码编程方面遇到了很多的问题,也走了不少的弯路,但通过指导老师的细心指导,不仅很快解决了问题,也使我锻炼了自己的动手能力,熟练了一门编程语言,了解了一个软件的整个制作过程,无论从知识方面、专业素质方面及自身人文素质方面都有了很大的提高。这将在日后的工作中给我很大的帮助。

23

致 谢

毕业设计即将结束,通过这两个多月的学习实践,我的实际动手能力有了很大幅度的提高,也对我在大学所学的知识进行了一次综合的检验。在这里我要感谢这四年来所有关心我,帮助我和支持我的老师和同学。

首先,感谢我的指导老师,他严谨的治学,渊博的专业知识,认真的态度给我留下了极为深刻的印象。在我整个的设计过程中,指导老师在教授我大量的知识的同时,还给予我各方面无私的帮助,让我的毕业设计很顺利的完成了。在此谨向指导老师表示我最由衷的感谢和敬意。

同时,也感谢校领导和实验室的老师给我们的关心和帮助,使我能在良好的环境中安心学习。也要感谢四年来教导我的所有老师,谢谢他们的教导和帮助。

其次,要感谢图书馆的所有老师。谢谢他们为我在毕业设计期间查阅资料提供方便,让我充分的阅读了大量的文献资料,为这次毕业设计的圆满完成奠定了坚实的基础。

最后,我要感谢同班同学对我的鼓励和帮助。

24

参考文献

[1] 张巍.VB应用系统开发.人民邮电出版社,2001:20-41

[2] 郭瑞军.VB数据库系统开发实例.电子工业出版社,2004:32-56

[3] 孙越.VB数据库开发自学教程.人民邮电出版社,2002:11-34

[4] 李鸿吉.VB编程方法详解.科学出版社,2004:22-41

[5] 段兴.VB实用程序设计100例.人民邮电出版社,2002:56-72

[6] 曹青.VB程序设计教程.机械工业出版社,2003:65-88

[7] 李青.VB编程实例入门与提高.电子工业出版社,2004:36-56

[8] 董传银.VB数据库编程技术.北京希望电子出版社,2005:5-12

[9] 韩亚平.VB基础培训百例.机械工业出版社,2002:89-96

[10] 刘滔.VB6.0数据库系统开发范例.人民邮电出版社,2003:45-60

[11] 皱建.ACCESS开发与管理应用实例.人民邮电出版社,2002:17-33

[12] 余金山.ACCESS开发实例入门与提高.电子工业出版社,2001:45-56

[13] 张晓辉.SQL2000管理及应用系统开发.人民邮电出版社出版,2003:15-33

[14] 徐国智.ACCESS数据库开发实例精粹.电子工业出版社,2003:67-80

[15] 唐学忠.ACCESS数据库教程.电子工业出版社,2004:43-59

[16] 宋坤.ACCESS数据库开发实例解析.机械工业出版社,2004:21-42

[17] 刘晓华.ACCESS 数据库应用开发.电子工业出版社,2002:22-67

[18] 赵松涛.ACCESS数据库系统管理实录.电子工业出版社,2002:99-120

[19] 周立柱.ACCESS数据库原理设计与实现.清华大学出版社,2001:77-111

[20] 张海建.ACCESS管理与应用.中国电力出版社出版,2004:65-81 25

附录

VERSION 5.00

Object = "{0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0"; "MSHFLXGD.OCX" Begin VB.Form frmLook

ClientHeight = 5640

ClientLeft = 60

ClientTop = 345

ClientWidth = 9000

Icon = "frmLook.frx":0000

LinkTopic = "Form1"

ScaleHeight = 5640

ScaleWidth = 9000

StartUpPosition = 1 '所有者中心

Begin VB.TextBox Text1

BeginProperty Font

Name = "宋体"

Size = 12

Charset = 134

Weight = 400

Underline = 0 'False

Italic = 0 'False

Strikethrough = 0 'False

EndProperty

Height = 375

Left = 1440

Locked = -1 'True

TabIndex = 3

Top = 5160

Width = 735

End

Begin VB.CommandButton Command1

Caption = "确定"

26

Height = 375

Left = 7560

TabIndex = 1

Top = 5160

Width = 735

End

Begin MSHierarchicalFlexGridLib.MSHFlexGrid MSHFlexGrid1 Height = 5055

Left = 0

TabIndex = 0

Top = 0

Width = 9015

_ExtentX = 15901

_ExtentY = 8916

_Version = 393216

FixedCols = 0

AllowUserResizing= 3

_NumberOfBands = 1

_Band(0).Cols = 2

End

Begin VB.Label Label1

AutoSize = -1 'True

Caption = "共有记录条数:"

Height = 180

Left = 120

TabIndex = 2

Top = 5280

Width = 1170

End

End

Attribute VB_Name = "frmLook"

Attribute VB_GlobalNameSpace = False

Attribute VB_Creatable = False

27

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Unload Me

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Unload Me

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Unload Me

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Unload Me

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Unload Me

End Sub

Private Sub Form_Load()

On Error GoTo Err

Dim rs2 As New ADODB.Recordset

If rs2.State Then rs2.Close

rs2.Open "select * from " & strLook, CN, adOpenStatic, adLockOptimistic

Set MSHFlexGrid1.DataSource = rs2

MSHFlexGrid1.Refresh

Text1.Text = MSHFlexGrid1.Rows - 1

frmLook.Caption = strLook

Exit Sub

28

Err:

MsgBox Err.Description

Unload Me

End Sub

Private Sub Form_Resize()

On Error GoTo Err

MSHFlexGrid1.Top = 0

MSHFlexGrid1.Left = 0

MSHFlexGrid1.Width = Me.ScaleWidth

MSHFlexGrid1.Height = Me.ScaleHeight - 600

Label1.Top = MSHFlexGrid1.Height + 100

Text1.Top = Label1.Top

Command1.Top = Label1.Top

Command1.Left = Me.ScaleWidth - 2000

Err:

End Sub

VERSION 5.00

Object = "{0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0"; "MSHFLXGD.OCX" Begin VB.Form frmLook

ClientHeight = 5640

ClientLeft = 60

ClientTop = 345

ClientWidth = 9000

Icon = "frmLook.frx":0000

LinkTopic = "Form1"

ScaleHeight = 5640

ScaleWidth = 9000

StartUpPosition = 1 '所有者中心

Begin VB.TextBox Text1

BeginProperty Font

29

Name = "宋体"

Size = 12

Charset = 134

Weight = 400

Underline = 0 'False

Italic = 0 'False

Strikethrough = 0 'False

EndProperty

Height = 375

Left = 1440

Locked = -1 'True

TabIndex = 3

Top = 5160

Width = 735

End

Begin VB.CommandButton Command1

Caption = "确定"

Height = 375

Left = 7560

TabIndex = 1

Top = 5160

Width = 735

End

Begin MSHierarchicalFlexGridLib.MSHFlexGrid MSHFlexGrid1 Height = 5055

Left = 0

TabIndex = 0

Top = 0

Width = 9015

_ExtentX = 15901

_ExtentY = 8916

_Version = 393216

FixedCols = 0

30

AllowUserResizing= 3

_NumberOfBands = 1

_Band(0).Cols = 2

End

Begin VB.Label Label1

AutoSize = -1 'True

Caption = "共有记录条数:"

Height = 180

Left = 120

TabIndex = 2

Top = 5280

Width = 1170

End

End

Attribute VB_Name = "frmLook"

Attribute VB_GlobalNameSpace = False

Attribute VB_Creatable = False

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Unload Me

End Sub

Private Sub Form_Load()

On Error GoTo Err

Dim rs2 As New ADODB.Recordset

If rs2.State Then rs2.Close

rs2.Open "select * from " & strLook, CN, adOpenStatic, adLockOptimistic

Set MSHFlexGrid1.DataSource = rs2

MSHFlexGrid1.Refresh

Text1.Text = MSHFlexGrid1.Rows - 1

frmLook.Caption = strLook

31

Exit Sub

Err:

MsgBox Err.Description

Unload Me

End Sub

Private Sub Form_Resize()

On Error GoTo Err

MSHFlexGrid1.Top = 0

MSHFlexGrid1.Left = 0

MSHFlexGrid1.Width = Me.ScaleWidth

MSHFlexGrid1.Height = Me.ScaleHeight - 600

Label1.Top = MSHFlexGrid1.Height + 100

Text1.Top = Label1.Top

Command1.Top = Label1.Top

Command1.Left = Me.ScaleWidth - 2000

Err:

End SubVERSION 5.00

Object = "{0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0"; "MSHFLXGD.OCX" Begin VB.Form frmLook

ClientHeight = 5640

ClientLeft = 60

ClientTop = 345

ClientWidth = 9000

Icon = "frmLook.frx":0000

LinkTopic = "Form1"

ScaleHeight = 5640

ScaleWidth = 9000

StartUpPosition = 1 '所有者中心

Begin VB.TextBox Text1

BeginProperty Font

Name = "宋体"

32

Size = 12

Charset = 134

Weight = 400

Underline = 0 'False

Italic = 0 'False

Strikethrough = 0 'False

EndProperty

Height = 375

Left = 1440

Locked = -1 'True

TabIndex = 3

Top = 5160

Width = 735

End

Begin VB.CommandButton Command1

Caption = "确定"

Height = 375

Left = 7560

TabIndex = 1

Top = 5160

Width = 735

End

Begin MSHierarchicalFlexGridLib.MSHFlexGrid MSHFlexGrid1 Height = 5055

Left = 0

TabIndex = 0

Top = 0

Width = 9015

_ExtentX = 15901

_ExtentY = 8916

_Version = 393216

FixedCols = 0

AllowUserResizing= 3

33

_NumberOfBands = 1

_Band(0).Cols = 2

End

Begin VB.Label Label1

AutoSize = -1 'True

Caption = "共有记录条数:"

Height = 180

Left = 120

TabIndex = 2

Top = 5280

Width = 1170

End

End

Attribute VB_Name = "frmLook"

Attribute VB_GlobalNameSpace = False

Attribute VB_Creatable = False

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Unload Me

End Sub

Private Sub Form_Load()

On Error GoTo Err

Dim rs2 As New ADODB.Recordset

If rs2.State Then rs2.Close

rs2.Open "select * from " & strLook, CN, adOpenStatic, adLockOptimistic

Set MSHFlexGrid1.DataSource = rs2

MSHFlexGrid1.Refresh

Text1.Text = MSHFlexGrid1.Rows - 1

frmLook.Caption = strLook

Exit Sub

34

Err:

MsgBox Err.Description

Unload Me

End Sub

Private Sub Form_Resize()

On Error GoTo Err

MSHFlexGrid1.Top = 0

MSHFlexGrid1.Left = 0

MSHFlexGrid1.Width = Me.ScaleWidth

MSHFlexGrid1.Height = Me.ScaleHeight - 600 Label1.Top = MSHFlexGrid1.Height + 100 Text1.Top = Label1.Top

Command1.Top = Label1.Top

Command1.Left = Me.ScaleWidth - 2000 Err:

End Sub

35

相关推荐