Don't get caught out like thousands of others around the world in the recent Ransomware Fiasco!
- Why it's not a good idea to wait before Patching
- Sensible approaches to Patching discussed
- Add your feedback, comments and suggestions
'Create an appointment in the Outlook Calendar - THIS CODE PUTS IT IN THE DEFAULT CALENDAR Dim objOutlook As Outlook.Application Dim objAppt As Outlook.AppointmentItem Set objOutlook = CreateObject("Outlook.Application") '''Set objAppt = objOutlook.CreateItem(olAppointmentItem) Set objFolder = OpenMAPIFolder("Personal Folders as of 7-25-08\Calendar\DSP Class Schedule") Set objAppt = objFolder.Items.Add With objAppt .Start = Me!Datehearing & " " & Me!Timehearing .Duration = 30 .Subject = Me!ClientContactID.Column(4) & " foreclosure hearing." .ReminderSet = False .Save .Close (olSave) End With Set objAppt = Nothing 'Release the AppointmentItem object variable Set objOutlook = Nothing 'Release the Outlook object variable
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|How to Migrate Windows Live Mail 2012 to Outlook 2016 on another pc||12||90|
|VB.Net Outlook.ReportItem Body Text convert to Readable Characters||5||38|
|Multiple Domains in Exchange 2016, Outlook 2010||5||29|
Join the community of 500,000 technology professionals and ask your questions.