Sending a meeting request through AMS

[markczajka]

I know this sounds crazy, but is there a way to generate an outlook meeting request through AMS5? I'm getting this request from a client. I'm building an application with a conference itinerary, and the customer wants the user to be able to schedule a meeting that will be applied to a vendor's outlook calendar after they have agreed on a preset time. I would also add the meeting to the user's itenerary.

[Brett]

The only way that I could see this bing possible is to use the LuaCOM plugin to interface with outlook's COM interface and automate it that way. You will need knowledge of the Outlook object model to do this.

[markczajka]

What about using the vcalendar format?

See link below. Could this work? Perhaps I could send them a file they could double-click on or a link to the file?

http://www.devx.com/getHelpOn/10MinuteSolution/20508/1954?pf=true

[Worm]

here's some code I found on MS's site. Its for VB, but you should be able to convert it to luaCom easily enough.

   Sub ScheduleMeeting()
    Dim ol As New Outlook.Application
    Dim ns As Outlook.NameSpace
    Dim appt As Outlook.AppointmentItem

    'Return a reference to the MAPI layer.
    Set ns = ol.GetNamespace("MAPI")

    'Create a new mail message item.
    Set appt = ol.CreateItem(olAppointmentItem)
    With appt
        'By changing the meeting status to meeting, you create a
        'meeting invitation. You do not need to set this if
        'it is only an appointment.
        .MeetingStatus = olMeeting
        'Set the importance level to high.
        .Importance = olImportanceHigh

        'Create a subject and add body text.
        'Notice the hyperlink.
        .Subject = "Fabrikam Client Potential"
        .Body = "Let's get together to discuss the possibility of Fabrikam " & _
            "becoming a client. Check out their website in the meantime:" _
            & vbCrLf & "http://www.fabrikam.com"

        'Set the start and end time of the meeting and the location.
        .Start = "10:00 AM 10/9/97"
        .End = "11:00 AM 10/9/97"
        .Location = "Meeting Room 1"

        'Invite the required attendees.
        'These names will also be placed in the To field by default
        .RequiredAttendees = "RichardK; StefanieK"

        'Turn the reminder on and set it for 30 minutes prior.
        .ReminderSet = True
        .ReminderMinutesBeforeStart = 30

        'Send the meeting request out.
        .Send
    End With

    'Release memory.
    Set ol = Nothing
    Set ns = Nothing
    Set appt = Nothing
End Sub

[Brett]

See link below. Could this work? Perhaps I could send them a file they could double-click on or a link to the file?

http://www.devx.com/getHelpOn/10Minu...8/1954?pf=true

That looks like it might work. Worm's idea of converting the VBScript to LuaCOM should also work.

[TJ_Tigger]

Here is my go at doing this

function ScheduleMeeting()
	myolApp = luacom.CreateObject("Outlook.Application");
	myNameSpace = myolApp:GetNamespace("MAPI");
 	olAppointmentItem = 1;
 	myItem = myolApp:CreateItem(olAppointmentItem);
 	
 	myItem.RequiredAttendees = "[email protected]";
 	olMeeting = 1
	myItem.MeetingStatus = olMeeting;
	myItem.Subject = "Strategy Meeting";
	myItem.Body = "Lets get together to discuss the possibility of becoming a client.";
	myItem.Location = "Conference Room B";
	myItem.Start = "1:30 PM 2/28/05";
	myItem.End = "3:00 PM 2/28/05";
	myItem:Display();
	--uncomment to automatically send rather then display and comment the display item above.
	--myItem:Send();
	
	myolApp = nil;
	myNameSpace = nil;
	myItem = nil;
end

Let me know how it works for you.

Tigg