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

只看该作者 · 发表于 2015-1-16 22:47:15

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

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

x

在实现ERP等高端的ASP应用时，用户需要提供核心的经营资料，需要ASP商有很高的信用度。楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。字符串用两种分歧的办法来务实现数字字符串的最年夜，最小战争均值
<%@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
EndFunctionFunctionMax(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
EndFunctionFunctionAvg(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
EndFunction2.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: 
Thelowestnumberis:<%=Min(aValues)%> 
Thehighestnumberis:<%=Max(aValues)%> 
Theaveragenumberis:<%=Avg(aValues)%> 
 
2.Selectingthenumbersfromadatabase: 
Thelowestpricedadis:<%=FormatCurrency(Int(rsLo("loPRICE")))%> 
Thehighestpricedadis:<%=FormatCurrency(Int(rsHi("hiPRICE")))%> 
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的那些弱点。

		自动登录	找回密码
密码			立即注册

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

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

相关帖子