Чтение переменных из ini файла с помошью vbscript

[koyra Профиль]

Всем привет,
Киньте код vbscript (файлы которого имеют расширение vbs) чтения переменных из файла ini.
P.S. не могу почему то найти стандартные функции для выполнения этой задачи.
Большое спасибо всем

[techquest Профиль]

Если, я правильно понял, то что-то в этом духе:


Function ReadIni()
Const ForReading = 1, ForWriting = 2, ForAppending = 3
Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
Dim FSO, IniF, TxtStr, Str
Set FSO = CreateObject("Scripting.FileSystemObject")
Set IniF = FSO.GetFile("D:\scripts\VBSript\ini\test.ini")
Set TxtStr = IniF.OpenAsTextStream(ForReading, TristateUseDefault)
Do While Not TxtStr.AtEndOfStream
Str = TxtStr.ReadLine
MsgBox Str
Loop
TxtStr.Close
End Function

ReadIni()