利用PB实现抽奖系统设计及实现.docVIP

利用PB实现抽奖系统设计及实现 　　摘 要 本文描述了基于抽??系统的设计与实现，通过前期的需求分析、系统流程设计、系统功能设计，软件选择PB（powerbuilder 9.0）作为系统开发工具，使用ACCESS作为数据库开发此系统，由于抽奖系统是一个独立的软件，所以采用单机版的数据库，安装简便，界面友好，容易移植，目前使用效果好 【关键词】PB ACCESS 抽奖 随机记录数 1 引言 我院为了丰富职工文化生活，每年春节临近时都举行晚会，在晚会过程中为了活跃气氛，有多次抽奖机会，分别抽出一等奖，二等奖，三等奖近400多名，往年都是把全院近700多人名单打印出来，折叠放在暗箱，由院领导分批次抽取，一个一个读出，占用时间长，而且职工怀疑有不透明的暗箱操作的嫌疑，今年根据医院工会要求，由我院信息科着手开发抽奖系统，这个任务由我全权负责开发，利用了2天时间完成任务，现将经验分享各位 2 设计目标 本系统能够根据选择奖项不同，在数据库中随机抽取10个人数，展示在屏幕上，由操作员点开始与停止，抽出10名幸运观众。被抽取的幸运观众将在待抽取的数据库中打上标识，在下次抽取中不再被选，以保证幸运观众不重复，同时保证待抽取的观众被抽取的机率相等 3 数据库表结构 由于本系统操作简单，数据库仅有2张表，一张Person_table全体职工表，一张Person_selected，获奖员工表，表结构分别如下： 3.1 Person_table表字段 Person_id 员工ID，Person_name 员工姓名，Person_Sex 员工性别，Cecked 中奖标志（0，为未中，1为中奖） 3.2 Person_selected表字段 Person_id 员工ID，Person_name 员工姓名，Person_Sex 员工性别，Jiang_X 奖项 4 程序设计 4.1 编程思想 PowerBuilder美国Sybase公司研制的一种新型、快速开发工具，是客户机/服务器结构下，基于Windows3.x、Windows95和WindowsNT的一个集成化开发工具。它包含一个直观的图形界面和可扩展的面向对象的编程语言PowerScript，提供与当前流行的大型数据库的接口，并通过ODBC与单机数据库相连 4.2 系统的实现 4.2.1 员工基本信息的建立 由于是单机版，采用微软的ACCESS数据库，对于一个近千人的单位，足够使用，刚开始我采用的是SQL2000数据库。在开发过程中感觉非常不便，单机还要安装SQL数据库，待抽奖人员还要开发录入，修改，删除的功能，时间紧，来不及，最重要是操作非常烦琐，后决定采用易操作的ACCESS数据库 首先建立待抽奖数据库，表结构如图1 表结构建立后，将EXCEL里将待抽取的人员按数据库的结构复制至数据库表中，注意表中Checked 设置为0，待抽取状态，如图2 建立空表结构Person_selected，用于插入中奖员工记录，保存便于导出，表结构如图3 中奖后记录如图4 4.2.2 随机记录的产生 经查询资料，在网上搜索到：四种数据库随机获取10条数据的方法 SQL Server： SELECT TOP 10 * FROM T_USER ORDER BY NEWID（） ORACLE： SELECT * FROM （SELECT * FROM T_USER ORDER BY DBMS_RANDOM.RANDOM（）） WHERE RONUM 　　st_9.text= name[9] st_10.text= name[10] d、开始，停止命令控件，实现timer（0.01）不停滚动，点击停止，展现中奖人员姓名，同时保存到中奖人员表中，供举办单位导出，打印，部分重要代码如下： if this.text =‘开始’ then this.text =‘停止’ timer（0.01） else this.text =‘开始’ timer（0） --停止滚动 if sqlca.sqlcode 0 then ErrMessage（’数据库出现问题！’） return 1 end if if checked = 1 then infomessage（”此号码已经抽到过并且已经做了保存！” ） return end if --保存中奖员工记录： insert into lottery_selected （person_id，person_name，checked，Jiang_X，r