I have run into an issue with a calendar button created in a note not posting the entry correctly in other country because they use different Date Format e.g. for Germany the date is coded as dd.mm.yyyy (instead of mm/dd/yyyy in the US) so there is a swap in month and day. Is there a line of code that will check for the date-format on the machine receiving the button and then set the calender accordingly? below is the code currently using:
Sub Click(Source As Button)
'=======================================================================================
' CHANGE THINGS IN THIS SECTION
'=======================================================================================
' this determines which type of calendar entry to make, choose from Appointment, Event, and Reminder
calEntryType = "Appointment"
'this set of variables is for the calendar entry that will be created
calEntrySubject = "Brown Bag on 'Test'" +Chr(10)+"Presented by Will Atherton"+Chr(10)+"Friday, 7/11/2008, noon-1pm EDT"+Chr(10)+"Hosted from RTP, NC in Bldg 205/DD161"+Chr(10)+"Toll free: 1-888-241-8547"+Chr(10)+"Conference passcode: 324300"+Chr(10)+"Toll: 1-719-884-0812"+Chr(10)+"Tie: 650-3324"
calEntryDetails = "Charts will be posted to our website http://stgweb.raleigh.ibm.com/MBDev/Technology.html by that morning and audio normally posted shortly after session."+Chr(10)+""+Chr(10)+""+Chr(10)+""+Chr(10)+""
calEntryStartTimeStr = "2008-07-11 12:00:00 PM EDT"
calEntryEndTimeStr = "2008-07-11 01:00:00 PM EDT"
' these are the checkboxes from the options section of a calendar entry
markPrivate = False' Mark Private - do not show other users the details of this calendar entry
remindUser = True ' Notify Me - have Notes remind the user before the calendar entry time
' this set of variables determines whether or not to display the calendar entry to the user after it's added to their calendar
displayCalendarEntry = True ' turns the feature of displaying the saved calendar entry to the user - valid values are True and False
' this set of variables is for the displaying a message to the user if they press the button
displayMessage = True ' turns the message box feature on and off - valid values are True and False
messageToDisplay = "Thank you. The Brown Bag invitation for 7/11/2008 has been added to your calendar."
' this set of variables deal with sending a reply to the sender of the note when the user presses the button
sendReply = False' turns the reply feature on and off - valid values are True and False
replyRecipient = "Jane Doe/Raleigh/IBM" ' who should get the reply - separate multiple recipients with a comma (,)
replySubject = "Yes, I will attend.." ' subject of the reply message
' this determines which calendar to put the entry into. If a button is used in email only, it is likely that the calendar entry should be
' created in the email recipient's calendar. If the button is used in a different context (such as in an application somewhere) this
' may not necessarily be the case since the button will not be in an email note.
' The valid values for this are True and False
buttonUsedInEmailOnly = True
'=======================================================================================
Call createCalEntry()
End Sub