Beiträge von Prosti

Ich habe mir die Hilfe des Befehls "AppendToTextList" angesehen. Nun habe ich eine unbestimmte Anzahl an Empfängern.

Welche Art der Schleife ist die günstigste? Hast Du vielleich ein Beispiel parat?

Besten Dank

Hallo Forum,

ich habe ein Script erstellt das mir ein Frontend-Dokument kopiert und dasmir den Absendereintrag austauscht. Es funktioniert eigentlich alles, ausser das wenn ich mehrere Empfänger angebe, wird das Dokument nur an den erst genannten Empfänger übertragen. Die restlichen Empfänger werden nicht berücksichtigt.

Was beachte ich nicht?

Dim session As New NotesSession
Dim current As NotesDatabase
Dim mailbox As New NotesDatabase("","")
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim maildoc As NotesDocument
Dim doc As NotesDocument
Dim rtitem As NotesRichTextItem
Dim item As Variant
Dim item_body As notesItem
Dim item_sub As Variant

Dim sendas As String

sendas = "hau_den_lukas@cirmes.de"

' get handle to mail.box on the users current mail server
Set current = session.CurrentDatabase
Call mailbox.Open( current.server, "mail.box" )

' Aktuelles Dokument
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.document

' Create a new document in the severs mail box
Set maildoc = mailbox.CreateDocument
maildoc.Form = "Memo"
maildoc.From = sendas
maildoc.SendFrom = sendas
' maildoc.SendTo = sendto

item = uidoc.FieldGetText( "entersendto" )
Call maildoc.ReplaceItemValue( "sendto", item )

' maildoc.Recipients = sendto
Call maildoc.ReplaceItemValue( "recipients", item )

' maildoc.Subject = subject
item_sub = uidoc.FieldGetText( "Subject" )
Call maildoc.ReplaceItemValue( "Subject", item_sub )


' Body-Feld
Dim rtitemA As Variant
Dim rtitemB As Variant

Call doc.Save( True, False )
Call uidoc.Save

Set rtitemA = doc.GetFirstItem( "Body" )
Set rtitemB = New NotesRichTextItem (maildoc, "Body")

Call rtitemB.AppendRTItem( rtitemA )


maildoc.PostedDate = Now()
maildoc.ComposedDate = Now()
maildoc.DeliveredDate = Now()
maildoc.Principal = sendas
maildoc.EncryptOnSend = False


Call maildoc.Save( True, False )

Danke für Eure Hilfe im voraus.

Ich DANKE Dir\Euch für die ausführlichen Beschreibungen und die schnelle Reaktion.

Ich werde mich bei meinem Provider erkundigen.

Hallo,

den Server habe ich mehrfach neugestartet, damit die geänderten Eintragungen greifen.

Ich habe ein Dokument angehängt, indem das Konfigurations-, das Fremde SMTP und das Globale Domänendokument abgebildet ist.

Mittlerweile erhalte ich folgende Fehlermeldung bei dem Versuch eine Email zu versenden.

18.10.2004 17:55:24 Router: Internet-Host-Name und Domänen-Namen wurden nicht gefunden
18.10.2004 17:55:24 Mail-Router für Domäne E-PROST gestartet
18.10.2004 17:55:24 Router: Internet-SMTP-Host notebook-amd in Domäne
18.10.2004 18:02:21 Router: Übertragen von Mail an Domäne POST.STRATO.DE (Host POST.STRATO.DE [192.67.198.62]) über SMTP
18.10.2004 18:02:21 Router: Keine Nachrichten an POST.STRATO.DE (host POST.STRATO.DE) über SMTP übertragen
18.10.2004 18:02:25 Router: Fehler beim Übertragen der Nachricht 00581063 über SMTP an POST.STRATO.DE 451 4.1.8 To send mail, first check your mail with a valid POP3 account; this prevents unauthorized SPAM relaying.
18.10.2004 18:02:25 Router: Nachricht 00581CBF, 00581063 zugestellt an Stefan Prost/Prost

