Dev/Web

UTF-8 인코딩 방식으로 다국어 페이지 만들기

newtype 2005. 6. 21. 18:33
1. 일반 Ansi 형식이 아닌 UTF-8형식의 Text파일로 스크립트 파일을 저장합니다.

2. <% @Codepage = "65001" %>
서버 스크립트 최상단에 위의 코드를 넣어줍니다.

3. <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
 html 해더부에 위의 코드를 넣어 줍니다.

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
예재 소스 입니다.

inputUnicode.html
------------------------------------------------------------
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>

</HEAD>

<BODY>
<FORM METHOD=POST ACTION="testUnicode.asp">
<INPUT TYPE="text" NAME="uniText" size=100>
<INPUT TYPE="submit">
</FORM>
</BODY>
</HTML>


testUnicode.asp
------------------------------------------------------------
<% @Codepage = "65001" %>
<!--#include virtual="/include/dbcon.asp"-->
 <!--#include virtual="/include/function.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>

</HEAD>

<BODY>
<%
Set db=Server.CreateObject("ADODB.Connection")
db.Open DbConstring


'-------------------------------------------------------------
'  유니코드 DB에 넣기 테스트
'-------------------------------------------------------------

if  request("uniText") <> "" then


response.write "<hr><br><B>DB넣기<U></U></B><br>"

sql = "INSERT INTO tblText ( test ) values ( N'" & request("uniText") & "')"
response.write sql & "<br>"

db.Execute sql

response.write "<br>넣은값 : " & request("uniText") & "<br>"


end if

'-------------------------------------------------------------
'  유니코드 DB에 읽기 테스트
'-------------------------------------------------------------
response.write "<hr><br><B>DB읽기</B><br>"

sql = "select test from tblText"

Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql, db

Do until rs.EOF

       response.write "<br>" & stripHTML(rs("test")) & "<br>"
 
  rs.MoveNext  
Loop


%>
</BODY>
</HTML>


function.asp
------------------------------------------------------------

<%
Function stripHTML(strHTML)

strHTML = Replace(strHTML, "<", " & l t ;")   ' 사용할땐 공백없애고요
strHTML = Replace(strHTML, ">", "& g t ;")

stripHTML = strHTML

End Function


%>


dbcon.asp는 상황에 따라..^^

그리고, mssql의 tblText 테이블의 test 필드는 nvarchar형이어야 합니다.
반응형