Beiträge von Jinja

nachdem sich über eine Woche keiner meldet, kann der Thread geschlossen werden!

Hallo,

kann mir jemand Anhaltspunkte geben, wie ich wo etwas generien muss, damit folgende Aktion durchgeführt wird.

Wir sind ein kleines Unternehmen von 200 Personen/MailDB. Nun hat sich unsere Domäne geändert und die Geschäftsleitung hätte gerne, dass der Server AUTOMATISCH ein Mail mit einem bestimmten Text an den Sender retour schickt, sobald er an die alte Email sendet.

Wäre über jede Hilfe dankbar

also doch keine Chance
Dachte schon ich bin zu blöd es zu finden.

Auf jeden Fall - Danke

Hallo,

ich bräuchte mal kurz wieder eure Hilfe.
Ich stehe mitten in einem Dokument (Edit-Modus) und möchte per klick auf einem Button (in Script) auf der Position, wo der Cursor steht (im Rich-text-Feld "Body") einen formatierten Text einfügen.

z.B:

[size=x-small][color=CC0000]Gelesen[/color][/size]

Wie könnte soetwas aussehen?

Liebe Grüße

ach ja, habs gefunden.

AHHHHH - das was ich suchte ist:
Call notesUIDocument.Import( [ filter$ , filename$ ] )

funktioniert einmalig und so einfach! :laola:

Vielen Dank

Hmm, schade dass von ihm nichts mehr kommt...

Allerdings finde ich nichts in der Bibliothek "CoreEmailClasses". Bist Du sicher, dass es dort ist?

Da drinnen find ich nur:
QuerySaveExtension
PostSaveExtension
QueryCloseExtension
PostOpenExtension
FaxToProc
FaxGetDomain
FaxLookupNAB
FaxMsgText

also ganz einfach unter Werkzeuge - Zertifizierung - zertifizieren...

Danke

Hallo,

ich hab bei einem Server ein Passwort, dass ich löschen möchte. Leider hat die Person, die die ID angelegt hat, ein Passwort, das min. 5 Buchstaben erfordert, angelegt.
Ich denke, man muß die Server-ID erneut zertifzieren, oder? Aber wie gehts das genau?

Bitte um Hilfe
Danke

Hmm, aber da ich jetzt schon so angefangen hab (und es ganz toll funktioniert) würde ich es gerne so beenden.
Ahh, man muß nur ein 2. Call source.GotoNextField verwenden.

Die Offline-Personen hab ich nicht vergessen, da kommt noch eine Abfrage... aber danke für den Hinweis

hab jetzt so weit alles beisammen:

If source.IsNewDoc Then
Dim ws As New NotesUIWorkspace
Dim response As Variant
Dim a As String
Dim values(1) As Variant
values(0) = "Deutsch"
values(1) = "Englisch"
Dim s As New NotesSession
Dim notesName As New NotesName( s.username )

Dim db As New NotesDatabase( "MeinServer", "MeineDB" )
Dim view As NotesView
Dim entry As NotesViewEntry
Dim doc As NotesDocument
Set view = db.GetView("MT")
Set entry = view.GetEntryByKey(notesName.Common)
Set doc = entry.Document

response = ws.Prompt (PROMPT_OKCANCELCOMBO, "Variante", "Deutscher oder Englischer Text?", values(0), values)
If response="Englisch" Then a=doc.MT_Text2(0) Else a=doc.MT_Text(0)
Call source.GotoBottom
Call source.GotoNextField
Call source.InsertText( a )
Call source.GotoField ("EnterSendTo")
End If

Funktioniert bei einem neuen Mail, Weiterleiten, Antwort und Allen Antworten.
Wenn ich aber bei Antwort und Allen Antworten MIT Protokoll verwende, schreibt er es mir in das Thema Feld???
Noch eine Idee?

Sehr komisch! Bin aber jetzt draufgekommen, wenn ich danach ein
Call source.GotoNextField
Call source.InsertText( "test Test" )

mache, dann schreibt er den Text sehr wohl ins Body-Feld, aber der Cursor bleibt im Thema-Feld???

Na gut, soll nicht weiter tragisch sein.

Danke nochmals

warum sollte das sein?
Und wenn ich source.Gotofield("Body"), dann bleibt er einfach im An-Feld stehen, als ob nichts wäre (ohne Fehlermeldung)
Nur mit Call source.GotoBottom geht er ins Thema-Feld.

na so wie Du gesagt hast: im PostOpen

keine Fehlermeldung. Aber hüpft max. ins Thema

Aber ich kann weder mit source.Gotofield("Body") noch mit Call source.GotoBottom zu dem Body-Feld springen

Sicher, ich muß ncoh isnewdoc hinzufügen - das ist ja auch nur als grundsätzlicher Test vorgesehen.

Doc.save kann ich nicht verwenden, da er 1. den Text in dem neuen Mail trotzdem nicht anzeigt und 2. selbst wenn ich das Mail abbreche, dieses unter den Entwürfen gespeichert ist.

ok, ich schaff's doch nicht

Sub Postopen(Source As Notesuidocument)
Call cMemoObject.PostOpen(source)
If source.editmode And Not (source.isnewdoc) Then
Call cMemoObject.querymodechange(source)
Call cMemoObject.postmodechange()
End If

'*** NEU
Dim doc As Notesdocument
Set doc = Source.document
Dim richText As New NotesRichTextItem(doc, "Body")
Call richText.AppendText("test test")
End Sub

Mist, das Bodyfeld bleibt leer. Was mach ich falsch?

ok, werd ich probieren (hab nur bis jetzt noch nie mit Bibliotheken gearbeitet)

Danke vorerst

hmmm, ja sicher, einfacher gehts nicht?

D.h. ich muß die 3 Masken Memo, Antwort und Antwort mit Protokoll ändern?
Und welche für die Weiterleitung?

Hallo,
ich bräuchte wieder mal eure Hilfe zu folgender Aufgabe:

Bei jedem neuen Mail, neuer Antwort bzw. beim Weiterleiten soll zuerst mal eine Abfrage kommen (Wahl zw. A und B) und dann der jeweilige Text, der hinter A bzw. B steht sofort in diesem Mail rein-kopiert werden. Also so ähnlich wie die automatische Signatur, nur halt programmierfähig (der zu einfügende Text steht in einer Notes-DB und ist individuell).

Also da ich mich mit Script relativ gut auskenne, ist die Programmierung nicht das Problem. Aber wo kann ich das einbauen? Java kann ich nicht!
Was für eine Lösung schlagt Ihr vor?
Wie kann ich vorgehen?

LG

Mail-DB sind von der Größe unbegrenzt, allerdings werden jeden Sonntag alle Dokumente, die älter als 2 Jahre sind ins Archiv verschoben - die Archivierung und Compact sind um 15:00 am So fertig

vielleicht liegt ja das Problem ja doch nicht an diesem Server