Das Personendokument ist für ein POP3-Konto eingerichtet. das Registerblatt "Mail" ist auf POP oder IMAP eingestellt. Bevorzugtes Format für eingehende Mail: MIME ist eingestellt.

Hallo Zusammen,

ich habe einen Dmino R5.0.11 installiert auf dem Betriebssystem XP SP2.

ich habe mir bei dem ISP eine Domäne einrichten lassen. Mein wunsch ist es über meinen ISP (strato.de) Mails an das Internet zu versenden. Mit einem Tool möchte ich die POP3-Mails von meinem ISP-Postfach direkt an den Server transferieren. Kennt jemand solch ein Tool?

Hierfür habe ich folgende Einstellungen vorgenommen.

Serverdokument:
- Routing-Funktionen: Mail Routing, SMTP Mail Routing
- SMTP-Listener-Task: Aktiviert

Konfigurationsdokument:
- SMPT wied zum Senden von Nachrichten an Empfänger außerhalb ...: Aktiviert
- SMTP ist innerhalb der lokalen ...: Deaktiviert
- Relais-Host für Nachrichten, die die lokalen ...: post.strato.de (SMTP-Server von STRATO)

Fremde SMTP-Domäne:
Routing
- Internet Domäne: *.*
- Domänenname: strato.de

Ich habe bei der Installation zwischen den Mail-Domäne und dem Certifiername unterschieden
Globale Domäne
Name der globalen Domäne: meinedomäne.de
Notes Domänen und Aliasnamen: meinenotesdomäne
lokale primäre Internet-Domäne: meinedomäne.de

Versende ich eine Mail über notes funktioniert es einwandfrei. Gebe ich eine Internetdomäne ein, erhalte ich folgenden Hinweis:

Mail-Router für Domäne MEINEDOMÄNE gestartet
16.10.2004 10:13:45 Router: Internet-SMTP-Host notebook-amd in Domäne
16.10.2004 10:15:58 Router: Übertragen von Mail an Domäne ARCOR.DE (Host mx.ARCOR.DE [151.189.21.118]) über SMTP
16.10.2004 10:16:00 Router: Keine Nachrichten an ARCOR.DE (host mx.ARCOR.DE) über SMTP übertragen
16.10.2004 10:16:03 Router: Fehler beim Übertragen der Nachricht 002D0B7E über SMTP an mx.ARCOR.DE 554 Service unavailable; Client host [217.226.68.205] blocked using rbl.arcor-online.net; see http://postmaster.arcor-online.net/
16.10.2004 10:16:03 Router: Nachricht 002D6A3F zugestellt an Prosti

Ich verwende einen DSL Anschluß um ins Internet zu gelangen. Werde vermutlich eine dyn. Ip-Adresse erhalten. Ich habe verschiedene Varianten am Domino Server versucht. Nur eine Lösung habe ich bislang nicht hinbekommen.

Ich bin für jeden Hinweis oder Lösungsvorschlag dankbar.

Prosti

Ich habe den Fehler gefunden!!!

Es war die Server-ID!!! Ich habe die ID zwar neu zertifiziert aber nicht nicht in das richtige Verzeichnis kopiert.

ICH DANKE EUCH!

Stefan

Wir meinen das gleiche!

Ich habe dies geprüft mit dem Admin-Client\Konfiguration\Zertifizierung\ID-Eigenschaften. Über diese Funktion brauche ich nicht die ID-Wchseln, sondern kann direkt die ID-Eigenschaften auslesen.

Ja, die Eigenschft der Server-ID enthalt den neuen Namen!

Hallo Zusammen,

ich habe ein Problem bezüglich des Servernamens! Ich möchte den Servernamen umbenennen.

Der Servername lautet "Domino_App/Prost/DE" (CN=Domino_App/O=Prost/C=DE) und soll umbenannt werden in "Domino_APP/Verkauf/Prost/DE" (CN=Domino_App/OU=Verkauf/O=Prost/C=DE)

