ASP Vbscript OpenTextFile讀取UTF-8中文亂碼問題(UTF-8 file to Unicode file )
OpenTextFile可以讀取ASC以及unicode編碼但讀取UTF-8顯示中文會有問題
我的處理方式是先用程式把UTF-8轉換成unicode再顯示
讀取UTF-8文字檔案再使用ADODB.Stream匯出成一個新的unicode文字檔案
<html><title>測試</title>
<body>
<p>中文測試</p>
<p>
<%
Response.ContentType="text/html"
Response.Charset="UTF-8"
Response.Write("讀取檔案" )
response.write "<br>"
Set stream = CreateObject("ADODB.Stream")
stream.Open
stream.Type = 2 'text
stream.Charset = "utf-8"
stream.LoadFromFile Server.MapPath("ATEST01.csv")
text = stream.ReadText
stream.Close
Response.Write("讀完檔案準備匯出unicode格式" )
response.write "<br>"
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(Server.MapPath("output.csv"), 2, True, True)
f.Write text
f.Close
Response.Write("轉換編碼" )
response.write "<br>"
%>
</p>
</body>
</html>
留言