У меня есть шаблон Outlook для рассылки клиентам.
Но это мерзкое детище Билла Гейтса не запрашивает подтверждение на сохранение шаблона. Нажмешь по привычке CTRL+S и шаблон сохранится, затерев основной текст шаблона.
Долго я так мучался, у меня был даже запасной шаблон, из которого я восстанавливал копию.
Но потом мне это надоело, ведь я все же программист. И я написал скрипт, который копирует базовый шаблон, создает временный и открывает уже его.
Всего несколько строк кода, а какое облегчение! Вот почему программистам платят так много бабла - они упрощают жизнь!
src = "r:\desktop\Дела\Шаблоны писем\Рассылка клиентам.msg"
dst = "m:\fixin\Temp\1.msg" 'Понимает только краткое имя файла почему-то
Set FSO = CreateObject("Scripting.FileSystemObject"
FSO.CopyFile src, dst, 1
set WshShell = WScript.CreateObject("WScript.Shell")
commandline ="START ""RUN""" + dst + """"
'WScript.echo commandline
commandline = dst
WshShell.Run(commandline)
Journal information