• notepad kreirajDogodjaj.vbs

Const olAppointmentItem = 1
Const olRecursDaily = 0
Set objOutlook = CreateObject("Outlook.Application")
Set objAppointment = objOutlook.CreateItem(olAppointmentItem)
objAppointment.Start = #2023-05-30#
objAppointment.AllDayEvent = True
objAppointment.Subject = "Proba123_subjekat"
objAppointment.Body = "Proba123_BODY" & vbCrLf & "Drugi redak"
objAppointment.Location = "http://jednostavno.somware.org/blabla"
objAppointment.ReminderMinutesBeforeStart = 120
objAppointment.ReminderSet = True
' Ovo ispod je za slucaj da imas recurrence
' Set objRecurrence = objAppointment.GetRecurrencePattern
' objRecurrence.RecurrenceType = olRecursDaily
' objRecurrence.PatternStartDate = #2023-05-30#
' objRecurrence.PatternEndDate = #2023-05-31#
objAppointment.Save

Pokretanje:

• cscript kreirajDogodjaj.vbs

UTF-8 UTF8 čžšovi ovdje neće ići, VBscript to ne jeb prihvaća.

hxxps://devblogs.microsoft.com/scripting/hey-scripting-guy-how-can-i-schedule-an-all-day-event-in-microsoft-office-outlook/

---

outlook olk cmd cli commandline command line command-line create event allday all-day događaj calendar kalendar xoutlook xolk xcmd xcli xcommandline xcommand xline xcommand-line xcreate xevent xallday xall-day xdogađaj xcalendar xkalendar