Not really sure I can live with a limitation like this one !! 🙂
It appears that one can use an HTML closing in iNotes if you enclose the signature in square brackets (). It doesn’t solve the problem of using a company logo or similar without linking to it (as opposed to embedding it in the e-mail).
[<font color="#727785" size="-2" face="Verdana, Arial, sans-serif"> <br> Med venlig hilsen, <br> <b>Mikkel Heisterberg</b><br> it-inspiration aps - farvergade 2 - 1463 copenhagen k - denmark - <br> phone: +45 7022 3141 - fax: +45 3316 0290 - mobile: +45 2682 5673 - email: <withheld><br> </font>]
Update on 1 December 2004 @ 23:03
Hmmm…. It appears that changing the signature in iNotes also changes the signature in Notes (which doesn’t really make sense to me). So if you do the above (html signature in square brackets) you will mess up your Notes signature.
After researching it a bit it appeared that all users were running Windows XP SP2 which really is the clue. When running WinXP SP2 against a Domino 6.5.1 (or previous) server you may get this error since service pack 2 replaces a data access component used by iNotes.
The fix is either to upgrade the server to 6.5.2 or later or to toggling the “Character set in header” setting on the server document (under “Internet Protocols””Domino Web Engine”) to “Disabled”.
There is a technote on the subject here.
Found an article on developerWorks about notes.ini settings that affect iNotes.
I specially like iNotes_WA_LogoutRedirect which allows you to set the page users should be redirected to after logging out. This is great for sending users back to the login page which really should be the default setting in my opinion.
The problem occurs when calling the RemoveAllElements() method since the Vector isn’t reset correctly, though all elements are removed.
The method should be changed from:
Public Sub removeAllElements() Dim i As Integer For i = 0 To Me.size() - 1 If Isobject(array(i)) Then Set array(i) = Nothing Else array(i) = "" End If Next i End Sub
Public Sub removeAllElements() Dim i As Integer For i = 0 To Me.size() - 1 If Isobject(array(i)) Then Set array(i) = Nothing Else array(i) = "" End If Next i 'reset vector elementLength = 0 ensureCapacity(10) End Sub
I also did a simple extension of the Vector class to create a Set (or “Zet” since “Set” is a reserved word in LotusScript).
Public Class Zet As Vector 'declarations Private pValues As Vector '/** ' * Constructor. ' */ Public Sub New() Set Me.pValues = New Vector() End Sub '/** ' * Adds only unique elements. ' */ Public Sub AddElement(d As Variant) 'see if the vector contains this element already If Not Me.pValues.Contains(d.UniversalID) Then Call Vector..AddElement(d) Call Me.pValues.AddElement(d.UniversalID) End If End Sub Public Function Size() As Integer Size = Vector..Size() End Function Public Function Elements() As Enumeration Set Elements = Vector..Elements() End Function End Class