找回密码
 注册
快捷导航
查看: 3758|回复: 20

51NB定制活动抽奖的软件【绿色版】

[复制链接] |自动提醒
阅读字号:

3万

回帖

319

积分

3万

资产值

至尊会员III Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2003-2-6
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)铜牌荣誉勋章(注册8年以上会员)金牌荣誉勋章(注册20年以上会员)银牌荣誉勋章(注册10年以上会员)
发表于 2008-12-18 21:17:03| 字数 594| - 中国–辽宁–沈阳 移动 | 显示全部楼层 |阅读模式
51NB定制活动抽奖的软件【绿色版】


前几天拿Vb编写了一个,用access数据库录入的人名,


电脑随机抽个出来,然后此人下次不能再抽奖....要是有需要的兄弟,我改成51nb版本的明天放上来


抽奖程序说明

文件包为三个文件,主抽奖程序,滚动数字动画,access数据库文件。

解开压缩放入单独的目录中运行(如果无法运行,可能需要电脑安装VB运行库和Flash插件支持)。

access数据库中表格的字段名称

注意:ID要为连续自动编号从1开始,可以修改,然后新增,不要删除中间的字段

使用excel导入也行。
原理,随机产生1-(最大为记录总数)的数字,按照记录数的标记寻找数据库中人名,并且显示出来,然后标记已经抽中,下轮不参加抽奖。以此类推,直到抽出所有人为止。
运行画面如下:

首次抽奖要进行清空。
然后点击摇奖开始,再接下来使用Enter回车键单独控制即可(键盘焦点自动切换)。

最佳投影使用方法,抽奖电脑设置桌面为纯黑色,无图标显示,无任务栏显示。
此时投影范围仅仅需要2米×0.7M的背景即可。可以充分满足任何联欢会场地的需求。
其中access数据库文件中内部会记录每次被抽奖人的时间戳。

此标记使用清空键之后可消除,日期位置归零为08年12月1日。

没木马,没有黑幕,没后门,中奖概率基本一样的。


哈哈,可以定制企业LOGO,收费1000NB一次。

[ Edited by  馅饼 on 2008-12-19 11:01 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x

3万

回帖

262

积分

1万

资产值

至尊会员III Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2007-7-24
银牌荣誉勋章(注册10年以上会员)
发表于 2008-12-18 21:39:29| 字数 22| - 中国–辽宁–大连 联通 | 显示全部楼层
这不整给HOPE明年周年庆用的么...哈哈.
签名换了...
回复 支持 反对

使用道具 举报

1867

回帖

25

积分

1万

资产值

白金会员 Rank: 3Rank: 3Rank: 3

注册时间
2004-5-2
发表于 2008-12-18 21:44:55| 字数 10| - 中国–北京–北京 联通 | 显示全部楼层
貌似偶需要 ,发上来吧
生命不在于得到什么 而在于做过什么

T400 P8600 4G 320G+750G BT 6CELL
回复 支持 反对

使用道具 举报

2万

回帖

222

积分

3万

资产值

至尊会员II Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2007-5-7
发表于 2008-12-18 21:50:53| 字数 19| - 中国–陕西 电信 | 显示全部楼层
是啊~

7周年的时候 老是抽到相同的人……
MBA I7 512G SSD
TINKPAD X200 i7 620lm  4G AFFS F3507G 256G SSD
StarCraft
回复 支持 反对

使用道具 举报

5517

回帖

67

积分

3185

资产值

至尊会员I Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2005-5-27
发表于 2008-12-18 22:13:42| 字数 11| - 中国–福建–泉州 联通 | 显示全部楼层
51nb的是mysql
回复 支持 反对

使用道具 举报

3万

回帖

319

积分

3万

资产值

至尊会员III Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2003-2-6
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)铜牌荣誉勋章(注册8年以上会员)金牌荣誉勋章(注册20年以上会员)银牌荣誉勋章(注册10年以上会员)
 楼主| 发表于 2008-12-18 22:18:55| 字数 109| - 中国–辽宁–沈阳 移动 | 显示全部楼层
QUOTE:
原帖由 HOOP 于 2008-12-18 22:13 发表
51nb的是mysql----------------------------?男 ?未婚 ?没房 ?没车 ?没业 ?没钱
哈哈,那个更牛的,web的,php我不熟悉.
回复 支持 反对

使用道具 举报

