asp将整个字符转换为半宽度字符，将其转换为d码全半角。
字符变化角度为半角宽度，半角为半角。<
函数的DSConvert（vstring，vflag）
REM vflag从整体转向半0表示，从角度的全宽度
朦胧的我，tmpsinglecharaasc，tempresult，SAscString，dascstring
sascstring =1,2,3,4,5,6,7,8,14,15,16,17,18,19,20,21,22,23,24,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,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,9899100101102103104105106107108109110111112113114115116117118119120121122123124125126
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,-23642,-23641,-23640,-23639,-23638,-23637,-23636,-23635,-23634,-23633,-23632,-23631,-23630,-23629,-23628,-23627,-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,-23583,-23582,-23581,-23580,-23579,-23578,-23577,-23576,-23575,-23574,-23573,-23572,-23571,-23570,-23569,-23568,-23567,-23566,-23565- - 23564，- 23563，- 23562，- 23561，- 23560，- 23559，- 23558，- 23557，- 23554，- 23556，- 23555，-
= tempresult
如果Len（vstring）然后响应。写参数错误0请检查你的！参数!：响应。结束：退出功能
我= 1 Len（vstring）
tmpsinglecharaasc = ASC（MID（vstring，I，1））
如果vflag = 0
如果InStr（dascstring，tmpsinglecharaasc）len（CSTR <> 0、（tmpsinglecharaasc）= 6）
tempresult = TempResult Chr（tmpsinglecharaasc + 23680）
其他的
tempresult = TempResult Chr（tmpsinglecharaasc）
最后如果
其他的
如果InStr（sascstring，tmpsinglecharaasc）len（CSTR <> 0、（tmpsinglecharaasc））< = 4
tempresult = TempResult Chr（tmpsinglecharaasc-23680）
其他的
tempresult = TempResult Chr（tmpsinglecharaasc）
最后如果
最后如果
下一个
dsconvert = tempresult
端功能
%>
全半角。
半转角