Die folgenden Schritte habe ich durchgeführt, die aber zu keinem Erfolg führten!
- Im NAB/Aktionen/Server auf Hirachisch umstellen -> Fehlermeldung kann nicht umgewandelt werden, da Servername bereits eine hirachischen Namen besitzt (klar!)

- Im NAB/Aktionen/Ausgewählten Server erzeut zertifizieren -> ist nur möglich mit dem gleichen Zertifier, da ich einen anderen haben möchte, geht dies nicht (klar)

- Im Administrationsclient/Konfiguration/Zertifizierung/Zertifizieren die OU-Zertifier ausgewählt und den Server zur Verkauf-ID zugeordnet. -> Hier erhalt ich eine Meldung, dass in der NAB kein Dokument gefunden wurde, was abgeändert werden könnte! Anschließend habe ich das Serverdokument, das Konfigurationsdokument, die Notes.ini, die ACl manuell beareitet und den neuen Servernamen eingetragen. Sogar die Registry von NT habe ich durchforstet und den neuen Servernamen gefunden.

Bei anschließendem Restart des Servers sagt er mir in der Titelleiste immer noch den alten Servernamen. Da muß doch noch irendwo ein Eintrag mit dem alten Servernamen vorhanden sein.

Habt ihr eine Idee wo das sein könnte bzw. einen Ratschlag wie man noch vorgehen könnte?

Die Hilfe habe ich mir angesehen und nichts für mich entdeckt was mir weiterhelfen könnte.

Besten Dank im Voraus

Stefan

Hallo Ronka,

DANKE für Deine Antwort!!!

Ich habe mich für folgende Variant entschieden:

wert_Body = Me.m_NoteUIMemo.FieldGetText( "Body")
msgbox wert_Body
Dim eval As Variant
Dim check As Variant
check = | @Contains(Body;"Stefan") |
eval = Evaluate(check)
Print eval(0)
Msgbox eval(0)

Mit dem Befehl "msgbox wert_Body" lass ich mir den Wert anzeigen. Meine Signatur mit dem Begriff "Stefan" ist enthalten!!!

Leider findet er mit dem @Contains-Befehl nicht den Begriff "Stefan"!

Hast Du eine Erklärung warum der Befehl nicht funktioniert?

Hallo Zusammen,

ich möchte im Body-Feld der Standardmailschablone nach bestimmten Eintragungen suchen. Dies soll geschehen nachdem der Benutzer die Schaltfläche "senden" betätigt hat.

Durch diese Funktion möchte ich überprüfen, ob ein bestimmter Textinhalt, an die geschriebenen E-Mail angehangen wurde. Falls es den Textinhalt nicht in der Mail gibt, wird dieser automatisch gesetzt.

Die Stelle an der ich den Text einfügen soll habe ich bereits gefunden, doch die Methode "FieldContains" der NoutesUIDocument Classe bringt mich nicht weiter. Vermutlich da diese Methode ein Sting-Feld erwartet und kein Rich-Text-Feld.

Hat von Euch einer eine Idee?

Danke Stefan

P.S. Übrigens, dieses Forum finde ich echt klasse

Hallo Zusammen,

DANKE für Eure Antworten und die tatkräftige Unterstützung.

Das PostOpen-Ereignis habe ich wieder herausgenommen. Die Gestaltung des Profildokumentes wurde ja bereits aktualisiert. Und als Neuerung habe ich den Datenbank-Cache mit "dbcache flush" gelöscht.

Siehe da, die Änderungen der Feldwerte sind sofort wirksam, ohne das der Anwender etwas ausführen muß. So wollte ich es haben.

Nochmals DANKE für Eure Antworten!!!

Gruß

Stefan

Ich habe etwas herumexperimentiert mit Profildokumenten.

Ich scheine aber immer noch einen Fehler zu machen. Meine Annahme ist, dass ich ein Profildokument für die Datenbank und ein Pofildokument pro User erstellen kann. Anschließen habe ich die Möglichkeit das Profildokument für den User zu öffnen.

Set doc = db.GetProfileDocument("CalendarProfile", session.UserNname)

