โค้ด ส่งเมล สงข้อความไปแล้วมันเปนภาษาจีน ช่วยแก้หรือแนะนำวิธีการทำให้้เปนภาษาไทยหน่อยคับ......ขอบคุณล่วงหน้าคับ

<meta http-equiv="Content-Type" content="text/html; charset=windows-874">
<%
username=Request("username")
passw=Request("passw")
email=Request("email")
code=Request("code")

Set message = Server.CreateObject("CDO.Message")
message.From = "[email protected]"
message.To = email
message.Subject = "Activate Code For www.liblike.com"
message.TextBody = "เรียนคุณ "&username&Chr(10)&_
"ทีมงาน liblike.com มีความยินดีเป็นอย่างยิ่งที่ท่านให้เกียรติสมัครเป็นสมาชิกกับเรา"&Chr(10)&_
"และทางทีมงาน liblike.com ได้ส่ง รหัสผ่าน เพื่อเข้าใช้งานในระบบสมาชิกของเว็บมาให้ท่าน ดังต่อไปนี้ "&Chr(10)&Chr(10)&_
"Login ของท่านคือ: "&username&Chr(10)&_
"Password ของท่านคือ: "&passw&Chr(10)&Chr(10)&_
"และการเปิดใช้งาน จำเป็นที่จะต้องได้รับการยืนยันกลับจากท่านด้วยการคลิ๊กที่ลิ้งค์ด้านล่างนี้"&Chr(10)&Chr(10)&_
"http://www.liblike.com/activate.asp?cd="&code&Chr(10)&Chr(10)&_
"จาก ทีมงาน liblike.com"

message.send
Set message = Nothing
%>