ASP编程:完成数字字符串的最年夜值、最小值战争均...
减少客户内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。 完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。 运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。 ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。 ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍 哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的? 还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。 运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
页:
[1]