计算机科学与技术论文格式.doc

编号： 本 科 毕 业 论 文题 目：基于ssh的科技项目审批系统 学 院：计算机科学与技术学院 专 业：计算机科学与技术 年级：2008级本科(蒙班) 姓 名：麦拉苏 指导教师：* 完成日期：2012年4月30日 内蒙古民族大学本科生毕业论文目 录中文摘要及关键字1英文摘要及关键词1引言21概述21.1 开发背景21.2 开发环境32系统分析与设计32.1系统功能分析32.2系统功能模块设计42.3数据库设计52.3.1数据库需求分析52.3.2数据库概念结构设计52.3.3数据库逻辑结构设计73系统实现123.1 系统启动界面123.2系统登录界面123.3主窗口界面123.4员工基本信息查询窗口133.5员工在做项目查询窗口133.6部门信息查询窗口133.7开发商信息查询窗口133.8设计院信息查询窗口143.9工程材料信息查询窗口143.10员工学历信息浏览窗口143.11职务信息浏览窗口153.12信息修改窗口153.13打印机设置窗口153.14报表打印窗口163.15密码修改窗口163.16系统使用说明窗口164系统编码174.1应用对象的open事件代码174.2登录窗口的事件代码174.3主窗口中菜单对象的事件代码184.4员工基本信息查询模块的代码194.5修改模块的代码274.6报表打印模块的代码27结束语29参考文献30致谢3131摘 要本系统根据目前人员信息管理的特点，为其量身定做的人员管理软件。其介绍了人员管理系统的开发过程。该论文详细论述了从需求分析，系统分析，概要设计，详细设计，以及测试与调试的整个开发过程，在设计过程中最大限度地满足用户的要求。总结了开发过程中的结构及本系统今后的改进方向，遵循软件工程的方法。因此，该系统具有较强的实用性和针对性。本系统开发成功后可以实现对公司人员进行全方位的管理，功能包括信息查询，信息修改，报表打印，帮助等。采用面向对象的系统软件开发工具PowerBuilder 9.0，系统操作简单，维护性强，功能完备。关键词：开发过程；人员管理系统；创世威；PowerBuilder 9.0AbstractThis system is an administrant software according to the characteristics of the personal management. It introduces the development process of the personal management information system. The thesis discusses the need analysis, system analysis, essentials design, detailed design, test and the whole development process in details. In the course of designing, it meets the users need. Summarizes the strueture in the development and the improvement direction of this system. Follow the method of software engineering. So it has stronger practicability and pertinence. This system can realize the personal management all direction after it is developped. Its function includes information researched, information modification, report forms printed, help and so on. The developping tool is PowerBuilder 9.0. It is simple to operate, the maintainability is strong and the function is complete. Key Words: Development process; personal management information system; chuangshiwei; PowerBuilder 9.0引 言人员管理系统是集计算机技术、网络通信技术为一体的信息系统工程，它能够使企业运行的数据更加准确、及时、全面、详实，同时便于对各种信息的进一步加工；另外也有利于进一步加强企业管理的科学化、合理化、制度化、规范化。在目前的软件开发中，可以说，以数据为中心的信息管理系统是有前途的行业。随着信息产业的飞速发展，信息化管理已经引入并应用到各行业的管理领域，尤其是对于公司人员管理。现在的企业若想在激烈的市场经济中立足并胜出。就必须一套完善的且适合自身特点的信息化管理系统，以实现及时地反馈人员信息，完善服务质量，提高经济效益，分析市场需求，制定经营计划和目标等管理目的。信息管理的飞速发展对宾馆业既是一个机遇也是一个挑战，只有提高企业自身的生命力，与市场同行，才是企业正确的发展方向。实现一个公司人员信息化建设，除了必要的硬件设备外，还必须要有一个优秀的信息管理系统软件的支持。这个软件，首先，它的设计思路来源于一个成熟、清晰的业务流程；其次，它的运行依托于一套事先精心设计的计算机程序。不断地更新系统使之能够适应不同的环境，满足人员不断变化的需求和复杂的功能要求。针对以上要求，开发一个适合大多数公司管理人员的高效、可靠、易于维护，同时又能满足用户业务需求的人员管理系统软件。1 概述1.1 开发背景当今社会，是个高科技、高效率、高度竞争的全新社会。人员管理系统是现代人员管理的一个具体体现。目前，各公司规模越来越大，基于人工管理的方式已不再能适应当前繁重业务发展的需要。人员管理信息的日益庞大、复杂化，管理内容日益增多，使各人员管理者意识到计算机管理信息的重要性。为此，开发出一个适应现代化人员信息管理系统，以提高公司管理的效率。创世威科贸发展有限公司是北京市的一个新开业不久的公司，主要从事生产建筑材料，代理各种建筑材料。公司占地面积10000多平方米，建筑面积120000多平方米，现有职工100人。该公司有生产部门，销售部门，人事部门等。1.2 开发环境为解决人员管理中烦琐的新员工登记、人员查询、项目查询修改、材料查询修改等问题，本系统采用了PowerBuilder 9.0来开发，它有如下特点： 1).PowerBuilder是面向对象的数据库应用系统开发工具，它功能强大，可以开发客户/服务器（Client/Server）、分布式和因特网（Internet）等应用系统，支持交叉平台开发。 2).自带数据库操作更容易，与数据库的连接方便，简洁。 3).有功能强大的 PowerScript 语言及丰富的PowerScript函数，大大提高了系统的开发效率。 4).目前支持平台有：Windows 95/98/Me,Windows NT/2000,UNIX。 5).目前支持的数据库主要有：Sybase, MS SQL Server,DB2等。 6).完善的组件开发全面支持开放标准的组件，且支持团队开发。 7).灵活的联机帮助。2 系统分析与设计2.1 系统功能分析系统开发的总体任务是实现人员信息的系统化、规范化和自动化。针对这些，该人员管理信息系统所要完成的主要功能模块有：文件模块，主要有文件打开，保存，删除和退出系统等功能。信息修改模块，主要完成员工基本信息的信息、部门信息、职称信息、员工学历信息、员工在做项目信息、工程材料信息、开发商信息、设计院信息的输入、删除、保存功能。员工信息查询模块，主要完成公司员工基本信息的排序和查询。包括对员工号，员工姓名，性别，部门号，职务，籍贯，出生年月，民族，身份证号，婚否，学历，政治面貌，进入公司时间，联系电话，家庭住址等字段的查询。其它信息查询模块，主要完成公司各种信息表中数据的浏览，查询等信息管理功能。信息查询模块，由于添加了下拉列表框，查询信息时可按每个表的每个字段查询。这些表包括部门信息表，员工学历表，职务信息表，开发商信息表，设计院信息表，员工在做项目表，工程材料表。报表打印模块，主要完成各类数据报表的打印功能：用户在列表中选择报表名，数据窗口中便显示该报表的数据信息，单击“打印“按钮即可打印相应数据表的信息。可修改打印机设置。 关于模块，该模块对系统功能的做了整体的描述，可以使用户对系统功能一目了然。系统管理模块，该模块主要包括密码修改模块，系统使用说明模块。2.2 系统功能模块设计综合上述系统各项功能，对其进行集中，分块后，按照结构化程序设计的要求，得到图2.1所示的系统功能模块图。系统启动界面 主窗口界面系统登录界面 文件信息查询报表打印信息修改删除员工基本信息部门信息开发商信息密码修改系统使用说明关 于保存设计院信息退出打开工程材料信息员工在做项目表员工学历员工职务系统管理员工信息查询退出系统 图2.1系统功能模块图2.3 数据库设计2.3.1 数据库需求分析需求分析是数据库设计的第一个阶段，体现着用户的需求，使数据库结构能充分地满足各种信息处理的要求。2.3.2数据库概念结构设计由上面的系统功能可设计出满足用户需求的各种实体。信息实体有：客户入住登记，客房状态，房间预订，客户赔/买，客户留言以及退房结算信息实体。各个实体具体描述信息的E-R图如下，图2.2是员工基本信息实体E-R图。图2.3是部门信息实体E-R图。图2.4是员工学历信息实体E-R图。图2.5是员工在做项目信息实体E-R图。图2.6是工程材料信息实体E-R图。图2.7是开发商信息实体E-R图。图2.8是设计院信息实体E-R图。员工基本信息实体联系电话身份证号员工号部门号-姓名性别图2.2 员工基本信息实体E-R图部门信息实体部门名称部门号部门人数图2.3 部门信息实体E-R图员工学历信息实体毕业时间专业学历员工号毕业学校图2.4 员工学历信息实体E-R图员工在做项目信息实体员工姓名联系电话项目名称项目类型开工时间员工号图2.5 员工在做项目信息实体E-R图商品名称货源商品编号单价数量工程材料信息实体图2.6 工程材料信息实体E-R图开发商信息实体拟建筑项目电话项目进程单位地址图2.7 开发商信息实体E-R图设计进度电话备注单位地址设计院信息实体图2.8 设计院信息实体E-R图2.3.3数据库逻辑结构设计1).创建Adaptive Server Anywhere数据库新建一个文件夹，命名为”liying”。在该文件夹下，打开PB应用程序，单击工具栏上的Database图标，打开数据库画板Database-0 Connections,依次展开ODB ODBC、Utilities节点，双击Create ASA Database 选项，弹出如1-1窗口，输入信息后，单击OK,即创建名为“mysource.db”的数据库。2).连接Adaptive Server Anywhere数据库(一)创建ODBC数据源单击DB Profile图标，在打开的窗口中，依次展开ODB ODBC、Utilities节点，双击ODBC Administor，在 ODBC数据源管理器窗口中，选择用户DSN,单击添加按钮，在 创建数据源窗口中选择Adaptive Server Anywhere8.0驱动程序，单击完成，在ODBC Configuration for Adapative Server Anywhere窗口的ODBC、Login、Database三个选项卡（如图2.10、2.11、2.12）中输入数据，单击确定后完成 “liying_odbc”数据源的创建。 图2.9 创建数据源窗口 图2.10 ODBC选项卡 图2.11 login选项卡 图2.12 database选项卡(二)创建数据库描述文件在Database Profiles窗口中选择ODB ODBC节点，单击New按钮，弹出Database Profile Setup-ODBC窗口，选择Connection,填入如图2.13所示的数据:用户密码为“sql”，输入完后选择Preview选项卡，单击Test connect，测试成功则弹出如2.14所示窗口，单击确定后，返回Database Profile Setup-ODBC窗口，刚刚建立的描述文件就显示在窗口中了。 图 2.13 用户密码界面 图2.14 测试成功窗口(三)连接数据库在Database Profiles窗口上，选择“liying”数据库描述文件，单击Connect按钮，完成数据库的连接。注：连接成功的数据库描述文件，会在该描述文件的图标前面打上“”标记。3).创建数据表单击Database图标，在展开的“liying”节点视图中，右击Tables选项,选择New Table，在数据库画板中定义新表的各字段的属性，完成定义后单击保存输入表名，完成表的创建。按照上述方法可创建的数据库表见表2.1-表2.8。分别为：员工基本信息表、部门信息表、职称信息表、开发商信息表、员工在做项目表、设计院信息表、工程材料信息表、学历信息表。表2.1 员工基本信息表字段名称字段类型字段大小小数位数索引是否为空员工号字符型15primaryNO姓名字符型 20 NO性别字符型 2 YES部门号字符型 3Foreign YES职务字符型 16 YES籍贯字符型 40 YES出生年月日期时间型 8 NO民族字符型 10 YES身份证号字符型 18 NO婚否字符型 4 NO学历字符型20NO政治面貌字符型10 YES进入公司时间日期时间型 8 YESEmail字符型 20 YES联系电话字符型 20 YES字段名称字段类型字段大小小数位 索引是否为空部门号字符型20PrimaryNO部门名称日期型NO部门人数字符型8YES表2.2 部门信息表表2.3 职称信息表 字段名称字段类型字段大小小数位 索引是否为空职位代号字符型13PrimaryNO职位名称日期型20YES职位权力字符型40YES表2.4 开发商信息表字段名称字段类型字段大小小数位数索引是否为空姓名（单位）字符型40NO地址字符型40YES电话字符型20YESEmail字符型20YES拟建筑项目字符型40YES项目进程字符型40YES备注字符型40YES表2.5 员工在做项目信息表字段名称字段类型字段大小小数位数索引是否为空员工号字符型15Primary NO姓名字符型 20 NO联系电话字符型20 YES项目名称字符型40NO所需商品编号字符型20商品名称字符型40项目类型字符型20 YES项目地址字符型40 YES占地面积数值型102 YES建筑面积数值型202 YES投入资金货币型202 YES开工时间时间型8 YES竣工时间时间型8 YES开发商字符型40 YES开发商电话字符型20 YES设计方字符型40 YES设计方电话字符型20 YES表2.6 设计院信息表字段名称字段类型字段大小小数位数索引是否为空姓名（单位）字符型20PrimaryNO地址字符型40YES电话字符型20YESEmail数值型102YES设计项目数值型202YES设计进度数值型202YES表2.7 工程材料信息表字段名称字段类型字段大小小数位数索引是否为空商品编号字符型20PrimaryNO商品名称字符型40YES货源字符型20YES单价数值型102YES数量数值型202YES总价数值型202YES订货时间时间型8YES到货时间时间型8YES表2.8 员工学历信息表字段名称字段类型字段大小小数位数索引是否为空员工号字符型15Primary NO学历字符型 20 NO专业字符型40 NO毕业时间日期型8 YES毕业学校字符型40 YES外语语种字符型20 YES 外语水平字符型20 YES4).浏览和输入数据 在数据库画板窗口中，右击要浏览的数据表，在弹出的快捷菜单中选择Edit Data菜单下的Grid命令，用鼠标拖动的方式浏览数据库表的数据。如果要输入数据，可右击窗口下部空白区域，选择Insert Row命令,完成后保存即可。注：要向数据库表中添加数据，则必须先为该数据库表建立一个主键（Primary），否则不能输入数据。5).创建工作空间和应用对象用PowerBuilder开发应用程序首先应建立工作空间，用它来管理应用程序。其步骤为：单击PowerBar上的New按钮打开新建对话框，单击Workspace选项卡中的Workspace图标,然后单击“确定”，输入新建的工作空间名称如:workspace1。工作空间管理的是目标，每个目标对应一个应用或应用程序，在建立应用程序目标时，将自动建立一个应用对象。其步骤为：单击上PowerBar上的New按钮打开新建对话框，单击Target选项卡中的Application图标，输入新建应用对象名称如：app1，完成应用对象的建立。注：每个应用程序都必须有一个应用对象，并且也只能有一个应用对象，它是应用程序的入口3 系统实现3.1 系统启动界面：该模块主要完成系统的载入功能(窗口类型为：Popup)。系统启动界面见图3.1。 图3.1 系统载入功能窗口3.2系统登录窗口：该模块的功能为：用户身份验证；系统登录。系统登录窗口见图3.2。图3.2 系统登录功能窗口3.3主窗口界面主窗口界面上有：标题栏 菜单栏，住宿管理、客房管理、客户查询、客户赔/买、报表打印、客户留言、退房结算和系统管理主菜单工具栏，有入住登记、客户查询、预订房间、客户赔/买、等工具图标 状态栏最大化、最小化和控制按钮，用于控制主窗口的大小变化。主窗口界面见图3.3。图3.3 系统主窗口界面3.4员工基本信息查询窗口：该模块主要完成与员工基本信息的排序和查询。员工基本信息查询窗口见图3.4。图3.4 员工基本信息查询窗口3.5员工在做项目查询窗口：完成员工在做项目信息的浏览，排序，查询等信息管理功能。员工在做项目查询窗口见图3.5。 图3.5 员工在做项目查询窗口3.6部门信息查询窗口：主要完成部门基本信息的查询功能。可按部门人数升序或降序查询。部门信息查询窗口见图3.6。 图3.6 部门信息查询窗口3.7开发商信息查询窗口：主要功能为对开发商信息表中的数据进行查询和浏览等管理功能。开发商信息查询窗口见图3.7。图3.7 开发商信息查询窗口3.8设计院信息查询窗口:主要完成设计院信息查询和浏览功能。设计院信息查询窗口见图3.8。 图3.8 设计院信息查询窗口3.9 工程材料信息窗口：主要完成工程材料信息表中信息的浏览和查询。工程材料信息窗口见图3.9。图3.9 工程材料信息窗口3.10员工学历信息浏览窗口：主要完成员工学历的查询和浏览功能。员工学历信息浏览窗口见图3.10。 图3.10 员工学历信息浏览窗口3.11职务信息浏览窗口：主要完成所有表单的插入，删除，保存功能。职务信息浏览窗口见图3.11。 图3.11 职务信息浏览窗口3.12信息修改窗口：主要完成所有表单的插入，删除，保存功能。信息修改窗口见图3.12。 图3.12 信息修改窗口3.13打印机设置窗口：主要完成打印机的基本设置。打印机设置窗口见图3.13。图3.13 打印机设置窗口3.14 报表打印窗口：主要完成被选报表的打印功能。报表打印窗口见图3.14。 图3.14 报表打印窗口3.15密码修改窗口：主要完成系统登录密码的更新操作功能。密码修改窗口见图3.15。图3.15 密码修改窗口3.16系统使用说明窗口；主要帮助用户熟悉系统各模块功能和使用方法。系统使用说明窗口见图3.16。图3.16 系统使用说明窗口4系统编码 4.1应用对象的open事件代码SQLCA.DBMS=”ODBC”SQLCA.AutoCommit=FalseSQLCA.DBParm=”ConnectString=DSN=qixuejiao;UID=dba;PWD=sql”Connect using SQLCA /连接系统默认的事务对象SQLCAopen(w_denglu) /打开系统启动窗口if SQLCA.SQLCODE0 then messagebox(“提示”,”连接数据库失败！”)end if4.2 登录窗口对象的事件代码cb_1.clicked()/定义两个变量string pass_word,usename/ Profile chuangshiweiSQLCA.DBMS = ODBCSQLCA.AutoCommit = FalseSQLCA.DBParm = ConnectString=DSN=qixuejiao;UID=dba;PWD=sql/连接数据库connect;/检索用户名和密码记录 SELECT 操作员表.用户名, 操作员表.密码 INTO :usename, :pass_word FROM 操作员表 WHERE 操作员表.用户名 = :sle_1.text ;/判断用户输入的用户名是否正确if sle_1.text= or sle_2.text= thenmessagebox(错误！,用户名或密码不能为空！,exclamation!,ok!,2)disconnect; /断开数据库连接elseif trim(usename)=trim(sle_1.text) and trim( pass_word)=trim(sle_2.text) thenopen(w_main)/打开系统主界面close(parent)/关闭登录窗口elsemessagebox(错误！,用户名或密码错误，请重新输入！,exclamation!,ok!,2)disconnect; /断开数据库连接end ifend if4.3 主窗口中菜单对象的事件代码m_文件.打开.clicked()string docname,namedinteger valuevalue=GetFileOpenName(选择文件,docname,named,All File(*.*),*.*)IF value=1 THEN FileOpen(docname)m_文件.删除.clicked()string docname,namedinteger value,retvalue=GetFileOpenName(选择文件,docname,named,All File(*.*),*.*)IF value=1 THEN ret=messagebox(删除,删除文件+named+?,question!,OKCancel!)if ret=1 then filedelete(docname)m_文件.保存.clicked()string docname,namedinteger valuevalue=GetFileSaveName( 选择文件,docname,named,All File(*.*),*.*)IF value=1 THEN commit; else rollback; end if m_文件.关闭系统.clicked()close(w_main)4.4 员工基本信息查询模块的代码cbx_1 . clicked()：/复选框（员工号）的clicked()代码if cbx_1.checked=true then if rb_1.checked=true then dw_1.setsort(#1 A)else dw_1.setsort(#1 D)end if dw_1.sort()end ifrb_1. clicked()的代码：/单选按钮（升序）的clicked()代码if cbx_1.checked=true then dw_1.setsort(#1 A) dw_1.sort()end ifrb_2. clicked()的代码：/单选按钮（降序）的clicked()代码if cbx_1.checked=true then dw_1.setsort(#1 D) dw_1.sort()end if/实现逐条查询功能dw_1.rowfocuschanged()事件的代码：/实现光标在不同行的滚动：string s1if currentrow1 thenm=m -1dw_1.scrolltorow(m) /转到上一条记录elsemessagebox(提示,这是第一个记录！) /弹出提示框end ifcb_2.click()的代码：int m,nn=dw_1.rowcount() /取得总行数m=dw_1.getrow() /取得当前行号if mn then /比较当前行号与总行数大小m=m+1dw_1.scrolltorow(m) /滚到下一行elsemessagebox(提示,这是最后一个记录！) /显示提示框end ifcb_2.click()的代码：/转到第一行记录dw_1.scrolltorow(1)cb_3.click()的代码：/转到最后一行记录int nn=dw_1.rowcount()dw_1.scrolltorow(n)cb_3.click()的代码：/查询按钮的click()事件string newsqlstring whatif ddlb_3.text=员工号 thenif ddlb_3.text=员工号 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=员工号 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 员工号=+trim(sle_2.text)+ elseif ddlb_3.text=员工号 and isnull(sle_2.text)=false and sle_2.textselect * from 职工基本信息表 where 员工号=+trim(sle_2.text)+ then messagebox(提示!,数据库中无此人信息!) end ifelseif ddlb_3.text=姓名 then newsql=select * from 职工基本信息表 where 姓名=+trim(sle_2.text)+ if ddlb_3.text=姓名 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=姓名 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 姓名=+trim(sle_2.text)+ elseif ddlb_3.text=性别 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息!) end if else if ddlb_3.text=性别 then newsql=select * from 职工基本信息表 where 性别=+trim(sle_2.text)+ if ddlb_3.text=性别 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=性别 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 性别=+trim(sle_2.text)+ elseif ddlb_3.text=性别 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息，请确认您的输入是否有误!) end ifelseif ddlb_3.text=部门号 then newsql=select * from 职工基本信息表 where 部门号=+trim(sle_2.text)+ if ddlb_3.text=部门号 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=部门号 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 部门号=+trim(sle_2.text)+ elseif ddlb_3.text=部门号 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息，请确认您的输入是否有误!) end if elseif ddlb_3.text=职务 then newsql=select * from 职工基本信息表 where 职务=+trim(sle_2.text)+ if ddlb_3.text=职务 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=职务 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 职务=+trim(sle_2.text)+ elseif ddlb_3.text=职务 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息，请确认您的输入是否有误!) end if elseif ddlb_3.text=籍贯 then newsql=select * from 职工基本信息表 where 籍贯=+trim(sle_2.text)+ if ddlb_3.text=籍贯 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=籍贯 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 籍贯=+trim(sle_2.text)+ elseif ddlb_3.text=籍贯 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息，请确认您的输入是否有误!) end if elseif ddlb_3.text=出生年月 then newsql=select * from 职工基本信息表 where 出生年月=+trim(sle_2.text)+ if ddlb_3.text=出生年月 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=出生年月 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 出生年月=+trim(sle_2.text)+ elseif ddlb_3.text=出生年月 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息，请确认您的输入是否有误!) end if elseif ddlb_3.text=民族 then newsql=select * from 职工基本信息表 where 民族=+trim(sle_2.text)+ if ddlb_3.text=民族 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=民族 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 民族=+trim(sle_2.text)+ elseif ddlb_3.text=民族 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息，请确认您的输入是否有误!) end if elseif ddlb_3.text=身份证号 then newsql=select * from 职工基本信息表 where 身份证号=+trim(sle_2.text)+ if ddlb_3.text=身份证号 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=身份证号 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 身份证号=+trim(sle_2.text)+ elseif ddlb_3.text=身份证号 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息，请确认您的输入是否有误!) end if elseif ddlb_3.text=婚否 then newsql=select * from 职工基本信息表 where 婚否=+trim(sle_2.text)+ if ddlb_3.text=婚否 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=婚否 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 婚否=+trim(sle_2.text)+ elseif ddlb_3.text=婚否 and isnull(sle_2.text)=false and sle_2.textnewsql then messagebox(提示!,数据库中无此人信息，请确认您的输入是否有误!) end if elseif ddlb_3.text=联系电话 then newsql=select * from 职工基本信息表 where 联系电话=+trim(sle_2.text)+ if ddlb_3.text=联系电话 and sle_2.text= then messagebox(提示!,请输入查询条件!) elseif ddlb_3.text=联系电话 and isnull(sle_2.text)=false then newsql=select * from 职工基本信息表 where 联系电话=+trim(sle_2.text)+ elseif ddlb_3.text=联系电话 and isnull(sle_2.text)=false