Lotus Notes — рабочий инструмент программиста.

Google Suggest-type Lookups In Notes (updated Jan 9, 2005)

Lotus Notes Web Datepicker

LS2J Examples Database

Sub RefreshAllViews(db As NotesDatabase)
‘ posted to http://www.openntf.org/Projects/codebin/codebin.nsf/0/C4BA0B2EC810D7EE8625751C0051534A
‘ written by Mike Mortin, 20081211
Dim s As New NotesSession ‘ use the current db if none is specified
If db Is Nothing Then set db = s.CurrentDatabase ‘ refresh all views
Forall view In db.Views
‘ Print "Refreshing view ‘" & view.Name & "’"
Call view.Refresh
End Forall
End Sub

The view XML you get using ?ReadViewEntries is descriptive. The tree structure of view categories is maintained via position attribute, not via XML structure. I needed a view XML with tree structure to display a categorized Notes view in TreeView component in .NET. This is the XSLT that can do the trick. Simply transform your view XML with this XSLT, and you get a hierarchical XML. The first column value in the view entry is loaded into a "value" attribute, UNID is loaded into "unid" attribute.

Embed this LotusScript in a button or in the postopen sub of a database script. With it, users can clear their local caches without deleting their cache.ndk files. Here is the code : ************************** Dim WorkSpace As New NotesUIWorkspace
Dim DbCache As NotesDatabase
Dim AllDocs As NotesDocumentCollection
Dim Doc, nextDoc As NotesDocument
Dim i As Integer On erreur Goto ErrorHandling Set DbCache = New NotesDatabase ("", "cache.ndk")
Set AllDocs = DbCache.AllDocuments
If AllDocs.Count > 0 Then
Print "deleting documents from cache.ndk …"
Set Doc = AllDocs.GetFirstDocument
While Not ( Doc Is Nothing )
i = i + 1
Set NextDoc = AllDocs.GetNextDocument ( Doc )
Print "deleting documents from cache (" & Cstr (i) & "/" & Cstr ( AllDocs.Count ) & ")"
Call Doc.RemovePermanently ( True )
Set Doc = NextDoc
Wend
End If
Print "Compacting cache.ndk"
Call DbCache.Compact Exit Sub ErrorHandling : Resume
Call WorkSpace.Prompt (1, "Cache.ndk Optimization", "An error has occured." ) ************************** Pascal LUCAS. http://www.upteamind.fr

This database contains a small sample application, which shows you, how you can access OpenOffice or Symphony from within LotusScript by using the COM-UNO Bridge, that comes with these two products. Until today, documentation that is good for most of us LS programmers is sparse. And samples are rare. This database contains an application, which almost immediately with some small adaptations may be used to produce invoices, that will be generated through OOo/Symphony. It will attach an ODF-File and a PDF-File to the document, from which you have generated them. The code that is doing that shows the most important things you need to know to be able to enhance Notes with e.g. printing ……. (Yes, notes is able to print that way ……..) . Many thanks to Justin Freeman of Agileware, Australia, which has put this example into Public Domain many years ago. I then have adapted it to use ODF instead of the OOo 1.1 format, that Justin was confronted with back then. I assured, that the code itself is compatible with Symphony too, but unfortunately, I could not get it running reliably under Notes-Built-In Symphony with Notes 8.5 Beta 2. It looks like a quirk in the Symphony Implementation (so I have to alert IBM about that).