看看以下我做的电脑抽奖程序,谁能猜出是怎么实现的?活动:《商场月销售流水号抽奖》方式:
用一台普通的电脑,外壳新潮漂亮(门面问题,总不能在顾客面前丢脸吧^_^),配置不用太高,通过网线接到后台数据库服务器。数据库中有商场的所有销售记录,每个月有几百万条。本月初的第一个星期日做抽奖活动,抽奖范围为上个月的所有销售流水记录。销售流水号不重复,但也不是连续的!方法:
在电脑的抽奖程序中有一个“开始”按钮,按下按钮后,此按钮变成“停止”按钮,抽奖号码开始不停的随机滚动,这时随便叫一名观众,上台来按“停止”按钮抽奖。当按下“停止”按钮后,滚动号码立刻停止,屏幕上显示出中奖的销售流水号,毫无延时!“停止”按钮又变回“开始”按钮,可以再次进行抽奖!要求:
1、每次抽取的销售流水号必须是无规律的,随机的,不能重复的。
2、抽取的销售流水号必须是数据库中上个月所有销售记录中的一条。
3、当观众按下“停止”按钮后,屏幕立刻显示出中奖号码,无延时!
用一台普通的电脑,外壳新潮漂亮(门面问题,总不能在顾客面前丢脸吧^_^),配置不用太高,通过网线接到后台数据库服务器。数据库中有商场的所有销售记录,每个月有几百万条。本月初的第一个星期日做抽奖活动,抽奖范围为上个月的所有销售流水记录。销售流水号不重复,但也不是连续的!方法:
在电脑的抽奖程序中有一个“开始”按钮,按下按钮后,此按钮变成“停止”按钮,抽奖号码开始不停的随机滚动,这时随便叫一名观众,上台来按“停止”按钮抽奖。当按下“停止”按钮后,滚动号码立刻停止,屏幕上显示出中奖的销售流水号,毫无延时!“停止”按钮又变回“开始”按钮,可以再次进行抽奖!要求:
1、每次抽取的销售流水号必须是无规律的,随机的,不能重复的。
2、抽取的销售流水号必须是数据库中上个月所有销售记录中的一条。
3、当观众按下“停止”按钮后,屏幕立刻显示出中奖号码,无延时!
解决方案 »
- delphi7 中reportbuilder中 简单问题 散分
- 请问这样的sql语句在delphi中如何执行?如何写成sql中的函数或过程?
- 关于格式化字符串的问题,方法简单者得分!
- 我参加高程,请问学习Delphi用什么书好?请说明作者,出版社,书名,翻译者,版本!不胜感激! 在线等候!
- 关于窜口通信的问题
- 哪位大师能给我一个用delphi或c语言实现的生产者-消费者问题的源程序?
- goomoo(古木) 來來拿分
- 哪里有MapInfo5.5以上版本下载?
- 请教一个IE的问题,简单,100分
- 求救,谁能给我一个Youseful for D5(一个制作安装程序的Delphi VCL)?????????
- 访问Oracle数据库用何种引擎比较好?
- Button1.caption := InStrTo(i)这哪里出错?
数据库里的流水号有一堆,这堆号码的内容是不变的,
新建一张抽取号码表:
TABLE_RANDOM(ID,流水号ID)
将流水重新编号为:ID,此ID连续到最大数值(=上月流水的总数),
产生随机号,选取ID对应的"流水号ID",一次一条记录,速度和要求完全可以满足要求。MSN:[email protected]
希望能跟大家交朋友!
:)
高手,果然是高手!
你说的方法和我实际做的是一模一样!
连分析都和我想的一样!
真是英雄所见略同!!!^_^呵呵......
show some id
if stop then
show my id