Access, utilizzando vba come salvo in Unicode?

[deamon75]

Tramite vba in access salvo un file txt però come imposto il formato di codifica in Unicode?
In questo modo creo il file e lo salvo:

Open "C:\File.txt" For Output As #1
RSx.MoveFirst
Do Until RSx.EOF
   Write #1, " BLA BLAH "
   RSx.MoveNext
Loop
Close #1