524

回帖

0

积分

715

资产值

入门会员 Rank: 1

注册时间
2006-9-17
发表于 2008-12-19 00:09:26| 字数 14| - 中国–广东–深圳–宝安区 电信 | 显示全部楼层
发一个上来,月底有可能会用。
06年新购入T23
08年X40
11年T43
11年11月X61
13年2月X220 4290 32U
回复 支持 反对

使用道具 举报

312

回帖

0

积分

14

资产值

入门会员 Rank: 1

注册时间
2008-12-15
发表于 2008-12-19 00:11:11| 字数 5| - 中国–北京–北京 联通 | 显示全部楼层
这个有用。
永不回鞘的利剑

nova2000已经康复
回复 支持 反对

使用道具 举报

3万

回帖

283

积分

11万

资产值

至尊会员III Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2005-10-25
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)月全勤勋章
发表于 2008-12-19 01:09:51| 字数 8| - 中国–重庆–重庆 联通 | 显示全部楼层
留后门没有,嘿嘿
坏朋朋 -------- 大龄男青年,无车无房无存款。
回复 支持 反对

使用道具 举报

569

回帖

0

积分

214

资产值

入门会员 Rank: 1

注册时间
2004-8-30
发表于 2008-12-19 08:20:07| 字数 66| - 中国–江苏–无锡 电信 | 显示全部楼层
俺每年都做一个版本
vb的,c#t的,jsp的,哈哈
正在想今年用什么做

[ Edited by  majkl on 2008-12-19 08:24 ]
以后再也不冲动乱败家了,我的小黑啊...
回复 支持 反对

使用道具 举报

3万

回帖

319

积分

3万

资产值

至尊会员III Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2003-2-6
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)铜牌荣誉勋章(注册8年以上会员)金牌荣誉勋章(注册20年以上会员)银牌荣誉勋章(注册10年以上会员)
 楼主| 发表于 2008-12-19 09:18:14| 字数 146| - 中国–辽宁–沈阳 移动 | 显示全部楼层
QUOTE:
原帖由 NCpiro 于 2008-12-19 01:09 发表
留后门没有,嘿嘿----------------------------朋友免费送的A22e(P3-700/512m/80G)千元收的戴尔GX270(p4-2.8/865/512M/FX5200/dv...
没有留,公正,公平嘛
回复 支持 反对

使用道具 举报

3万

回帖

319

积分

3万

资产值

至尊会员III Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2003-2-6
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)铜牌荣誉勋章(注册8年以上会员)金牌荣誉勋章(注册20年以上会员)银牌荣誉勋章(注册10年以上会员)
 楼主| 发表于 2008-12-19 11:03:37| 字数 112| - LAN | 显示全部楼层
QUOTE:
Posted by majkl on 2008-12-19 08:20
俺每年都做一个版本
vb的,c#t的,jsp的,哈哈
正在想今年用什么做

[ Edited by  majkl on 2008-12-19 08:24 ]



厉害啊,俺不会jsp
IBM A31P R9H, Pentium 4-2.0G  RAM:1GB 60GB+40GB  UXGA  PalmIIIXE  Nikon D1X 50/1.8D
Lenovo Thinkpad  T60P 7200.2,2G 100G WSXGA+
回复 支持 反对

使用道具 举报

6324

回帖

103

积分

3730

资产值

至尊会员I Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2003-9-29
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)
发表于 2008-12-19 12:51:12| 字数 20| - 中国–上海–上海–徐汇区 电信 | 显示全部楼层
以前还使用RFID 设备写过一个抽奖系统,
- IBM 600X Piii 500 448m 32g SSD very new, Windows 98
- X41t Pentium M 778 2g 64g SSD almost new, with dock, Windows XP Tablet
- X61t L7700 6g 64g SSD SXGA+, with dock, Windows 10 ltsb 2015
- X1C i7 8650u 16g 768g SSD 2K, with dock, Windows 10 ltsc 2019
回复 支持 反对

使用道具 举报

2205

回帖

0

积分

2505

资产值

入门会员 Rank: 1

注册时间
2007-7-9
发表于 2008-12-19 12:53:55| 字数 12| - 中国–四川–成都 电信 | 显示全部楼层
换个好看点的界面嘛。。。
TP600->HP B1800->x60->X61
D22 T8300 2.4G/2G/160G/指纹蓝牙8芯/xp
回复 支持 反对

