Используйте форму фильтра :
tell application "iCal"
get every event of calendar cal ¬
where (start date ≤ (current date)) and (end date > (current date))
end tell
Обратите внимание, что start date
и end date
должны предшествовать (current date)
, в противном случае вы получите ошибку.