przekonwertuj utf-8 na iso-8859-1 w klasycznym asp
Moja strona działa teraz wyłącznie w UTF-8, ale w celu wysłania SMS-a za pomocą serverXMLHTTP muszę przed wysłaniem przekonwertować moją wiadomość z UTF-8 na ISO-8859-1.
Sytuacja jest równoległa do tego:
a.asp:
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head><body>
<form method="post" action="b.asp">
<input type text name="message" value="æøå and ÆØÅ"><br>
<input type=submit>
</body>
a następnie b.asp
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1">
</head><body>
<%=konvert(request("message"))%><br>
</body>
<%
Function Konvert(sIn)
Dim oIn : Set oIn = CreateObject("ADODB.Stream")
oIn.Open
oIn.CharSet = "UTF-8"
oIn.WriteText sIn
oIn.Position = 0
oIn.CharSet = "ISO-8859-1"
Konvert = oIn.ReadText
oIn.Close
End Function
%>
W tej prezentacji spodziewałbym się zobaczyć ten sam ciąg w b.asp, kiedy wysyłam i a.asp, ale to, co dostaję to:
æøå and ÆØÅ
Jakieś pomysły?