Das Notes Forum

Domino 9 und frühere Versionen => ND9: Entwicklung => Thema gestartet von: Frank_B am 11.03.16 - 14:00:35

Titel: $Comment einer Scriptbibliothek mit Lotusscript auslesen?
Beitrag von: Frank_B am 11.03.16 - 14:00:35

Kann man den Kommentar ($Comment) einer Scriptbibliothel mit Hilfe von Lotusscript auslesen ?

Ich möchte über dieses Feld meine Versionierung meiner Scriptbibliothek hinterlegen

Titel: Re: $Comment einer Scriptbibliothek mit Lotusscript auslesen?
Beitrag von: koehlerbv am 11.03.16 - 14:34:25

Ja, ohne weiteres: Jedes Notes Designelement ist nichts anderes als ein NotesDocument mit Items.

Bernhard

Titel: Re: $Comment einer Scriptbibliothek mit Lotusscript auslesen?
Beitrag von: Frank_B am 23.03.16 - 08:25:18

Ich glaub ich kriege das nicht hin :)

Ich habe in meiner Scriptbibliothek im initalize es selbst als uidoc deklariert und versuche dann so auszulesen:

...
uidoc.document.comment(0)
...

Leider schlägt das fehl.

bin ich da an der falschen Stelle ?

Titel: Re: $Comment einer Scriptbibliothek mit Lotusscript auslesen?
Beitrag von: jBubbleBoy am 23.03.16 - 08:48:40

Schau dir mal die Klasse "NotesNoteCollection" an.

Code

Dim nnc As NotesNoteCollection
nnc.Selectscriptlibraries = true

Titel: Re: $Comment einer Scriptbibliothek mit Lotusscript auslesen?
Beitrag von: ERR am 23.03.16 - 12:28:30

Das Feld hat den Namen "$Comment", deshalb dann mit "~" ergänzen.

Versuch mal folgendes:

Code

uidoc.document.~$Comment(0)

Wobei ich nicht sicher bin, wie du über uidoc.document an die Scriptbibliothek dran kommst...

Wie jBubbleBoy schreibt kannst du es so lösen:

Code

Dim nc As NotesNoteCollection
	
Set nc = db.CreateNoteCollection(False)
nc.Selectscriptlibraries = True
nc.SelectionFormula = {$Title = "Name der Scriptbibliothek"}
Call nc.Buildcollection()
	
If nc.Count > 0 Then
	Set doc = db.Getdocumentbyid(nc.Getfirstnoteid())
End If

Dim Comment As String
Comment = doc.~$Comment(0)

MFG
ERR