Cuestión : ¿Cómo puedo preservar un arsenal en vbs?

He creado la escritura siguiente. Abre LIst.txt y lee el contents
A, B, C, X
H, E, L, G

Code de it.
List.txt: el
Dim FSO, Folder
Const ForReading = objFSO del
Set de 1
= el

Do del
Set objFile=objFSO.OpenTextfile (“.txt de CreateObject (“Scripting.FileSystemObject”) de C:\List”) hasta que el
WholeLine = objFile.ReadLine
de objFile.AtEndOfStream detalle = WholeLine
RL = partió (los detalles,”, el ")
si el
de UBOUND (RL) = WScript.Echo RL (0) 'un arsenal cuatro del elements
WScript.Echo RL (1)
WScript.Echo RL (2)
WScript.Echo RL (extremo IF
wscript.echo de 3)
”------------------------“el
'I del
Loop
objFile.Close
del quisiera al conservante el arsenal antedicho y leería el archivo de lista fuera del loop

For cada uno ....... 0)
Wscript.Echo RL (1)
Wscript.Echo RL (2)
Wscript.Echo RL (3)
Next

del
Wscript.Echo RL ( class= del

Respuesta : ¿Cómo puedo preservar un arsenal en vbs?

Intentar esto:

iconv - f ASCII - t UTF-16 - archivo de texto outputfile de o