nach eingang neuer mail, aufgabe erstellen

[Selin]

Hi Leute,

wie kann ich nach eingang neuer mail es direkt als eine neue aufgabe erstellen?
Sollte eine Gruppenaufgabe werden mit bestimmten Teilnehmern??

danke + Gruß

[elajen]

Ist Deine DB vom Mail-Template?
Soll der User aktiv werden?
Soll das ein Agent werden?



Gruß von Ekki

[Driri]

Ich deute das "direkt" mal so, daß das automatisch passieren soll ?

Ein Agent "Nach Eingang neuer Mail"-getriggert, der per Script aus der Mail eine Aufgabe erstellt.
Das würde allerdings erfordern, daß die Gruppe der "Teilnehmer" an der Aufgabe feststeht.

Falls es doch manuell sein soll :

Aktion "Kopieren in" -> "Neue Aufgabe"

[Selin]

hi,

es sollte automatisch passieren.
habe es auch mit einem agenten versucht
aber da ich nicht so gut script kann, hat es nicht gefunzt

[koehlerbv]

Ohne LotusScript ist da nichts machbar.

[Selin]

ich habe hier ein script, da fülle ich in einer db felder aus und über gebe es in die aufgaben.

Habe versucht dies anzupassen, aber auch das war leider erfolglos

Sub Click(Source As Button)
   
   
   Dim ws As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Dim doc As NotesDocument
   Dim maildb As NotesDatabase
   Dim taskdoc As NotesDocument
   Dim rtitem As NotesRichTextItem
   
   'Zugriff auf das aktuelle Dokument
   Set uidoc = ws.CurrentDocument
   Set doc = uidoc.Document
   
   Set maildb = New NotesDatabase("","")
   Call maildb.OpenMail
   If Not maildb.IsOpen Then
      Messagebox "Mail-Datenbank kann nicht geöffnet werden." + Chr$(10) + "Es wird keine Aufgabe erstellt.", 16, "Adressen"
      Exit Sub
   End If  'If Not maildb.IsOpen Then
   
'Neue Aufgabe erstellen
   Set taskdoc = New NotesDocument(maildb)
   taskdoc.Form = "Task"
   Call taskdoc.ComputeWithForm(True, True)
   taskdoc.StartDate =  doc.Wann_er
   taskdoc.DueDate = doc.Wann_er_1
   taskdoc.Subject = doc.Thema_er
   taskdoc.Importance = doc.Prior
   taskdoc.SendTo = doc.Name_er
   taskdoc.TaskType = doc.Art
   
   
   
   
' Hier können weitere Felder bearbeitet werden
   
'Anlegen und füllen des Richtextfeldes für die Aufgabenbeschreibung
   Set rtitem = taskdoc.CreateRichTextItem("Body" )
   Call rtitem.AppendText(doc.Beschreibung_er(0))  
   
   Call taskdoc.Save(True,False)
   
End Sub

[Axel]

Hi,

das kann auch so nicht gehen.

Du greifst nicht auf die eingegangenen Mails zu. Das andere Thema, wo sollten den die Daten für Fälligkeit etc. hergeholt werden.

Ausserdem funktionieren Frontendklassen wie NotesUIWorkspace, NotesUIDocument nicht in getriggerten Agenten.

Axel

[Selin]

o jee
ich seh schon, das klappt wohl nicht
 

[Don Pasquale]

Hi Selin,

nur weil es nicht auf Anhieb funktioniert ?
Fang doch mal mit kleineren LotusScript Aufgaben an, dann lernst Du es !

Nur Mut
Don Pasquale

[Axel]

o jee
ich seh schon, das klappt wohl nicht
 

Hi,

das es so nicht funktioniert, heißt noch lange nicht, dass es garnicht geht.

Du kannst Mails automatisiert  als neue Aufgaben erstellen, allerdings musst du das Fälligkeitsdatum usw. fest vorgeben.

Ansonsten kann ich Don Pasquale nur zustimmen. Mit kleinen Sachen anfangen, Beispiele aus der Designer-Hilfe nachvollziehen. Und wenn du nicht weiterkommst, wir hier helfen gerne. Fragen kostet nichts.  Nur Mut. Jeder hat mal klein angefangen.


Axel

[Driri]

Jo, zumal man das Fälligkeitsdatum ja auch berechnen kann, z.B. aktuelles Datum + 7 Tage, oder so ähnlich.

[Selin]

Hallo hr Lieben,

danke für die Aufmunterung. Ihr habt ja Recht. Ich sollte mit kleinen Aufgaben das Ganze mal versuchen zu lernen.

Ihr seit sooo lieb  

Hier ein   für euch

Habt Spaß

[Don Pasquale]

Damit könnte man sehr gut anfangen :

Der Herdt Verlag bietet für kleines Geld eine sehr verständliche Einführung in den Lotus Notes Designer. Ideal für den Anfänger, verzeihung auch die Anfängerin.

www.herdt-verlag.de
Notes Domino
Datenbankentwicklung I : LotusScript
gerade mal 21 Euro.

Ciao
Don Pasquale

[Selin]

<<verzeihung auch die Anfängerin.

 
genau

Danke für den Tipp. Habs mir auch gleich bestellt.

Lieben Gruß
Ich