[решено] VBS Использование данных из файла

[Elven]

Прошу заранее прощения за примитивный вопрос, но наверное у меня не в правильном направлении после праздников голова работает.
Скрипт должен брать построчно значения из текстового файла и запихивать в переменную, которая далее в скрипте используется. Работа скрипта должна завершаться если конец файла.

[Iska]

Option Explicit

Dim strSourceFile

Dim objFSO
Dim strLine


strSourceFile = "E:\Песочница\0348\0001.txt"

With WScript.CreateObject("Scripting.FileSystemObject")
If .FileExists(strSourceFile) Then
With .OpenTextFile(strSourceFile)
Do Until .AtEndOfStream
strLine = .ReadLine()

WScript.Echo "[" & strLine & "]"
Loop

.Close
End With
Else
WScript.Echo "Can't find [" & strSourceFile & "]."
WScript.Quit 1
End If
End With

WScript.Quit 0

[Elven]

спасибо. то что нужно.