시스템의 언어를 판별해서 해당 언어셋에 맞는 페이지를 보여주고자 할 때 사용하면 유용하다.
Request.ServerVariables의 컬렉션 개체 중에
HTTP_ACCEPT_LANGUAGE로 값을 요청하면 시스템 로케일 언어값을 반환해 준다.
아래 소스코드로 보면 이해가 빠를 것이다.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 | <% Option Explicit Dim strLang Dim strPos strLang = Request.ServerVariables("HTTP_ACCEPT_LANGUAGE") strLang = Left(strLang,2) Response.Write(strLang+"<br>") Select Case LCase(strLang) Case "en" : Response.write "사용자 시스템언어는 영어입니다." 'Response.Redirect "English.asp" Case "fr" : Response.write "사용자 시스템언어는 프랑스어입니다." 'Response.Redirect "French.asp" Case "de" : Response.write "사용자 시스템언어는 독일어입니다." 'Response.Redirect "German.asp" Case "ja" : Response.write "사용자 시스템언어는 일본어입니다." 'Response.Redirect "Japanese.asp" Case "ko" : Response.write "사용자 시스템언어는 한국어입니다.." 'Response.Redirect "korean.asp" Case else : Response.write "그 외의 언어입니다.." 'Response.Redirect "korean.asp" End Select %> | cs |
'프로그래밍 > ASP' 카테고리의 다른 글
[ASP] FileSystemObject 관련 메소드 정리 (0) | 2017.08.11 |
---|---|
[ASP] Server.CreateObject 객체 정상적으로 생성됐는지 확인방법 (0) | 2017.08.10 |
댓글