전체 너비 문자를 반 세기 문자로 변환하고 반폭 문자를 전체 폭으로 변환합니다.
<%
functiondsconvert (vstring, vflag)
remvflag가 0 인 경우, 그것은 전체 너비에서 반 더시로 바뀌고 다른 경우 반면에서 전체 너비로 바뀌는 것을 의미합니다.
Dimi, tmpsinglecharaasc, Tempresult, Sascstring, dascstring
sascstring = "1,2,3,4,5,6,7,8,14,15,16,17,18,19,20,21,22,23,25,26,27,33,34,35,36,37,38,39,40, 41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,64,65,66,67,68,70,71,72 , 73,74,75,76,77,78,79,80,81,82,83,84,85,87,88,88,89,90,91,92,93,94,96,97,98,99,100,101,102,1 03,104,105,106,107,108,109,110,111,112,113,114,115,116,117,118,119,121,122,123,125,126 "
dascstring = "-23679, -23678, -23677, -23676, -23675, -23674, -23673, -23672, -23666, -23665, -23664, -23663, -23662, -23661, -23660, -23659, -23658, -23657, -23656, -23655, -23654, -23653, -23647, -23646, -23645, -23644, -23643, -23644 2, -23641, -23640, -23639, -23638, -23637, -23636, -23635, -23634, -23633, -23632, -23631, -23630, -23629, -23628, -23 627, -23626, -23625, -23624, -23623, -23622, -23621, -23620, -23619, -23618, -23617, -23616, -23615, -23614, -23613,- 23612, -23611, -23610, -23609, -23608, -23607, -23606, -23605, -23604, -23603, -23602, -23601, -23600, -23599, -23598 -23597, -23596, -23595, -23594, -23593, -23592, -23591, -23590, -23589, -23588, -23587, -23586, -23585, -23584, -23555, -2355, -23587 83, -23582, -23581, -23580, -23579, -23578, -23577, -23576, -23575, -23574, -23573, -23572, -23571, -23570, -23569, -23569, -23569, -23569, -23573 3568, -23567, -23566, -23565, -23564, -23563, -23562, -23561, -23560, -23559, -23558, -23557, -23556, -23555, -23554 "
tempresult = ""
iflen (vstring) <= 0thenresponse.write "ParametersError! pleasecheckyourparameters!": response.end : exitfunction
fori = 1tolen (vstring)
tmpsingLecharaasc = ASC (MID (VSTRING, I, 1))
ifvflag = 0then
ifinstr (dascstring, tmpsinglecharaasc) <> 0andlen (cstr (tmpsinglecharaasc)) = 6then
tempresult = tempresult & chr (tmpsinglecharaasc+23680)
또 다른
tempresult = tempresult & chr (tmpsinglecharaasc)
endif