fromdate = "'03.05.2012 00:00 AM'" todate = "'03.06.2012 00:00 AM'" currentAppointment = oItems.Find("[START] >= " + fromdate + " and [START] < " + todate)UT allows the signs between < pre> tags
>set date to german >set century on >oOutlook = Createobject('outlook.application') >oNameSpace = oOutlook.getnamespace('MAPI') >oDefaultFolder=oNameSpace.GetDefaultFolder(olFolderCalendar) >oItems = oDefaultFolder.items >fromdate = "03.05.2012 00:00:00" >todate = "03.05.2012 23:59:00" >currentAppointment = oItems.Find("[START] > " + "'" + fromdate + "'" + " and [START] < " + "'" + todate + "'")>Sorry but replace gt with greater than and lt with lower than. Universalthread does not allow the signs.