Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Doc am 08.04.03 - 14:37:33

Titel: Bedingter SendTo
Beitrag von: Doc am 08.04.03 - 14:37:33
Hallo,
weiss jemand von den Notes Gurus, wie ich es anstellen könnte, das SendTo Feld von einer Optionsschaltfläche abhängig zu machen.

also Optionauswahl  wäre zum Beispiel wp1 wp2 oder wp3
bei Auswahl von wp1 soll die Mail an A gesandt werden.
bei Auswahl von wp2 soll die Mail an B gesandt werden.
bei Auswahl von wp3 soll die Mail an C gesandt werden.

Bin wie man an der Fragestellung sieht noch nicht solange in der Notesentwicklung. Wäre Super von Euch, wenn mir jemand eine
Lösung dafür anbieten  könnte.

Also A, B und C wären fest defiierte "MailEmpfänger".


Gruss
Werner
   
Titel: Re:Bedingter SendTo
Beitrag von: Karotte am 08.04.03 - 14:43:47
Hmm lies doch mit "if" den Wert des Feldes aus, und schreib dann jeweils die MailSend anweisung.


Oder aber (müsste auch gehen) mach ein Auswahlfeld für die Leute wo dus hinhamwillst und dann folgendes:

@MailSend(Feldname;"";"";"";"Es wurde folgende Anfrage aufgegeben: " );
(hoffe der code war richtig ;) (oder aber ist alles total falsch))
Titel: Re:Bedingter SendTo
Beitrag von: Doc am 08.04.03 - 14:47:21
Ja dachte ich mir schon, aber wie sieht so etwas als Formel aus?
in wie gesagt noch recht neu im Notes Geschäft.  ;-)

Gruss
Werner
Titel: Re:Bedingter SendTo
Beitrag von: Karotte am 08.04.03 - 14:54:40
siehe obere Änderung, ich hab das Feld gleich "SendTo" genannt, bei mir wird zwar im Feld SendTo der Nutzername zurückgegeben (sprich der Absender) Über ne Schaltfläche ist dann ne Funktion drin wo du ne Antwortnachricht senden kannst, die SendMail sind dann so aus:

(sollte aber auch für dein Problem klappen)

@MailSend(SendTo;"";"";"Statusbericht";"Ihr gemeldetes Problem im Bereich: " + @NewLine +@NewLine+ Sbereich + @NewLine + "Mit folgender Bemerkung: " + @NewLine +   @NewLine + SText+@NewLine+@NewLine+"haben wir zur Kenntnis genommen und werden uns darum kümmern."+ @NewLine + @NewLine + "Mit freundlichen Grüßen" + @NewLine +@NewLine + "Ihr IT-Helpdesk Team";
[Sign] : [DeliveryReportConfirmed] : [ReturnReceipt])
Titel: Re:Bedingter SendTo
Beitrag von: RonMat am 08.04.03 - 14:58:03
Wie findest Du das?


Dim ws As New notesuiworkspace
   Dim uidoc As notesuidocument
   Dim uidocm As notesuidocument
   Set uidoc = ws.currentdocument
   Const macromaildb$ = "@MailDBName"
   maildb = Evaluate(macromaildb$)
   Dim a  As Variant
   a=uidoc.fieldgettext("email")
   b=uidoc.fieldgettext("email2")
                c= uidoc.fieldgettext("email3")    ->  u.s.w
   If b="" Then
      Set uidocm = ws.composedocument(maildb(0), maildb(1), "Memo")   
      Call uidocm.fieldsettext("EnterSendTo", a )
   Else
      Dim arr(1 To 2) As String
      arr(1)=a
      arr(2)=b
                                arr(3)=c                    -> u.s.w
      Dim ein As Variant      
      ein=ws.Prompt(PROMPT_OKCANCELLIST, "ACHTUNG!!!Die Person hat mehrere eMail Adressen", "Welche eMail Adresse soll verwendet werden?",a,arr)
      Set uidocm = ws.composedocument(maildb(0), maildb(1), "Memo")   
      On Error Resume Next
      Call uidocm.fieldsettext("SendTo", ein )
   End If
   
