全角与半角字符的相互转换的asp函数

欢迎您访问我爱IT技术网，今天小编为你分享的编程技术是：【全角与半角字符的相互转换的asp函数】，下面是详细的分享！

全角与半角字符的相互转换的asp函数

为了防止客户在输入的时候，错误地输入了全角（半角）字符，我们要通过程序将它转换成正确的半角（全角）字符，这是给定的函数。
<% 
'**************************** 
'*参数说明: 
'* str:要转换的字符串 
'* flag:标记，为0时半转全，为非0时全转半 
'* 返回值类型：字符串 
'**************************** 
function DBC2SBC(str,flag) 
dim i 
if len(str)<=0 then 
REsponse.Write("字符串参数为空") 
exit function 
end if 
for i=1 to len(str) 
str1=asc(mid(str,i,1)) 
if str1>0 and str1<=125 and not flag then 
dbc2sbc=dbc2sbc&chr(asc(mid(str,i,1))-23680) 
else 
dbc2sbc=dbc2sbc&chr(asc(mid(str,i,1))+23680) 
end if 
next 
End function 
%>

以上所分享的是关于全角与半角字符的相互转换的asp函数，下面是编辑为你推荐的有价值的用户互动：

　　相关问题：怎么把文字的全角符号切换成半角

　　答：方法一： 下图所示，在输入法状态下，按下Shift+空格键或直接点击如图所示的圆形或半月形，可以在全角或半角间进行切换。 方法二： 1，在文档中选中需要转换的全角字符，然后点击上方菜单“格式”； 2，然后在下拉菜单中点击“更改大小写”项； 3，... >>详细

　　相关问题：asp页面里想写个JS，作用 把全角符号替换为半角符号

　　答： 无标题文档 function ToDBC(str) { var result = ''; for (i=0 ; i= 33 && code >>详细

　　相关问题：Word输入字符，如何转换全角和半角

　　答：shift+space组合键键可以切换全角和半角或者点击输入法的全角半角按钮， 半角图： 全角图： >>详细