ASP网页设计金额阿拉伯数字转换为中文的存储历程
国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了存储历程|金额|中文|转换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
</p>ASP由于使用了COM组件所以它会变的十分强大,但是这样的强大由于WindowsNT系统最初的设计问题而会引发大量的安全问题。只要在这样的组件或是操作中一不注意,哪么外部攻击就可以取得相当高的权限而导致网站瘫痪或者数据丢失; Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write 从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页,这其中就用到了ASP,我想它的作用是可想而知的。 最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。 封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。 Session:这个存储跟客户端会话过程的数据,默认20分钟失效 运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
页:
[1]