classic asp 에서 한글깨짐 처리!! IE와 그외 브라우저 별도 처리, 접속 브라우저 체크

구글링을 아무리 해도, 그저 한페이지 전체를 변경하는 내용밖에 없어서.....헤매다가....

그러다 문득 재선언을 통해 가능할 것 같아서 했더니!!! 해결~ 했다고 생각했지만

ie하고, 크롬하고 다르게 적용을 해야 한다는것을 발견하고 다시 수정하여 완성!!​

작업한 내용을 간단하게 적어보면 아래와 같습니다.

1. escape, unescape 서버 함수로 선언

2. Request.ServerVariables("HTTP_USER_AGENT") 에서 msie 와 trident 인경우를 ie 인 것으로 체크

(msie 찾는건 예전 방식인것 같고, 실제 Request.ServerVariables("HTTP_USER_AGENT") 뿌려보면, trident 가 ie에만 있는것을 확인함)

3. ie인 경우에 euc-kr 환경변수 설정해서 파라미터 값을 받아서, escape 처리

4. utf-8 환경 변수 설정하고 escape 처리한값을 unescape 처리해서 다시 변수에 할당!

5. 크롬(chrome)인 경우에는 utf-8 환경 변수 설정 한 후에 파라미터를 변수에 할당!​

전체 소스는 아래에 있습니다!!

<%'s 1. 한글 키워드 깨짐 현상 해결 %>
<script language="javascript" runat="server">
function escapeUTF8(str) {
  return escape(str);
}

function unescapeUTF8(str) { 
  return unescape(str);
}
</script>
<%
Response.CharSet = "euc-kr"
Session.CodePage = "949"
Response.CodePage = "949"
Response.ContentType = "text/html;charset=euc-kr"
DIm CHECK_IE : CHECK_IE = "F"
Dim EUCKR_KEYWORD
Dim USER_AGENT : USER_AGENT = LCase(Request.ServerVariables("HTTP_USER_AGENT"))

IF InStr(USER_AGENT, "msie") > 0 Or InStr(USER_AGENT, "trident") > 0 Then
  CHECK_IE = "T"
  EUCKR_KEYWORD = escapeUTF8(Request("kw")) 'utf-8 페이지 전환 되기 전에 IE에서만 인코딩 처리 하여, 한글 깨짐 방지
End If
'e 1. 한글 키워드 깨짐 현상 해결
%>
<%
Response.Buffer   = TRUE
Response.Expires  = -1
Response.CharSet = "utf-8"
Session.CodePage = "65001"
Response.CodePage = "65001"
Response.ContentType = "text/html;charset=utf-8"
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "Expires","0"

's 2. 한글 키워드 깨짐 현상 해결
IF CHECK_IE = "T" Then
  EUCKR_KEYWORD = unescapeUTF8(EUCKR_KEYWORD) '변환된 값을 디코딩
Else 
  EUCKR_KEYWORD = Request("kw") 'IE이외에서는 넘어온대로 받음, 한글 깨짐 방지
End If
'e 2. 한글 키워드 깨짐 현상 해결
%>

이거 외에, 소스상에서 escape로 변환하는부분들을 ie, chrome 크로스 체크하면서 확인해서 처리완료.

지난주에 요청이 들어와서, 이걸 어떻게 처리해야하나 고민했었는데

해결해서 기분이 매우 좋네요~