第二个灵魂 发表于 2015-1-16 22:47:15

ASP教程之用两种分歧的办法来务实现数字字符串的...

在实现ERP等高端的ASP应用时,用户需要提供核心的经营资料,需要ASP商有很高的信用度。楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。字符串用两种分歧的办法来务实现数字字符串的最年夜,最小战争均值
<%@LANGUAGE="VBScript"
ENABLESESSIONSTATE=False%>
<%
1.Selectingthenumbersfromastring:
myString="2,4,6,8,10,12"
aValues=Split(myString,",",-1,1)</P><P>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</P><P>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</P><P>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</P><P>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
%>
减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。

不帅 发表于 2015-1-19 23:40:34

Application:这个存储服务端的数据,如果不清除,会直到web应用程序结束才清除(例如重启站点)

谁可相欹 发表于 2015-1-25 21:49:35

ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。

因胸联盟 发表于 2015-2-4 05:19:40

Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")

若天明 发表于 2015-2-9 16:22:32

我们必须明确一个大方向,不要只是停留在因为学而去学,我们应有方向应有目标.

乐观 发表于 2015-3-9 00:41:45

不能只是将它停留在纸上谈兵的程度上。

飘灵儿 发表于 2015-3-16 19:26:12

哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?

简单生活 发表于 2015-3-23 00:09:11

尽管MS自己讲C#内核中更多的象VC,但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言,而不是一种脚本,所以它具有面向对象编程语言的一切特性,比如封装性、继承性、多态性等等,这就解决了刚才谈到的ASP的那些弱点。
页: [1]
查看完整版本: ASP教程之用两种分歧的办法来务实现数字字符串的...