Domino 9 und frühere Versionen > ND7: Entwicklung
Kleines Problem mit Namen und Evaluate
C_T:
Hi @ all
ich habe da mal wieder ein kleines problemchen,
und zwar möchte ich gerne das die Namen aus einem Namens bzw. DIalogfeld (beides als Quelle das Addressbuch) nur mit Ihrem Namen angezeigt werden.
Dies brauche ich zb beim Versenden von mails oder aktualisierung von Dokufeldern im Dokument.
Ich habe es zurzeit mit folgendem Evaluate versucht
(INFO: an = Variant NameAn = String)
NameAn = Cstr(Evaluate(|@name([CN];" | & an & | ")|))
Könnt Ihr mir vielleicht einmal helfen?
Vielen DANK
MFG Christian T.
MadMetzger:
Hast du dir schonmal die Klasse NotesName angeschaut? Die bietet solche Funktionen ohne Evaluate direkt in Script.
ata:
... das ist etwas zu wenig Code. Dein "an" ist vom Typ Variant, du verwendest die Variable im Evaluate aber als String.
Wie initialisierst du die Variable?
Toni
C_T:
Zuzreit benutze ich die oben genannten Zeile in einem Selbstgeschrieben Mail Sub
ANbei der Code
--- Code: ---Sub SendMail (An,Art as String)
REM Standard
Dim workspace As New NotesUIWorkspace
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.Document
Set db = session.CurrentDatabase
Dim item As notesitem
Set item = doc.GetFirstItem("Dok")
REM Mail Deklarationen
Dim DocSend As NotesDocument
Dim rtitem As NotesRichTextItem
Dim richStyle As NotesRichTextStyle
Set richStyle = session.CreateRichTextStyle
Set DocSend = New NotesDocument(db)
Set rtitem = New NotesRichTextitem(DocSend, "Body")
DocSend.Form ="Memo"
Dim commonuser As String
commonuser = Cstr(session.CommonUserName)
Dim NameAn As String
NameAn = Cstr(Evaluate(|@name([CN];" | & an & | ")|))
.........CODE.....
END SUB
--- Ende Code ---
MadMetzger:
Ich sehe in deinem Code-Ausschnitt leider nicht, wo das "an" definiert und initialisiert wird.
EDIT: Ist ja ein Parameter der Prozedur, dann sag mal mit was das an aus den Aufrufern gesetzt wird.
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln