I seem to be having issue running this. I have tested the script as a vbs file and works fine, but when trying to run in from with in my aspx page it doesn't seem to create the meeting in outlook.
This is the script
and this is how I am calling the script
I don't get an error which is making it rather frustrating it acts like it runs but yet doesn't create the meeting.
Windows Haiku:
Serious error.
All shortcuts have disappeared.
Screen. Mind. Both are blank.
This is the script
Code:
<script type="text/vbsrcipt">
Sub CommandButton1_click(location,startdate,enddate)
Dim objOL
Dim objAppt
Const olAppointmentItem = 1
Const olMeeting = 1
Const olFree = 0
Set objOL = CreateObject("Outlook.Application")
Set objAppt = objOL.CreateItem(olAppointmentItem)
objAppt.Start = startdate
objAppt.Start = enddate
objAppt.Location = location
objAppt.ReminderMinutesBeforeStart = 15
objAppt.BusyStatus = olFree
objAppt.Save()
Set objAppt = Nothing
Set objOL = Nothing
End Sub
</script>
and this is how I am calling the script
Code:
<input type="button" value="Outlook" onclick="vbscript:CommandButton1_click( '{string(@Resource)}','{string(ddwrt:FormatDateTime(string(@RERStartDate),1033,'MM/dd/yyyy HH:mm:ss'))}','{string(ddwrt:FormatDateTime(string(@REREndDate),1033,'MM/dd/yyyy HH:mm:ss'))}')"/>
I don't get an error which is making it rather frustrating it acts like it runs but yet doesn't create the meeting.
Windows Haiku:
Serious error.
All shortcuts have disappeared.
Screen. Mind. Both are blank.