仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 438|回复: 8
打印 上一主题 下一主题

[学习教程] ASP网页编程之天生一个不反复的随即数字

[复制链接]
透明 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:48:17 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

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

x
ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用反复写这个文章相对是偶尔的偶尔的时机,前年等一回的除夕节,和妻子上街散步,突然想起买上一张福利彩票,了局
屁都没有中上,开春第一天,就写了个展望彩票中奖的程序,这个中的一个很关头的算法就是怎样天生一个不反复的随即数字,
人人看完这个程序今后假如中奖,万万不要健忘豆腐了呀:)
SubCalCaPiao()
DimstrCaiPiaoNoArr()AsString
DimstrSQLAsString
DimstrCaiPiaoNoAsString
strCaiPiaoNo="01,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33"
DimStrTempArr(7)AsString
DimstrZhongJiangArr(7)AsString
strCaiPiaoNoArr=Split(strCaiPiaoNo,",")
DimintRandAsInteger
DimiAsInteger
DimjAsInteger
i=0
DimfindAsBoolean
DoWhileTrue
find=False
Randomize
intRand=Int((33*Rnd)+1)
Forj=0Toi-1
IfStrTempArr(j)=CStr(intRand)Then
find=True
EndIf
Next
IfNotfindThen
StrTempArr(j)=CStr(intRand)
strZhongJiangArr(i)=CStr(intRand)
Text1(i)=strZhongJiangArr(i)
i=i+1
Ifi=7Then
ExitDo
EndIf
EndIf
Loop
EndSub
呵呵,过几天,我把这个程序弄成组件,放到我的站点上人人一同来玩玩,呵呵!
/*
豆腐制造都是佳构
http://www.asp888.net豆腐手艺站
如转载请保存完全版权信息
*/
</p>国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了
深爱那片海 该用户已被删除
沙发
发表于 2015-1-19 23:53:47 | 只看该作者
ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。
灵魂腐蚀 该用户已被删除
板凳
发表于 2015-1-26 08:05:31 | 只看该作者
ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。
小魔女 该用户已被删除
地板
发表于 2015-2-4 13:38:39 | 只看该作者
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
谁可相欹 该用户已被删除
5#
发表于 2015-2-10 00:16:54 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
只想知道 该用户已被删除
6#
发表于 2015-2-28 10:27:58 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
不帅 该用户已被删除
7#
发表于 2015-3-9 22:19:32 | 只看该作者
封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
再见西城 该用户已被删除
8#
发表于 2015-3-17 02:11:06 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
莫相离 该用户已被删除
9#
发表于 2015-3-23 16:16:32 | 只看该作者
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-24 00:07

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表