בעיה בשליחת אימייל CDO

שלום
כך נראה הקוד שלי

Dim mail
Session.CodePage=65001
Set mail = Server.CreateObject("CDO.Message")
mail.BodyPart.Charset = "windows-1255"
mail.To = Request.Form("fEmail")
mail.From = Request.Form("yEmail")
mail.Subject = "הודעה"
mail.TextBody = Request.Form("msgs")
Response.Write("ההודעה נשלחה")
Set mail = nothing

שלושה דברים שאני רוצה לעשות:
1. נושא ההודעה כפי שהוא עכשיו מגיע בג'יבריש. מה לעשות?
2. בשורה "אל" אני רוצה שיהיה כתוב שם השולח לדוגמה
"user <[email protected]>

איך אפשר לעשות זאת, הנתונים נלקחים מטופס, יש בו שם השולח, אימייל השולח…
3. לאחר השליחה, ההודעה "ההודעה נשלחה" מופיעה גם בגיבריש

ניסיתי בקידוד UTF-8 ו 1255 שניהם לא טובים.