How can I auto accept invitations to my calendar and then have them forwarded and auto accepted in another?

Hello everyone!

I'm trying to figure out how I can automatically accept meetings in Outlook 2003, have it forwarded to another shared account and have that account automatically accept the meeting request as well.

I tried enabling the auto accept feature in Outlook in Options, then created a forwarding rule to forward any meeting requests to the shared account, and then used a profile switch to enable the auto accept rule there as well.  However this didn't work. Am I missing something??

The email server is Exchange and I do know of the auto accept handler for Exchange but would like to keep this client side if possible.
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

David LeeCommented:
Hi, MilleniumFalcon.

The auto accept feature only applies to resource account, not regular mailboxes.  I think I can do this with a bit of scripting.  Is that an option?
MilleniumFalconAuthor Commented:
Scripting is fine :)
David LeeCommented:
Ok, here's the script.  You'll use the same basic script on both computers.  Pay attention to the comment in code about what to do for the second person.  I haven't tested this with a second person, so I'm not sure the forward portion works properly.

1.  Start Outlook
2.  Click Tools->Macro->Visual Basic Editor
3.  If not already expanded, expand Microsoft Office Outlook Objects and click on ThisOutlookSession
4.  Copy the code from the Code Snippet box and paste it into the right-hand pane of
5.  Outlook's VB Editor window
6.  Edit the code as needed.  I included comment lines wherever something needs to or can change
7.  Click the diskette icon on the toolbar to save the changes
8.  Close the VB Editor
9.  Click Tools->Macro->Security
10. Set the Security Level to Medium
11. Close Outlook
12. Start Outlook
13. Outlook will display a dialog-box warning that ThisOutlookSession contains macros and asking if you want to allow them to run.  Say yes.
Private WithEvents olkFolder As Outlook.Items
Private Sub Application_Startup()
    Set olkFolder = Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub Application_Quit()
    Set olkFolder = Nothing
End Sub
Private Sub olkFolder_ItemAdd(ByVal Item As Object)
    Dim olkAppointment As Outlook.AppointmentItem, olkMeeting As Outlook.MeetingItem
    If Item.Class = olMeetingRequest Then
        Set olkAppointment = Item.GetAssociatedAppointment(True)
        Set olkMeeting = olkAppointment.Respond(olResponseAccepted, True)
        'Remove the next four, five if you count the comment, lines of code for the second person'
        Set olkMeeting = Item.Forward
        'Change the address on the following line'
        olkMeeting.Recipients.Add ""
    End If
End Sub

Open in new window

Determine the Perfect Price for Your IT Services

Do you wonder if your IT business is truly profitable or if you should raise your prices? Learn how to calculate your overhead burden with our free interactive tool and use it to determine the right price for your IT services. Download your free eBook now!

MilleniumFalconAuthor Commented:
HIa! Thanks for the script.

On the client side it works great!

An update from the end user, the shared calendar is utilized via OWA.

So two questions come to mind:

A) can this be somehow enabled via OWA
B) can someone log into the shared account via Outlook through an alternate profile, setup a simple rule to just accept this, and have it auto apply non-outlook client side..or...?
David LeeCommented:
"can this be somehow enabled via OWA"

No.  Scripts only work in the full Outlook client.  OWA is Outlook in name only.  It is really an Exchange process running at the server.  It does not support any scripting.

"can someone log into the shared account via Outlook through an alternate profile, setup a simple rule to just accept this, and have it auto apply non-outlook client side..or...?"

I'm not clear on what you mean.  The process cannot be handled via a rule.  If it could, then there'd be no need for the script.
MilleniumFalconAuthor Commented:
Ok, so I guess the problem then is on the other side.
The shared account/calendar is one that just sits on the server, and everyone has access to it, e.g. they login to see it via OWA.

So nothing can be done server side to allow for any scripting, etc, to just auto accept based off script or otherwise?
David LeeCommented:
Exchange does support scripting via event-sinks.  However, unlike scripting at the client a poorly written or buggy event-sink script can bring the entire server down.  I avoid them.  I'm sure an event-sink could be built to do this, I just recommend finding someone with a lot of experience to build it.  

Wouldn't a solution be to set up a computer with Outlook and leave it running all the time to handle this function?

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
MilleniumFalconAuthor Commented:
Dunno if thats a possibility but i'll suggest it.

Either way, thanks for the script, I do appreciate it and will be using it for other purposes as well :)
David LeeCommented:
You're welcome. Glad I could help out.
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today

From novice to tech pro — start learning today.