Hello,

i have a calc document with a button to send the document - but i don't
know how *g*. This little function is able to open a new mail mit a
given recipient.

I used UNO:SendMail befor, there i couldn't set the recipient :(. Any
sample code is also very nice.

I hope anyone is able to help. Thanks,
 Patrick


Sub send2
   cEMailAddress = "[EMAIL PROTECTED]"
   cSubject = "Some usual SPAM."

   oMailer = createUnoService( "com.sun.star.system.SimpleSystemMail" )

   oMailClient = oMailer.querySimpleMailClient()

   oMessage = oMailClient.createSimpleMailMessage()

   oMessage.setRecipient( cEMailAddress )
   oMessage.setSubject( cSubject )

   ' Now i want to attache this document, but i dont know how
   'oMessage.setAttachement( document )

   oMailClient.sendSimpleMailMessage( oMessage, 0 )
End Sub

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to