Das Notes Forum
Domino 9 und frühere Versionen => ND6: Administration & Userprobleme => Thema gestartet von: gere am 31.10.06 - 11:56:21
-
Hallo zusammen.
Gabs nicht einmal im Notes Client so eine Funktion, mit der ich bei ausgewählten Emails die Attachments abtrennen kann, um die Datenbank schlanker zu machen? Oder irre ich mich da jetzt? Kann die Funktion im Moment nicht mehr finden!
Gruss Gere
-
Mail zum editeren öffnen, das Attachement markieren und entfernen.
-
Ohne jetzt den balken vorzeitig übers knie zu brechen .. ich kann mich an keinen erinnern. Aber es ist relativ einfach einen agenten zu schreiben der das macht ...
Von einem netten Kollegen .. als anfang für den agenten:
Sub Initialize
On Error Goto errhandle
Dim nws As New NotesUIWorkspace
Dim ns As NotesSession
Dim ndb As NotesDatabase
Dim nuv As NotesUIView
Dim nv As NotesView
Dim nvec As NotesViewEntryCollection
Dim nve As NotesViewEntry
Dim nd As NotesDocument
Set nuv = nws.CurrentView
Set nv = nuv.View
Set nvec = nv.AllEntries
Set nve = nvec.GetFirstEntry
cnt=1
While (Not nve Is Nothing)
Set nd =nve.Document
If nd.HasEmbedded Then
Set rtitem=nd.GetFirstItem("Body")
Forall o In rtitem.EmbeddedObjects
Call o.ExtractFile("c:\temp\detacher\" + cnt +"-"+o.name)
Print "c:\temp\detacher\" + cnt +"-"+o.name
Call o.remove
cnt = cnt + 1
End Forall
Call nd.Save(True,True)
End If
Set nve=nvec.getnextentry(nve)
Wend
Goto dne
errhandle:
Print "Fehler " + Cstr(Err) +" "+ Error$+" in Zeile " + Cstr(Erl)
Resume Next
dne:
End Sub
-
OK, dachte immer da gabs ne Funktion im Client, naja egal. Dann mach ich mir eben nen Agenten.
Vielen Dank nochmal!
Gere
-
Diese Einstellung findest Du auch im Client, und zwar unter den Archivierungseinstellungen.
Bernhard
-
Morgen.
Ich hätte da eine Frage zu. Gibt es einen Weg diesen Code so umzuschreiben, dass die Attachments nicht auf der Platte gespeichert werden sondern in einer db?
Mir geht es dabei um ein Mailfile. Ich will einen Agent haben, der alle mails auf attachments prüft, diese detached, in eine andere DB piped und an der stelle in der mail einen Link zu der DB und dem file erstellt.
Geht das hiermit überhaupt?
danke schonmal
-
Wenn Du es programmierst schon. Du mußt dann nach dem Dettachen einfach in der Ziel-DB ein neues Dokument anlegen, die gelösten Attachments dort reinpacken, speichern und im Quelldokument im RTF einen DocLink auf das Archivdokument einfügen.
-
hmm ..ok.. soweit war mir das bewusst. Ich bin leider nicht wirklich versiert in Notes Script.. könnte mir einer diese paar zeilen schreiben? sind ja eigentlich nicht viele änderungen an dem obigen script.
Das wäre sehr nett.
//bocki
-
Klaus er wolte ein paar, nicht eine... :)
-
könnte mir einer diese paar zeilen schreiben? sind ja eigentlich nicht viele änderungen an dem obigen script.
Sorry, aber dieses Forum bietet Hilfe zur Selbsthilfe. Selbst wenn sich einer hinsetzt, das programmiert und Dir zur Verfügung stellt - Eer wartet das Script ? Wie willst Du das supporten, wenn Probleme auftreten oder das Script nicht so funktioniert, wie Du das möchtest ?
Es gibt einige Mitglieder hier im Forum, die mit so etwas ihre Brötchen verdienen. Evtl. findet sich da jemand, der Dir das gegen Bezahlung umsetzt.
-
aber warum Script .. wie von Bernhard angesprochen, serverseitig Archivierung ist in diesem Fall besser mit der Option "Anhänge entfernen, Zusammenfassung und 40 KB beibehalten". So muss man nicht programmieren, der Link wird automatisch generiert und 40K Text reichen oft.