게시판 본문 ASP, ASP.NET, IIS & Script - Read Only

답변 무지무지 감사합니다.
그냥 제가 작업한 부분 적습니다.
php에서 하면...
function crossUrlDecode($source) {
$decodedStr = '';
$pos = 0;
$len = strlen($source);

while ($pos < $len) {
$charAt = substr ($source, $pos, 1);
if ($charAt == 'c') {
$char2 = substr($source, $pos, 2);
$decodedStr .= htmlentities(utf8_decode($char2),ENT_QUOTES,'ISO-8859-1');
$pos += 2;
}
elseif(ord($charAt) > 127) {
$decodedStr .= "&#".ord($charAt).";";
$pos++;
}
elseif($charAt == '%') {
$pos++;
$hex2 = substr($source, $pos, 2);
$dechex = chr(hexdec($hex2));
if($dechex == 'c') {
$pos += 2;
if(substr($source, $pos, 1) == '%') {
$pos++;
$char2a = chr(hexdec(substr($source, $pos, 2)));
$decodedStr .= htmlentities(utf8_decode($dechex . $char2a),ENT_QUOTES,'ISO-8859-1');
}
else {
$decodedStr .= htmlentities(utf8_decode($dechex));
}
}
else {
$decodedStr .= $dechex;
}
$pos += 2;
}
else {
$decodedStr .= $charAt;
$pos++;
}
}

return $decodedStr;
}

이렇게 하면 되던데요..


그래서 ASP 코드로

Function hexdec(strHex)
For i = 0 To Len(strHex) - 1
lngDec = lngDec + CInt("&H" & Mid(strHex, Len(strHex) - i, 1)) * 16 ^ i
Next
hexdec = lngDec
End Function

function crossUrlDecode(source)
decodedStr = ""
pos = 1
str_len = Len(source)

Do While pos <= Len(source)
charAt = Mid (source, pos, 1)
If charAt = "c" Then
char2 = Mid(source, pos, 2)
decodedStr = decodedStr & char2
pos = pos + 2

ElseIf asc(charAt) > 127 Then
decodedStr = decodedStr & "&#" & asc(charAt) & ""
pos = pos + 1

ElseIf charAt = "%" Then
pos = pos + 1
hex2 = Mid(source, pos, 2)
dechex = chr(hexdec(hex2))
If dechex = "c" Then
pos = pos + 2
If Mid(source, pos, 1) = "%" Then
pos = pos + 1
char2a = chr(hexdec(Mid(source, pos, 2)))
decodedStr = decodedStr & dechex & char2a
Else
decodedStr = decodedStr & dechex
End If
Else
decodedStr = decodedStr & dechex
End If
pos = pos + 2
Else
decodedStr = decodedStr & charAt
pos = pos + 1
End If
Loop

crossUrlDecode = decodedStr

End Function

이렇게 바꿨습니다.

그런데... 한글이 인코딩된 부분은 무조건 안나오네요.

utf8_decode()는 구현은 실력이 모자라 못하고... 인터넷서 찾는 중입니다.