vbscript Отправка почты #325868

Написал вот такую ф-цию Все прекрасно пока в качестве параметра ТекстСообщения передается одна строка, т.е. не содержит Симв как толко две строки сразу Возникает сообщение об ош-ке Unterminated string constant Как быть? Заранее признателен

может убрать |Body = CType(Body, String) ЗЫ: В скриптах я чайник, за сурьезный совет не принимай, просто идея...

че так сложно ? все чиста в коде адинес делается с тойже ЦДО

"Чиста" в коде одинце "чиста" не совсем та скорость :)

Вася, тебе же сказали, что ЦДО юзать так и так нада... Нормальная там скорость...

Если хотите оставить код без изменений, то нужно в передаваемой строке заменить все Симв на " & chr & " А лучше .

пробовал, не помогло :(

мож не правильно понял, но разве не резе ЦДО сделано? CDO.Configuration CDO.Message

только пробовал CStr(Body). CType ругнулся Недопустимое число аргументов или присвоение значения свойства: 'String' Спасибо помогло: ТекстСообщения=СтрЗаменить(ТекстСообщения,Симв,""" & chr & """);

+ Если нужно вложить файл добавляем .AddAttachment Полный путь к ф-лу, мож. кто знает как отправить несколько файлов?

up

Еще добавляй AddAttachment Полный путь к ф-лу, Пока iMsg не обнулишь аттачи остаются и просто добавляются.