ASP网站制作之ASP 写的判别 Money 各个位值的函数
减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。函数比来在公司做一个帐务报销体系。必要把一个MONEY值的个位十位百位千位另有角啊分啊的独自掏出来天生表格。
因而写了一个失掉此值的Function,放到这里共享。假如你看到有写得不当的中央,请给我来killhand007@163.com斧正交换。
FunctionMoneynm(n,m)
checkPoint=InstrRev(n,".")
Ifn>9999.99Then
Response.write"数据凌驾限定,请断定您的报销金额在9999.99元之内!"
Else
If(checkPoint0)Then
leftNum=Mid(n,1,checkPoint-1)
rightNum=Mid(n,checkPoint+1,Len(n))
Else
leftNum=n
EndIf
gw=Mid(leftNum,Len(leftNum),Len(leftNum))
sw=0
bw=0
qw=0
jw=0
fw=0
IfLen(leftNum)>1Then
sw=Mid(leftNum,Len(leftNum)-1,1)
EndIf
IfLen(leftNum)>2Then
bw=Mid(leftNum,Len(leftNum)-2,1)
EndIf
IfLen(leftNum)>3Then
qw=Mid(leftNum,Len(leftNum)-3,1)
EndIf
IfLen(rightNum)>0Then
jw=Mid(rightNum,1,1)
EndIf
IfLen(rightNum)>1Then
fw=Mid(rightNum,2,1)
EndIf
Selectcasem
case"gw"
Response.Writegw
case"sw"
Response.Writesw
case"bw"
Response.Writebw
case"qw"
Response.Writeqw
case"jw"
Response.Writejw
case"fw"
Response.Writefw
EndSelect
EndIf
EndFunction
固然在此基本上你还能够失掉万位十万位等。
但愿对有必要的伴侣有所匡助。
</p>asp对于服务器的要求较高,一般的服务器如果访问量一大就垮了,不得不重启。 掌握asp的特性而且一定要知道为什么。 代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页,这其中就用到了ASP,我想它的作用是可想而知的。 在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。 他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。 学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点: 跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组 Session:这个存储跟客户端会话过程的数据,默认20分钟失效 没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。 以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。
页:
[1]