Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: sinus am 07.02.03 - 12:56:17

Titel: Gibt es eine Funktion "Antworten" ?
Beitrag von: sinus am 07.02.03 - 12:56:17
Hallo,

ich suche eine Funktion mit der ich folgendes relativ unkompliziert lösen kann:

Ich bekomme ständig Mails die nur Daten enthalten, zB:

Name;Strasse;Ort;Emailadresse

Absender dieser Email ist immer das Formular, wo die Daten eingegeben wurden.

Nun schreibe ich eine Antwort auf diese Mail. Empfänger suche ich mir aus dem Mailtext heraus (Name;....Emailadresse), diesen füge ich dann per Hand in das Empfängerfeld ein. Betreff und Inhalt dieser Mail sind immer gleich, zB Betreff: Regisitrierung erfolgreich, Text: Sie wurden erfolgreich registriert, vielen Dank.

Um mir die Arbeit zu erleichtern:

Ich möchte in meine Maildatenbank einen weiteren Button mit einer Aktion einfügen.
Diese Aktion soll folgendes machen:

Es soll eine AntwortMail erzeugt werden, bei der ich mir die Adresse mit Hilfe einer Funktion (die hab ich schon) aus der gerade ausgewählten Mail im Posteingang hole.  Betreff und Inhalt der Mail sind jedesmal gleich, das möchte ich bereits in der Aktion vorgeben.

Es soll also ein Antwortdokument erzeugt werden mit festem Text und Betreff, und die Adresse möchte ich mit Hilfe einer Funktion aus der gerade ausgewählten Mail im Posteingang holen.

Ich suche daher eine Funktion die mir erstmal ermöglich eine AntwortMail zu schreiben, super wäre natürlich sowas wie:
createantwort(empfänger;betreff;text)

Und dann suche ich noch eine Möglichkeit mir den Empfänger mit Hilfe einer fertigen Funktion aus dem MAIL-TEXT der gerade ausgewählten Mail herauszufiltern.

In diesem Mailtext steht soetwas in der Art:
Name;email;strasse;wohnort etc... die Funktion die mir hier die Emailadresse rausholt habe ich bereits, nur wie lasse ich diese auf den Text der Mail los???

Gruss, Sven
Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: ata am 07.02.03 - 13:16:56
... ich habe so etwass in der Art anders gelöst.

Ich habe mir Dokumente erstellt, die in einem Richtext-Feld den entsprechend standardisierten Text enthalten.
Ich wähle diese "Vorlage" mit einer Picklist aus,
hole aus dem Doc das RichText-Feld,
erstelle ein neues Dokument,
erstelle ein neues Richtext-Feld "Body" und
hänge das Richtextfeld aus der Vorlage dann an das eben erstellte Body-Feld.
Jetzt noch SendTo befüllen und abschicken oder
wahlweise im Frontend anzeigen und manuell versenden...

ata
Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: sinus am 19.02.03 - 16:36:00
hmm also irgendwie hilft mir das jetzt nicht so richtig weiter, vielleicht steh ich auch auf dem schlauch?!

es muss doch möglich sein, die aktion "MAIL BEANTWORTEN" so abzuändern, dass ich mir den empfänger nicht aus der eingangsmail hole, sondern aus dem messagetext und dabei einen vorgegebenen betreff sowie mail-inhalt mitschicke?!?!

Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: ata am 19.02.03 - 19:26:04
... häng mal ne DB mit einem solchen Dokument ins Forum - dann verstehe ich vielleicht mehr...

ata
Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: sinus am 20.02.03 - 15:48:05
hi,

das ist eine ganz normale maildatenbank (mail50).

dort kommen ganz normale email rein, nur nicht mit dem üblichen blabla sondern halt nur mit infos die von einem formular im interner erzeugt wurden, zB:

Name;Adreasse;Email;Info1;Info2 usw...

Nun möchte ich auf jede eingehende Mail mit einem Standardtext antworten, und die Antwort geht nicht an den Absender der Email, sondern an die emailadresse die im messagetext unter mit drinsteht...

also mir wäre erstmal geholfen, wenn mir jemand sagen kann, wie ich eine antwort zu einer eingehenden mail erstelle, so dass nicht (wie normal) eine fenster aufgeht und ich den text eingeben muss, sondern der antworttext bereits vorgegeben ist, nach dem motto:

Vielen Dank für Ihre Registrierung...

und ich nur noch auf senden drücke muss...



Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: Rob Green am 20.02.03 - 17:26:52
zunächst mußt Du den RichText in normalen Text über die Methode GetformatedText (aus der NotesRichText Klasse) umwandeln.

Dann kannst Du in einer stinknormalen Schleife (von mir wegen Do While) alle Textinhalte mit dem Trenner ";" auseinanderpflücken. Zu beachten wäre dann natürlich, daß ";" nicht irgendwo in einem "Feldwert" vorkommt, also zu ersetzen durch was anderes (weiß leider nicht, wo der String herkommt).

Die String Behandlung sprich das Auseinanderpflücken der Semikola getrennten Werte findest Du sicherlich én masse als Codebeispiel zB in eknoris Schatzkiste (www.eknori.de)

Das war es schon eigentlich.
Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: sinus am 27.02.03 - 18:12:10
das ist mir alles schon klar, ich scheitere viel früher!!

wahrscheinlich bin ich nur zu blöd und seh den wald vor lauter bäumen nicht...

was als script (oder was auch immer) eintragen, damit wenn ich einen button drücke dir derzeitig ausgewählte mail beantwortet wird, ohne dass ich den text der in der antwort stehen soll per hand eingeben muss??

der vorgegebene text kann fest einprogrammiert werden in das script oder wie auch immer...

mehr brauche ich zunächst einmal nicht, hat jemand einen tip für mich?
Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: Rob Green am 27.02.03 - 18:51:00
hm...

Beispiel aus der Help, wie man Text in Body reinklatschen kan:

Dim doc As NotesDocument
Dim rtitem As Variant
'...set value of doc...
Set rtitem = doc.GetFirstItem( "Body" )
If ( rtitem.Type = RICHTEXT ) Then
  Call rtitem.AppendText( "Add text to the rich text item" )
  Call rtitem.AddNewLine( 1 )
  Call rtitem.AppendText("Add more text to rich text item")
  Call doc.Save( False, True )
End If


sowas?
Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: ata am 27.02.03 - 21:02:11
... in den Beispielen der Hilfe zu NotesDocument.Send ist eigentlich alles drin was du brauchst... spiel damit ...

ata
Titel: Re:Gibt es eine Funktion "Antworten" ?
Beitrag von: sinus am 14.03.03 - 16:19:46
notesdocument.send

das war es was ich gesucht habe, TAUSEND DANK!

Der richtige kleine Schubser tut manchmal Wunder...

Habe meine Funktion nun innerhalb 2 Stunden programmieren können, ich freu mich!

Gruss & Danke Sven