Grazie mille per la gentile rispsota.
Sono riuscito a risolvere così: <%Response.charset="utf-8"%>
Con la tua indicazione mi escono ancora tutti caratteri indecifrati.
Nelle virgolette sotto invece come posso sostituire la frase in inglese con il cinese?
Grazie ancora
codice:
<%
Function MailSubscribe(strTo,strKey)
Dim SubscribeMail
Set SubscribeMail = Server.CreateObject("CDONTS.NewMail")
SubscribeMail.From = strPageTitle & "<" & strSenderMail & ">"
SubscribeMail.To = strTo
SubscribeMail.Subject = "Registration to the Newsletter of " & strWebSite & ""