Wiem Słoneczko

, dlatego podkreślam: jestem MEGA wdzięczny za wszelką pomoc

Dodatkowo powiem że jestem pod wrażeniem szybkiego zainteresowania się moim problemem, co świadczy o wysokiej motywacji forumowiczów -> JESTEŚCIE WSPANIALI
..dlatego proszę o pomoc, na chwilę obecną mam coś takiego:
Sub Main
cEMailAddress = "
jakisemail@gmail.com"
cSubject = "Będzie działało czy nie ?

!!!"
oMailer = createUnoService( "com.sun.star.system.SimpleSystemMail" )
oMailClient = oMailer.querySimpleMailClient()
oMessage = oMailClient.createSimpleMailMessage()
oMessage.setRecipient( cEMailAddress )
oMessage.setSubject( cSubject )
Dim vAttach(0)
vAttach(0) = "file:///e:/macro.txt"
oMessage.setAttachement(vAttach())
End Sub
Po uruchomieniu otwiera się aktywny klient poczty, załączony jest wskazany plik, odbiorca oraz temat są takie jakie być powinny, ale wszystko czeka na kliknięcie przycisku: "Wyślij". Co trzeba dopisać żeby automatycznie się wysłało bez ingerencji człowieka? Czy można też wpisać treść wiadomości?
Baaaaaaaaaaaaaaaaaaaaardzo dziękuję z góry za wszelką pomoc i wyrozumiałość
