Re: Script error

• Previous message: kinrowan: "How to verify timestamp"
• In reply to: pk: "Script error"
• Messages sorted by: [ date ] [ thread ]

Date: Tue, 23 Mar 2004 13:57:09 -0800

Hi "pk"

Don't think you are going to be able to avoid the message. That is the way
that MS has addressed the issue of code accessing the outlook address book
without user intervention and propagating worms a 'la Melissa.

HTH and have a great day!

Steve

"pk" <anonymous@discussions.microsoft.com> wrote in message
news:9B7EC930-A58B-405E-9BE5-CBA44FACDA38@microsoft.com...
> When I run this script it works, but I get a warning that stats someone is
trying to access outlook address book how long do you want to allow access
1min etc. blah blah blah.... ok or cancel. How can I avoid this? This is
just a test script what will happen is that the user will be able to selelct
from a userform to select the people that they want to have at the meeting.
So haveing this message will cause useres to have a problem. I want to add
this as a menu bar/button and then start the script.
> TIA
>
> Public Sub meeting()
> On Error GoTo line1
> Set myOlApp = CreateObject("Outlook.Application")
> Set myItem = myOlApp.CreateItem(olAppointmentItem)
> myItem.MeetingStatus = olMeeting
> myItem.Subject = "Strategy Meeting"
> myItem.Location = "TBD"
> myItem.Start = #3/21/1997 1:30:00 PM#
> myItem.Duration = 90
> Set myRequiredAttendee = myItem.Recipients.Add("Name, One")
> myRequiredAttendee.Type = olOptional
> Set myOptionalAttendee = myItem.Recipients.Add("Name, Two")
> myOptionalAttendee.Type = olRequired
> myItem.Display
> line1:
> End Su

• Previous message: kinrowan: "How to verify timestamp"
• In reply to: pk: "Script error"
• Messages sorted by: [ date ] [ thread ]