Отаправка данных по Е-мэйл

[BloodPoring]

Имеется программа которая делает опрос создает папку а в ней документ с данными опроса.Как сделать так чтобы этот документ был отправлен мне на мыло, либо чтобы были отправленны сами данные?
Заранее спасибо

[vladyank]

Примерно так


Sub SendBook(wb As Workbook, adress As String, subject As String)

wb.SendMail adress, subject

End Sub
Sub DemoSendBook()
SendBook ActiveWorkbook, "nnn@mail.ru", "Это тема послания"

'
End Sub