INECO Forum Overzicht Overzicht Aanmelden Aanmelden Registreer Registreer Profiel Profiel Ledenlijst Ledenlijst Groepen Groepen Zoeken Zoeken

Tip: bewerking van een NotesItem object op een regel
 
 
 
 
 Geplaatst   Bericht 
Marcel Rothuizen

Marcel Rothuizen
 

Aanmelddatum: 10-11-2000
Woonplaats: Heteren (Gld)
Datum: 06-12-2005 10:05:11    Bericht: Tip: bewerking van een NotesItem object op een regel

Een aantal Item Properties in de NotesItem class kunnen eenvoudig op een regel worden toegekend.
Dit is de lange manier van code schrijven:

Dim session As New NotesSession
Dim userName As NotesName
Dim doc As NotesDocument
Dim item As NotesItem
Set userName = session.CreateName(session.UserName)
'...set value of doc...
Set item = doc.ReplaceItemValue("Author", userName.Canonical )
item.IsAuthors = True

Call doc.Save( True, True )

Dit kan eenvoudiger door deze code:

Dim session As New NotesSession
Dim userName As NotesName
Dim doc As NotesDocument
Set userName = session.CreateName(session.UserName)
'...set value of doc...
doc.replaceItemValue("Author", username.Canonical ).IsAuthors=True
Call doc.Save( True, True )

En in dit geval natuurlijk nog korter door:

Dim session As New NotesSession
Dim doc As NotesDocument
'...set value of doc...
doc.replaceItemValue("Author", session.CreateName(session.UserName).Canonical ).IsAuthors=True
Call doc.Save( True, True )

Of in een andere voorbeeld:

Dim doc As NotesDocument
'...set value of doc... doc.GetFirstItem( "Author" ).IsEncrypted = True
Call doc.Save( True, True )

In de meeste gevallen in dit sneller als het Item maar een keer gebruikt wordt.
Moet je meerdere dingen met het Item object doen, dan is het juist weer raadzaam om het eerste voorbeeld te gebruiken omdat het Item dan in het geheugen blijft en niet elke keer opgezocht hoeft te worden, maar dit geldt voor alle objecten natuurlijk. 8-|

 E-mail Website ICQ MSNM Skype Hyves LinkedIn 
Zoek in afgelopen ok
 
   Overzicht / Lotus Notes Ontwikkeling / Lotusscript  
Pagina 1 van 1 

IBM LOTUS NOTES migratie doet u samen met INECO

Powered by Lotus Domino R8.5.3 on Fedora Core 14 Dit  forum is gemaakt door Intranet &  Network Consultancy. © 2011.
Voor vragen of opmerkingen  kunt u contact opnemen met:  .
Deze site is gemaakt met Lotus Notes R8.5.3 en draait op Fedora Core 14.

INECO Support Contract banner