[RESOLVED] How to Write an encripted Text File???

[dilettante]

Maybe:

Dim Ary() As Byte
Dim I As Integer
Dim B as Byte

Ary = "Hello"
For I = 0 To UBound(Ary)
    B = Ary(I)
    'Use B?
Next

Ary = StrConv("Hello", vbFromUnicode)
For I = 0 To UBound(Ary)
    B = Ary(I)
    'Use B?
Next