Вопрос : Как могу я сохранить блок в vbs?

Я создавал следующий сценарий. Он раскрывает LIst.txt и читает contents
A it.
List.txt, b, c, X
H, e, l, G

Code:
Dim FSO, Folder
Const ForReading = objFSO
Set 1
=
Set objFile=objFSO.OpenTextfile CreateObject («Scripting.FileSystemObject»)

Do («.txt C:\List») до тех пор пока
WholeLine = objFile.ReadLine
objFile.AtEndOfStream не детализировать = WholeLine
RL = разделило (детали,», ")
если
WScript.Echo RL UBOUND (RL) = (0) 'блок 4 elements
WScript.Echo RL, то (1)
WScript.Echo RL (2)
WScript.Echo RL (конец IF
wscript.echo 3)
»------------------------«
'I
Loop
objFile.Close
хотел было бы к preserver вышеуказанный блок и прочитало бы файл списка от внешней стороны loop

For каждого ....... 0)
Wscript.Echo RL
Wscript.Echo RL ((1)
Wscript.Echo RL (2)
Wscript.Echo RL (3)
Next

class=

Ответ : Как могу я сохранить блок в vbs?

Попытайтесь это:

iconv - f ASCII - t UTF-16 - textfile o outputfile