Titel: Re:Bedingter SendTo
Beitrag von: Karotte am 08.04.03 - 15:03:00
*grins*

stand nicht weiter oben was von er ist ein Anfänger ?!?

Titel: Re:Bedingter SendTo
Beitrag von: ata am 08.04.03 - 15:03:55
... nenn deine Optionsschaltfläche SendTo
... nenn ein feld "Subject" für den Betreff der Mail
... nenn ein RichTextFeld "Body" für den Inhalt deiner Mail

... in die Auswahl deiner Option gibts du dann folgendes ein:

Rudi Ratlos | rudi.ratlos@ratlos.de
Susi Sorglos | susi.sorglos@sorglos.de
Manfred Mustermann | m.m@mustermann.de

... jetzt noch einen Button, eine Aktion oder etwas zum Auslösen und dort als Formel

@MailSend

... das wars

ata
Titel: Re:Bedingter SendTo
Beitrag von: RonMat am 08.04.03 - 15:10:18
Yupp,
 Karotte hat recht - sollte auch die oberen Einträge merken - oder doch schon Vergreisung. Sorry
Titel: Re:Bedingter SendTo
Beitrag von: Doc am 08.04.03 - 15:31:58
Vielen Dank für die Antworten bzw. Hilfe.
Werde mich mal durchackern und mit ATA's Lösung beginnen.  ;)

Gruss
Werner

p.s.
Das Forum hier ist ech klasse!!  Respekt
Bin froh es gefunden zu haben.

Titel: Re:Bedingter SendTo
Beitrag von: Doc am 09.04.03 - 09:28:36
Guten Morgen zusammen,
habe die Lösung von ATA genommen sie funktioniert auch prächtig.

Dazu noch eine Frage:
Wie kann ich einen Feldwert nun noch mit  in die Betreffzeile bekommen?
Wenn ich ins "Subject" Feld noch den Wert
von "FeldName" angebe wird kein Wert übertragen.

SubjectFeld: "Kartenlimit für folgendes Konto wurde bestellt:" "FeldName"
(Vorabewert)  

oder muss ich weiter Parameter dann an den MailSend befehl anhängen?

Gruss
Werner



Titel: Re:Bedingter SendTo
Beitrag von: Karotte am 09.04.03 - 10:13:59
"Kartenlimit für folgendes Konto wurde bestellt"+feldname;
Titel: Re:Bedingter SendTo
Beitrag von: Doc am 09.04.03 - 10:44:24
Hallo Karotte, (putziger Nick)
so hatte ich es auch versucht, aber der Inhalt wird nicht in die Betreffzeile geschrieben, hatte auch schon den Feldwert in ein Anderes Feld (Berechnet zur Anzeige) übergeben und dann dieses Feld referenziert im Subject Feld.

Leider klappt das eben so wenig.

Noch nee Idee?

Gruss
Werner
Titel: Re:Bedingter SendTo
Beitrag von: Karotte am 09.04.03 - 10:55:12
geht doch ;)

schau mal die maske an:

Titel: Re:Bedingter SendTo
Beitrag von: Karotte am 09.04.03 - 11:06:17
aehem deaktiviere evtl. noch die hide_when funktion, sonst siehste den sende button nicht  ;D
Titel: Re:Bedingter SendTo
Beitrag von: ata am 09.04.03 - 12:26:13
... da gibt es zwei Möglichkeiten

... das bearbeitbare Betreff-Feld darf nicht Subject heißen, nenn es EnterSubj oder so
... das Subject-Feld wird jetzt berechnet und zieht all die Werte und fixe Besandteile zusammen...

der andere Weg ist nicht den @Mailsend zu verwenden, sondern den mit den Parametern, dort kannst du dann direkt die Strings und Felder verketten...

ata
Titel: Re:Bedingter SendTo
Beitrag von: Doc am 10.04.03 - 15:13:12
Vielen Dank an alle die mir so super geholfen haben.
Formular ist fertig & Danke Eurer Hilfe so wie ich es haben wollte.  

Gruss
Werner