ASP网页编程之金额阿拉伯数字转换为中文的存储历程（...
ASP在国内异常流行，因为国内大多使用的是盗版的Windows和盗版的SQLServer，而ASP＋COM＋SQLServer实际上也是一种不错的搭配，其性能也不输于PHP+MYSQL，特别是Windows系统和SQLServer都有图形界面，比APACHE和MYSQL易于维护，因此对于不重视知识产权的国家来说也是一种不错的选择。存储历程|金额|中文|转换CreateProcedureAtoC@ChangeMoneyMoney
as
SetNocountON
Declare@String1char(20)
Declare@String2char(30)
Declare@String4Varchar(100)
Declare@String3Varchar(100)--从原A值中掏出的值
Declare@iint--轮回变量
Declare@JInt--A的值乘以100的字符串长度
Declare@Ch1Varchar(100)--数字的汉语读法
Declare@Ch2Varchar(100)--数字位的汉字读法
Declare@ZeroInt--用来盘算一连有几个零
Declare@ReturnValueVarChar(100)
Select@ReturnValue=
Select@String1=零壹贰叁肆伍陆柒捌玖
Select@String2=万仟佰拾亿仟佰拾万仟佰拾元角分
Select@String4=Cast(@ChangeMoney*100asint)
select@J=len(cast((@ChangeMoney*100)asint))
Select@String2=Right(@String2,@J)
Select@i=1
while@i<=@jBegin
Select@String3=Substring(@String4,@i,1)
if@String30Begin
Select@Ch1=Substring(@String1,Cast(@String3asInt)+1,1)
Select@Ch2=Substring(@String2,@i,1)
Select@Zero=0--暗示本位不为零
end
elseBegin
If(@Zero=0)Or(@i=@J-9)Or(@i=@J-5)Or(@i=@J-1)
Select@Ch1=零
Else
Select@Ch1=
Select@Zero=@Zero+1--暗示本位为0
--假如转换的数值必要扩展，那末需修改以下表达式I的值。
SelectCh2=
If@i=@J-10Begin
Select@Ch2=亿
Select@Zero=0
end
If@i=@J-6Begin
Select@Ch2=万
Select@Zero=0
end
if@i=@J-2Begin
Select@Ch2=元
Select@Zero=0
end
If@i=@J
Select@Ch2=整
end
Select@ReturnValue=@ReturnValue+@Ch1+@Ch2
select@i=@i+1
end
--最初将过剩的零往失落
IfCharIndex(仟仟,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,仟仟,仟)
IfCharIndex(佰佰,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,佰佰,佰)
IfCharIndex(零元,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,零元,元)
IfCharIndex(零万,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,零万,万)
IfCharIndex(零亿,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,零亿,亿)
IfCharIndex(零整,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,零整,整)
IfCharIndex(零佰,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,零佰,零)
IfCharIndex(零仟,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,零仟,零)
IfCharIndex(元元,@ReturnValue)0
Select@ReturnValue=Replace(@ReturnValue,元元,元)
Select@ReturnValue
GO
公布于：2002-3-20</p>asp可以使用微软的activeX使得网页功能无比强大，不过安全性也较差，而且是基于的windows服务器，所以性能稳定性也一般 那么，ASP.Net有哪些改进呢？ 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组 ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。 学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。 弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。 最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。 以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。 ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。
页:
[1]