Пример программы на vbs

XRENANTES

Дайте, пожалуйста, пример vbs файла, в ктр реализована функция записи в файл.
Dim tagid
Sub AddInfo(tagid)
Dim fname,out
fname="C:\out.txt"
Open fname for output as #out
Print #out, tagid
close #out
End Sub
вот это почему-то не проходит

0000

Пример могу дать только вечером.
Если горит, то иди на сайт MS и скачивай оттуда chm файл по Windows Script Host.
Или просто в репозитарий готовых скриптов зайди.
Там все примеры есть.
То что у тебя написано - не покатит. Должно быть так

' Псевдокод

objFSO = СоздатьОбъектФайловойСистемы

objF = objFSO.СоздатьТекстовыйФаил

objF.WriteLine "Bla-bla"

objF.Закрыть

0000

Как обещал

Const ForReading = 1, ForWriting = 2

Dim fso, f

Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)

f.Write "Hello world!" 

Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)

WriteToFile =   f.ReadLine

f.Close

XRENANTES

спасибо огромное!