Nun wechsel ich die ID damit in den User nicht verfälsche. Ich stelle mit erstaunen fest, dass per Postopen (hier setze ich neuer Werte) ein anderes Dokument erscheint als über den manuellen Weg (hier sind die neu gesetzten Werte nicht zu erkennen, reload und refresh benutzt). Das kann doch eigentlich nicht sein, oder?

Da der Rechner nur das ausführt was wir im mitteilen, schein ich offenbar einen Fehler zu machen! Aber welchen?

Ich verwende Notes 5.06a!

In der Tat habe ich zwei Felder mit verschiedenen Feldwerten hinzugefügt.

Es muß doch möglich sein diese Feldwerte neu berechnen zu lassen. Ich versuch es bereits über die Postopen-Funktion bei Datenbank öffnen.

Muß ich denn bei Profildokumenten mit neuen Feldwerten etwas beachten?

Gruß Stefan

Hallo,

ich habe die Gestaltung der Maske [Calendar Profile] in der Standardmailschablone verändert.
Nach anschließender Aktualiesierung der Gestaltung durch die Funktion "Gestaltung aktualisieren" sind die Veränderungen auch in den Mailboxen der User übernommen worden!
Aber die Änderungen sind nicht wirksam! Offensichtlich ist das Formular und das eigentliche Dokument nicht miteinander verknüpft.

Ich möchte die beiden Dokumente, ohne das der Anwender etwas ausführen muss, eine Aktualisierung der Dokumente bewirken, nur wie?

Hat jemand eine Idee?

Danke

Stefan

Ich habe folgendes Problem:

In einer Ansicht habe ich einen "Drucker"-Button bereitgestellt. Wählt ein Benutzer ein oder mehrere Dokumente aus, werden diese ausgedruckt.

So habe ich es realisiert:
Select Case test(0)
Case "Absage allgemein"
Call uiview.Print( 1, 0 ,0 , False, 2, "print_allgemein")
Case "Absage irrtürmlich zugeschickt"
Call uiview.Print( 1, 0 ,0 , False, 2, "print_speziell")
End Select

Nach dem diese Funktion ausgeführt wird, soll anschließend in dem(n) Dokument(en) der Username und das Datum in einer Art "History" abgespeichert werden.

Das Problem besteht darin das ich nicht weiß, wie ich aus der aktuellen View in die Backend-Dokumente die Felder manipulieren kann.

Danke für Eure Hilfe

Stefan

Alles klar werd ich machen!

Ich habe mich schon mit Herrn Martens von der Firma I-Con unterhalten. Er wird mir eine Testversion zukommen lassen. Während der Unterhaltung haben wir u. U. ein Problem festgestellt. Wir setzen ein Virenprodukt von McAfee auf unserem Lotus Domino R5 Server ein. Dies ist noch nicht getestet und kann zu unerwarteten Problemen führen. Daher ist ein Test unausweichlich.

Er hat mir eine Lizens für 410 Euro angeboten, wenn ich es richtig verstanden habe. Mir liegt aber bislang noch kein Angebot vor.

Danke für den Hinweis!!!

Die Beschreibung des Produkts verspricht einiges. Ich werde mich erkundigen wie preiswert es ist. Da ich aber weiss, dass die Firma momentan keine Ausgaben mehr tätigt, muss ich versuchen selbst eine Lösung auf die Beine zu bekommen!!!

Schöne Grüsse aus dem Ruhrpott

Stefan

Hallo,

ich habe eine Aufgabe erhalten in der ich bei allen ausgehenden E-Mail einen Text anhängen soll (Virussignatur). Im Prinzip wie in der Standard-Mail-Schablone, Funktion Signatur.

Dieser neue Text soll durch den Benutzer aber nicht gelöscht oder bearbeitet werden können und nur für E-mails gelten, die an externe gesandt werden.

Daher stelle ich mir vor dies in der server/mail.box nachträglich anzuhängen.

Hat vielleicht einer schon einmal dies oder ähnliche Dinge machen müssen und kann mir einen Tip oder sogar den Code geben?

Für jeden Gedankenaustauch bin ich DANKBAR.

MfG
Stefan