使用道具 举报

3万

回帖

319

积分

3万

资产值

至尊会员III Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2003-2-6
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)铜牌荣誉勋章(注册8年以上会员)金牌荣誉勋章(注册20年以上会员)银牌荣誉勋章(注册10年以上会员)
 楼主| 发表于 2008-12-19 13:35:48| 字数 73| - LAN | 显示全部楼层
QUOTE:
Posted by gusla on 2008-12-19 12:53
换个好看点的界面嘛。。。


可以定制啊。。带企业logo的,收费1000NB。
IBM A31P R9H, Pentium 4-2.0G  RAM:1GB 60GB+40GB  UXGA  PalmIIIXE  Nikon D1X 50/1.8D
Lenovo Thinkpad  T60P 7200.2,2G 100G WSXGA+
回复 支持 反对

使用道具 举报

3万

回帖

319

积分

3万

资产值

至尊会员III Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2003-2-6
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)铜牌荣誉勋章(注册8年以上会员)金牌荣誉勋章(注册20年以上会员)银牌荣誉勋章(注册10年以上会员)
 楼主| 发表于 2011-1-20 15:52:22| 字数 24| - LAN | 显示全部楼层
回车键或是空格 单独控制即可(键盘焦点自动切换)。
IBM A31P R9H, Pentium 4-2.0G  RAM:1GB 60GB+40GB  UXGA  PalmIIIXE  Nikon D1X 50/1.8D
Lenovo Thinkpad  T60P 7200.2,2G 100G WSXGA+
回复 支持 反对

使用道具 举报

1万

回帖

112

积分

2万

资产值

至尊会员I Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2010-12-30
月全勤勋章
发表于 2011-1-20 19:23:48| 字数 14| - 中国–广东–深圳 电信 | 显示全部楼层
这个真的可以有,很容易做手脚
深深的夜,寂寂的心,空空的人

http://forum.51nb.com/thread-1120730-1-1.html
回复 支持 反对

使用道具 举报

1万

回帖

120

积分

1万

资产值

至尊会员I Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2006-7-21
银牌荣誉勋章(注册10年以上会员)
发表于 2011-1-20 20:02:53| 字数 12| - 中国–浙江–杭州 华数 | 显示全部楼层
这东西不错啊······
人家买苹果牌itouch,苹果牌ipod,苹果牌ipad,苹果牌imac,苹果牌iphone,我买了苹果派i eat····
回复 支持 反对

使用道具 举报

1539

回帖

0

积分

7814

资产值

入门会员 Rank: 1

注册时间
2003-10-9
铜牌荣誉勋章(注册8年以上会员)银牌荣誉勋章(注册10年以上会员)
发表于 2011-1-21 13:30:52| 字数 8| - LAN | 显示全部楼层
mark 下次使用
我家的丫头叫小叮当,呵呵...
回复 支持 反对

使用道具 举报

5999

回帖

74

积分

9388

资产值

至尊会员I Rank: 4Rank: 4Rank: 4Rank: 4

注册时间
2005-5-17
发表于 2011-1-21 19:37:54| 字数 9| - 中国–江西–宜春 电信 | 显示全部楼层
看看先了,呵呵……
超高配台机:图拉丁1.1超1.46 256M 昆腾10G GF2 64M 15寸真彩 运行起来像飞一样!太快了,降频使用中...
回复 支持 反对

使用道具 举报

2272

回帖

1

积分

8212

资产值

入门会员 Rank: 1

注册时间
2002-11-19
银牌荣誉勋章(注册10年以上会员)铜牌荣誉勋章(注册8年以上会员)
发表于 2011-1-22 16:05:07| 字数 20| - 中国–上海–上海 电信 | 显示全部楼层
版主,有没有免费的,简单点的客户管理推荐
560C-600-t23-x31-r50p-t43-t60p-X200S /X61S AFFS3G X200TBP8 3G-X200 AFFS-I7-X220-W510-X220T-X61-W701
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Powered by Discuz! X3.5 © 2001-2023 Comsenz Inc

GMT+8, 2025-1-20 03:57 , Processed in 0.183010 second(s), 62 queries , Gzip On, OPcache On.

手机版|小黑屋|安卓客户端|iOS客户端|Archiver|备用网址1|备用网址2|在线留言|专门网

返回顶部