Domino 9 und frühere Versionen > ND6: Entwicklung

Userrollen & Mail Senden per Lotus Script

(1/2) > >>

wuwu:
Hallo,

1.) ich schaffe es leider nicht, ein Feld per Lotus Script mit der aktuellen Rolle des Users zu füllen.
2.) das Mail Senden über Evaluate möchte auch nicht so wie ich es will bzw. es wird kein Mail verschickt.

Hat jemand vielleicht ein Codebeispiel auf Lager, danke im vorhinein.

Mfg

Axel:
Hi

zu 1.

Das kannst du z.B. so machen

doc.Feldname = Evaluate(@UserRoles)


zu 2.

Wie sieht denn der Code aus?


Axel

wuwu:
zu 1:
im QuerySave:
Dim value As Variant
value = "Probe / Untersuchungen: " + doc.Inputpu(0) + Chr$(13) +Evaluate(@UserRoles)
doc.history = value

das funtkioniert leider nicht, habe ich jetzt ausprobiert!

zu 2:
im QuerySave
Dim result As Variant
Const MailSend$ =(|@MailSend(SendTo;"";"";"Neu";"";"Es -> ";[IncludeDoclink])|)
result=Evaluate(MailSend$,doc)

Wie könnte ich diese Funktion in einem Button testen oder unter QuerySave?

Danke vorerst für die Hilfe!

mfg

Axel:
Hi,

zu 1:

Ersetze mal die + - Zeichen durch &. Strings werden in LS mit & verkettet.
Außerdem vermischt du hier Datentypen (String und Variant). Bin mir nicht sicher ob das so funktioniert.

Hat der User immer nur eine Rolle? Wenn ja, würde ich das mal so versuchen:

Dim value As String
value = "Probe / Untersuchungen: " & doc.Inputpu(0) & Chr$(13) & CStr(Evaluate(@UserRoles)(0))
doc.history = value

Zu 2:

Packt den Code in einen Button und Initialisiere die Variable doc. Dann kannst du es testen.


Axel

wuwu:
zu 1: der Code in einem Button:
Dim value As Variant
value = "Probe / Untersuchungen: " & Cstr(Evaluate(|@UserRoles|))
Msgbox value

-> Type mismatch

zu 2:
ich weis nicht genau wie ich das im Button initaliseiren mus, Workspace, oder Backend, kannst du mir da helfen?

mfg

Navigation

[0] Themen-Index

[#] Nächste Seite