Das Notes Forum

Domino 9 und frühere Versionen => ND7: Entwicklung => Thema gestartet von: ewald am 14.05.07 - 17:21:56

Titel: Username umwandeln in Script
Beitrag von: ewald am 14.05.07 - 17:21:56
Hallo zusammen,

hab da mal ne Frage (Problemchen):

Ich hol mir in Script mit  user = session.UserName  den aktuellen User.
Geht auch. Nun steht aber in user der vollständige Notesname, z.B.
CN=Max Meier/OU=Germany/O=Firma
Ich brauch' aber Max Meier/Germany/Firma  also quasi Abbreviated.
Wie kann ich denn in Script das Abbreviate anwenden. In Formelsprache ist das ja kein Problem.

Grüße Ewald
Titel: Re: Username umwandeln in Script
Beitrag von: MadMetzger am 14.05.07 - 17:23:57
Beispielsweise mit einem Evaluate?
Titel: Re: Username umwandeln in Script
Beitrag von: koehlerbv am 14.05.07 - 17:24:27
Dafür ist die NotesName-Klasse da. Siehe DesignerHelp - das Procedere ist ganz einfach.

Bernhard
Titel: Re: Username umwandeln in Script
Beitrag von: eknori am 14.05.07 - 17:25:19
mite der NotesName Klasse ist das auch kein Problem

  Dim session As New NotesSession
  Dim nam As NotesName
  Set nam = session.UserName
  Messagebox nam.Abbreviated,, "Abbreviated name"
Titel: Re: Username umwandeln in Script
Beitrag von: MadMetzger am 14.05.07 - 17:25:41
Das ist die Alternative... Habe ich eben auch erst nochmal nachgelesen, was denn die Klassenbibliothek sagt.
Titel: Re: Username umwandeln in Script
Beitrag von: ewald am 14.05.07 - 18:23:05
Ulrich,

ich krieg da nen Fehler in der Zeile
Set nam = session.UserName

SET may only be used on class instance assignments

Den Code hab ich im Querymodechange stehen

Gruß Ewald
Titel: Re: Username umwandeln in Script
Beitrag von: koehlerbv am 14.05.07 - 18:31:23
Set nam = New NotesName (session.UserName)
wäre die korrekte Syntax.

Bernhard
Titel: Re: Username umwandeln in Script
Beitrag von: ewald am 14.05.07 - 18:38:54
Perfekt Berhard, funktioniert einwandfrei.

Danke!

Grüße Ewald
Titel: Re: Username umwandeln in Script
Beitrag von: MadMetzger am 14.05.07 - 20:19:22
Alternative:

set nam = session.CreateName(session.UserName)