Сообщество Чайников

Вопрос

При использовании VBScript создает текстовый файл на диске мне нужно чтобы содержимое файла было в двойных кавычках т.е. " " Я пользовался следующим форматом записи

Set er=CreateObject("Scripting.FileSystemObject")
Set aeb=er.CreateTextFile("C:\rg.txt")
aeb.WriteLine "45687"
aeb.WriteLine " "
aeb.WriteLine " "Flagsopyt"=000003025555555"

Здесь вылетает ошибка. Мне нужно, чтобы запись в файле была в двойных кавычках т.е."Flagsopyt"=000003025555555 что я могу сделать aeb.close

Ответ

Надо использовать функцию Chr, которая возвращает значение типа String, содержащее символ, соответствующий указанному коду символа.

aeb.WriteLine Chr(34) & "Flagsopyt" & Chr(34) & "=000003025555555"

Из конференции Expert_FAQ

Каждая кавычка просто удваивается. aeb.WriteLine " ""Flagsopyt""=000003025555555"

tmp