Send Mail with voting buttons via Access

If you have instaled Outlook 8 or 9
(i don't know about Express) then you can use code, but before , when module is open, select Tools/References and check Microsoft Outlook X.0 Object Library.

Dim olapp As New Outlook.Application
Dim olMail As Outlook.MailItem
Set olMail = olapp.CreateItem(olMailItem)
olMail.Subject = "Important"
olMail.To = "Email@Adress.com"
olMail.Body = "This is text"
olMail.Attachments.Add File_Name
'olMail.Importance = olImportanceHigh

olMail.Display
'olMail.Send

Set olMail = Nothing
Set olapp = Nothing

Outlook 8
I know how to send the basic email but how would I use voting buttons?

Then try add lines to code before sending

olMail.VotingOptions = "Text1"
olMail.VotingResponse = "Text2"
 

Thank you Viesturs, that works.
I have another question:-
Is it possible to insert information from Access(98) into custom fields on a custom form in Outlook(98)?

Sorry, but i work more with Access than Outlook. I think if you can to create custom form in Outlook then is possible to insert data from Access. But you right, this is another question. :)

Regards

Why so long delay?

Comment accepted as answer

Sorry for delay, I forgot.