Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Dim objOutlook As Outlook.Application objOutlook = New Outlook.Application() Dim objNS As Outlook.NameSpace = objOutlook.Session '---------Write to Shared calendar----------------- Dim objFolder As Outlook.MAPIFolder = objNS.Folders.Item("email@example.com") objFolder = objFolder.Folders.Item("Calendar") '=========Add appointment to calendar================= Dim objApp As Outlook.AppointmentItem objApp = CType(objFolder.Items.Item(Outlook.OlItemType.olAppointmentItem), Outlook.AppointmentItem) With objApp .Subject = calSubject '.Location = "Main Office" .Body = (calBody) .Start = CDate(calDateStart & " 09:00") ' Added a reminder .ReminderMinutesBeforeStart = 1 .ReminderSet = True ' Added duration '.Duration = 120 ' Add logged in Windows user .RequiredAttendees = Environment.UserName ' Save first .Save() ' Send to logged in Windows user .Send() End With
|I need help converting a bitmap to an image in VB.Net||1||42|
|Import a txt file into a DataGridView and TextBox||20||51|
|Help with exporting to excel||4||35|
|VB.NET 2008 Winforms Signing||13||30|