IBM Colaboration Solutions (Lotus) on IBM DeveloperWorks

IBM Lotus Domino Messaging Server, IBM Lotus Domino Enterprise Server

IBM Lotus Domino Designer

IBM Lotus Domino Administrator

Lotus Notes Client

Externi odkazy

NSF vierers
NSF Viewers2

Soubory nsf (Notes Storage Format) v Lutus notes:
bookmarks.nsf … * naplanovane ukoly v kalendari
desktop8.ndf … * Workspace - odkazy na databaze
as_NAME.nsf … Autosave
busytime.nsf … prazdne
headline.nsf … Subscriptions, Odkaz na postu
localfeedcontent.nsf … rss kanaly?
log.nsf … aktivita lotus notes
names.nsf … * db vsech jmen, se kterymy se Lotus Notes setkal
perweb.nsf … asi bookmarky, historie atd Lotus Notes Browseru
Cache.NDK .. * automaticky se vytvori po startu notes - vsechna drive nactena data
desktop8.ndk … prazdne, asi nejake zalozky pro notes8
diagindex.dbf … odkaz na slozku s daty pro technickou podporu (v pripade padu notes8)
exec.dbf … odkaz na instalacni sloszku notes8
help.dir … odkaz na slozku s helpem
mail.box … odchozi slozka mailu

Ostatni dulezite soubory: workspace/.metadata/* … * posledne otevrena okna
workspace/.config/org.eclipse.update … * soubor s licenci pri startu
workspace/.config/rcpinstall.properties … * soubor s licenci pri startu

Programovani Agentu

pouziva se Vizual Basic. Create → Agent, nebo View → Agents
Dim Counter As Integer … (Dimension) definuje promennou Counter jako celociselnou promennou

	Dim s As New NotesSession
	Dim ndb As NotesDatabase
	Dim uiws As New NotesUIWorkspace
	Dim doc As NotesDocument
	Dim v As NotesView

Messagebox “Canceled” … vyskoci hlaska s napisem “Canceled”
Dim uiws As New NotesUIWorkspace … NotesUIWorkspace - objekt aktualniho pohledu v LotusNotes
serv=uiws.Prompt(PROMPT_OKCANCELEDIT, “Server”, “Type a name of the server, where the destination database is. If you want to copy documents into local server type explicit ”“local”“.”, “local”) … nacte do promenne serv co zada uzivatel do okynka. 1 parametr - definice tlacitek, 2 parametr titulek okna, 3 parametr - co se uzivateli zobrazi, 4 parametr - vychozi volba

Priklad:

Sub Initialize
	Dim s As New NotesSession
	Dim db As NotesDatabase
	Dim ndb As NotesDatabase
	Dim uiws As New NotesUIWorkspace
	Dim doc As NotesDocument
	Dim ndoc As NotesDocument
	Dim v As NotesView
	
	Set db=s.CurrentDatabase
	
	serv=uiws.Prompt(PROMPT_OKCANCELEDIT, "Server", "Type a name of the server, where the destination database is. If you want to copy documents into local server type explicit ""local"".", "local")
	If serv="" Then
		Messagebox "Canceled"
		Exit Sub
	End If
	dbPath=uiws.Prompt(PROMPT_OKCANCELEDIT, "Database file", "Type a path to the database, where you want to store the documents. ", "archive/ibm02wrd.nsf")
	If dbPath="" Then
		Messagebox "Canceled"
		Exit Sub
	End If
	If serv="local" Then serv=""
	Set  ndb=s.GetDatabase(serv, dbPath, False)
	If ndb Is Nothing Then
		Messagebox "Wrong database server or file path."
		Exit Sub
	End If
	
	Set v=db.GetView("AllButPerson")
	
	Set doc=v.GetFirstDocument
	Do While Not doc Is Nothing
		Set ndoc=doc.CopyToDatabase(ndb)
		Call ndoc.Save(True, False)
		Set doc=v.GetNextDocument(doc)
	Loop
End Sub

Views:
Create → View, nebo Actions → View Options → Design