Hi guys
I have a textbox that contain some text in Persian. I need this text as utf-8 unicode string
I have a code but this code export a file,I need save it as a variable
I have a textbox that contain some text in Persian. I need this text as utf-8 unicode string
I have a code but this code export a file,I need save it as a variable
Code:
Sub Save2File(sText, sFile)
Dim oStream
Set oStream = CreateObject("ADODB.Stream")
With oStream
.Open
.Charset = "utf-8"
.writetext sText
.SaveToFile sFile, 2
End With
Set oStream = Nothing
End Sub