asp 전각, 반각 변환 기능 flag=-1일 때 반각에서 전각으로 변환
flag=0일 때 반각,전각 변환
플래그=1일 경우 전각에서 반각으로 변환
<%
함수 DBC2SBC(Str, flag)
Dim i, sStr
If Len(Str)<= 0 Then Exit Function
DBC2SBC = ""
For i = 1 To Len(Str)
sStr = Asc(Mid(Str, i , 1))
Case 플래그 선택
Case -1
If sStr>0 And sStr<= 125 Then
DBC2SBC = DBC2SBC & Chr(Asc(Mid(Str, i, 1)) - 23680)
Else
DBC2SBC = DBC2SBC & Mid(Str, i, 1)
End If
Case 0
If sStr>0 And sStr<= 125 Then
DBC2SBC = DBC2SBC & Chr(Asc(Mid(Str, i, 1)) -23680)
Else
DBC2SBC = DBC2SBC & Chr(Asc(Mid(Str, i, 1)) 23680)
End If
Case 1
If sStr<0 Or sStr>125 Then
DBC2SBC = DBC2SBC & Chr( Asc(Mid(Str, i, 1)) 23680)
Else
DBC2SBC = DBC2SBC & Mid( Str, i, 1)
End If
End 선택
다음
End 기능
%>
javascript 버전 전각, 반각 변환 기능
function dbc2sbc(sStr){
var dbc2sbc = sStr
for (var i = 65281; i < ; 65375; i ) {
var re = new RegExp(String.fromCharCode(i), "g")
var va = String .fromCharCode(i - 65248)
dbc2sbc.replace (re, va)
dbc2sbc = dbc2sbc.replace(/ /g, ' ');
return dbc2sbc; 공통 함수 sbc2dbc()
코드 복사
switch (stringFromCharCode) {
case "(":
case ")":
case "*":
case " ":
case " /":
case "\":
case "[":
case "]":
case "?":
case "$":
case "." :
case "^":
case "|":
stringFromCharCode = '\' stringFromCharCode;
기본값:
break;
}
var re = new RegExp( stringFromCharCode, "g"); String.fromCharCode(i 65248);
sbc2dbc = sbc2dbc.replace(re, va);
}
sbc2dbc = sbc2dbc.replace(/ / g, ' '); 🎜>}