Помогите пожалуста, очень надо, в программирование не особо силен. Задача вот в чем

Работаю в CorelDraw10,
Очень часто приходится файлы (формата PDF сделанного из корела) отправлять по почте внутри локальной сети
Суть в следующем: чтоб нажимал кнопку (предварительные действия я сам напишу - а как к Thunderbird обратиться не знаю) и файл "D:\14117064.pdf" отправлялся по адресу "ML@ira" с темой "На согласование" и текстовым сообщением "Высылаю вам файл".

Раньше в Outlooke все работало так:
set obj = CreateObject("Outlook.Application")
set myItem = obj.CreateItem(0)
set myAttachments = myItem.Attachments
'файлы вложения
myAttachments.Add  "C:\usr\file1.txt", 1, 1
'и так далее можно много файлов указать

    myItem.Subject = "тема сообщения"
    myItem.Body ="текст сообщения: типа Высылаем вам usr файлы."
    myItem.To  ="misha@rif.ru"
'уведомлять о доставке
    myItem.OriginatorDeliveryReportRequested=1
    myItem.ReadReceiptRequested=1
'можно отобразить письмо на экране
'     myItem.display
'собственно отправка
    myItem.send
set obj = nothing
set myItem = nothing
set myAttachments = nothing

Спасибо