=?KOI8-R?Q?=E1_=D7=D9_=DA=CE=C1=CC=C9=2C_=DE=D4=CF_=CD=CF?= =?KOI8-R?Q?=D6=CE=CF_=D0=C9=D3=C1=D4=D8_=C6=C1=CA=CC_=D7_=CC=C0=C2?= =?KOI8-R?Q?=CF=CA_=CB=CF=C4=C9=D2=CF=D7=CB=C5=3F?=

[Max B. <be...@ma...>]

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdapro02_2.asp

Set oStream = CreateObject("ADODB.Stream")
oStream.Mode = 3
oStream.CharSet = "utf-8"
oStream.Open
oStream.WriteText "юникод unicode"
oStream.SaveToFile "c:\a.txt"