UTF-8 formatında txt dosyası oluşturma yardım!

arkadaşlar site ayarlarımı txt dosyasına yazmak istiyorum. mevcut kullandığım kodlar ANSI olarak kaydediyor. Bir türlü utf-8 olarak kaydedemedim

bunun için kullandığım kodlar
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set AyarDosya = fso.OpenTextFile(Server.MapPath("Ayarlar.asp"),2,-1)
AyarDosya.Write(AyarYaz)
AyarDosya.Close
Set AyarDosya = Nothing
Set fso = Nothing

aşağıdaki bölümü değiştirdim ama olmadı yine
(Server.MapPath("Ayarlar.asp"),2,-1)

konu hakkında bilgisi olan arkadaşlar varsa memnun olurum

Edit Plus kullanarak rahatlıkla utf-8 olarak kaydedebilirsiniz.

Bu sayfadaki ADODB.Stream bileşenini kullanabilirsin.
http://www.robvanderwoude.com/vbstech_files_utf8.php