Saving any changes could cause a loss of design information.
I think you know this phrase. Handy. Necessary. A good thing. But sometimes a pain in the spot where the sun never shines.
With most design elements (if it’s save to do so) you just open the design element and save it and the message is gone next time
But what about image resources?
When I created the icon library, I did this in version 7.0 of Notes. When I then tried to go through the icons in an earlier version of Notes, I got that message for every icon. And no matter what I tried (refresh, open(?),…) the message kept appearing.
And if I got this message all the time, all other people with Notes versions prior to 7 would get the same re-appearing message. Which makes the library pretty useless. So I had to find a way around it.
On Notes.Net I discovered that there’s a field $DesignerVersion where design version information is stored. By creating a NotesNoteCollection with the image resources and setting this field, the problem was solved.
As version number I used 6.0. To my knowledge there wasn’t changed anything fundamental for these elements since this version.
Sub Initialize Dim session As New NotesSession Dim db As NotesDatabase Set db = session.CurrentDatabase 'Create note collection with image resources Dim nc As NotesNoteCollection Set nc = db.CreateNoteCollection(False) nc.SelectImageResources = True Call nc.BuildCollection 'Modify the collection - change the $DesignerVersion field nid = nc.GetFirstNoteId For i = 1 To nc.Count nextid = nc.GetNextNoteId(nid) Set doc = db.GetDocumentByID(nid) Call doc.ReplaceItemValue("$DesignerVersion","6.0") Call doc.Save(True,True) nid = nextid Next End Sub
Paste the code in an agent and let it role!