仓酷云

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

[学习教程] ASP编程:完成数字字符串的最年夜值、最小值战争均...

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

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

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

x
减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。</p>用两种分歧的办法来务实现数字字符串的最年夜,最小战争均值
<%@LANGUAGE="VBScript"
ENABLESESSIONSTATE=False%>
<%
1.Selectingthenumbersfromastring:
myString="2,4,6,8,10,12"
aValues=Split(myString,",",-1,1)

FunctionMin(someNumbers)
dblLowestSoFar=Null
ForI=LBound(someNumbers)toUBound(someNumbers)
IfIsNumeric(someNumbers(I))Then
IfCDbl(someNumbers(I))<dblLowestSoFarOrIsNull(dblLowestSoFar)Then
dblLowestSoFar=CDbl(someNumbers(I))
EndIf
EndIf
Next
Min=dblLowestSoFar
EndFunction

FunctionMax(someNumbers)
dblHighestSoFar=Null
ForI=LBound(someNumbers)toUBound(someNumbers)
IfIsNumeric(someNumbers(I))Then
IfCDbl(someNumbers(I))>dblHighestSoFarOrIsNull(dblHighestSoFar)Then
dblHighestSoFar=CDbl(someNumbers(I))
EndIf
EndIf
Next
Max=dblHighestSoFar
EndFunction

FunctionAvg(someNumbers)
dblHighestSoFar=Null
ForI=LBound(someNumbers)toUBound(someNumbers)
IfIsNumeric(someNumbers(I))Then
IfCDbl(someNumbers(I))>dblHighestSoFarOrIsNull(dblHighestSoFar)Then
dblHighestSoFar=CDbl(someNumbers(I))+CDbl(someNumbers(I))/
EndIf
EndIf
Next
Avg=dblHighestSoFar
EndFunction

2.Or,selectingthenumbersfromadatabase:
SetcnDZ=Server.CreateObject("ADODB.Connection")
cnDZ.Open"DSN=myDatabase"
SetrsLo=cnDZ.Execute("SELECTMin(PRICE)ASloPRICEFROMTBLADS")
SetrsHi=cnDZ.Execute("SELECTMax(PRICE)AShiPRICEFROMTBLADS")
SetrsAvg=cnDZ.Execute("SELECTAvg(PRICE)ASavgPRICEFROMTBLADS")
%>
<html>
<body>
1.Selectingthenumbersfromastring:<br>
Thelowestnumberis:<%=Min(aValues)%><br>
Thehighestnumberis:<%=Max(aValues)%><br>
Theaveragenumberis:<%=Avg(aValues)%><br>
<br>
2.Selectingthenumbersfromadatabase:<br>
Thelowestpricedadis:<%=FormatCurrency(Int(rsLo("loPRICE")))%><br>
Thehighestpricedadis:<%=FormatCurrency(Int(rsHi("hiPRICE")))%><br>
Theaveragesellingpriceoftheseadsis:<%=FormatCurrency(Int(rsAvg("avgPRICE")))%>
</body>
</html>
<%
cnDZ.Close
SetcnDZ=Nothing
rsLo.Close
SetrsLo=Nothing
rsHi.Close
SetrsHi=Nothing
rsAvg.Close
SetrsAvg=Nothing
%>ASP一般认为只能运行在IIS上,正如前面所提到的,这并不是十分正确,事实上,ASP也能运行在Apache上。ApacheASP可在任意Apache服务器上运行有限的ASP功能,所需做的,只需打开mod_perl。
兰色精灵 该用户已被删除
沙发
发表于 2015-1-18 20:09:21 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
admin 该用户已被删除
板凳
发表于 2015-1-24 11:27:27 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
深爱那片海 该用户已被删除
地板
发表于 2015-2-1 09:34:48 | 只看该作者
ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。
小魔女 该用户已被删除
5#
发表于 2015-2-7 02:42:01 | 只看该作者
ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。
山那边是海 该用户已被删除
6#
发表于 2015-2-19 21:50:21 | 只看该作者
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
灵魂腐蚀 该用户已被删除
7#
发表于 2015-3-6 15:53:49 | 只看该作者
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
活着的死人 该用户已被删除
8#
发表于 2015-3-13 04:23:42 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
分手快乐 该用户已被删除
9#
发表于 2015-3-20 12:46:39 | 只看该作者
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2025-1-9 02:32

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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