Hab den Link nicht mehr. Leider nur noch den Text...
Vielleicht ist das ja interessant für Dich.
Grüsse!
Dialog displaying missed alarms you had previously acknowledged pops up when starting Notes
Technote (FAQ)
Question
A "Missed Alarms" dialog box keeps popping up when you launch Lotus Notes® Client. You acknowledge the pop-up to dismiss the alarms dialog (by selecting the Done button in the dialog), thinking that these "missed events" will no longer pop up. However, no matter what you do, these same past events keep popping up in Notes® Client each day.
Answer
This issue occurs in cases where the LastAlarmDate item (field) in the CalendarSettings profile does not reflect the date and time alarm was last displayed. This issue has been reported to Quality Engineering as SPR# ATHS6GMRLV, and it will be investigated for future releases.
This issue may be more prevalent in cases where a Welcome Page is being used and it is set to display your mail file.
Possible workaround:
The LastAlarmDate item in the profile could be automatically updated using LotusScript code. Add the following LotusScript code to the mail file's Database Script - QueryClose event. This code will force an update to the CalendarSettings profile document's LastAlarmDate item when the mail file is closed.
NOTE: The code below is a sample provided to illustrate one way to approach this issue; it should be used as is and at your own risk. In order for this example to perform as intended, the script must be laid out exactly as indicated below. Product Support cannot customize this script for specific environments or applications.
Sub Queryclose(Source As Notesuidatabase, Continue As Variant)
Dim s As New notessession
Dim db As notesdatabase
Dim profile As notesdocument
Dim calprofile As notesdocument
Dim ownername As notesname
Dim item As notesitem
Set db = s.CurrentDatabase
Set calprofile = db.getprofiledocument("Calendarprofile")
If calprofile Is Nothing Then Exit Sub
Set item=calprofile.GetFirstItem("Owner")
If item Is Nothing Then Exit Sub
Set ownername = New NotesName(calprofile.GetItemValue("Owner")(0))
If ownername.canonical = s.username Then
Set profile = db.getprofiledocument("CalendarSettings", s.UserName )
If profile is Nothing then Exit Sub
profile.lastAlarmDate=Now
Call profile.Save(True, True)
End If
End Sub
Thema: Erinnerung an vergangene Termine (Gelesen 4299 mal)