1 Тема от bnp322

  • bnp322
  • Участник
  • Неактивен

Тема: VBS. Как работать с TextStream

Set FSO = CreateObject("Scripting.FileSystemObject")
Set TextStream = FSO.CreateTextFile("C:\tmp.txt")
Set File = FSO.GetFile("C:\tmp.txt")
....
Message.TextBody = TextStream.ReadAll()

Подскажите! Я сначала в цикле пишу несколько строчек текста в файл, а затем вне цикла читаю этот файл в качестве тела письма.

Возможно нужно делать это (операции с промежуточным файлом tmp.txt) по другому, как!?

2 Ответ от alexii

  • alexii
  • Разработчик
  • Неактивен

Re: VBS. Как работать с TextStream

Set File = FSO.GetFile("C:\tmp.txt")

Это к чему — не понятно. К тому же, зачем что-то писать в файл, затем в том же скрипте его читать? Всё это можно заменить обычной переменной:

strText = "bla-bla-bla"
strText = strText & "bla-bla-bla"
…
Message.TextBody = strText

3 Ответ от bnp322

  • bnp322
  • Участник
  • Неактивен

Re: VBS. Как работать с TextStream

Спасибо!