Super dass hat geklappt und hilft mir enorm weiter. Ich wäre nicht darauf gekommen, zumal ich am Anfang Server und Dateipfad angegeben hatte.
Beiträge von Weissnix
-
-
Vielen Dank für Deine Mühe, ich habe den Code nun mal in einen neuen Agenten gepackt und den Lotus Debugger dazu laufen lassen.
Die Datenbanken lassen sich beide so nicht öffnen. Ich habe auf alle drei Datenbanken Manager Rechte, ich weiß nicht woran es liegt.
Ob ich noch irgendetwas an den Berechtigungen ändern muss/ kann?
-
Hallo Carsten,
vielen Dank für deine Hilfe, es wird keine Datenbank geöffnet.
Ich habe dies mal so abgeändert, und es wird der Wert "Start" ausgegeben, die Variabel am Ende mit "Ende" wird nicht überschrieben.
Die Session wird auch nicht benötigt oder?
Code
Alles anzeigen%REM Function LesePersonen %END REM Function LesePersonen As String On Error GoTo ErrHandler Dim session As New NotesSession Dim dbUser As New NotesDatabase("", "") Dim dbOrga As New NotesDatabase("", "") Dim testmeldung As String LesePersonen="Datenbank(en) nicht geöffnet" LesePersonen="Start" Call dbUser.Open("","it\Benutzer.nsf") Call dbOrga.Open("","ebuero\OrgaKrKle.nsf") If dbOrga.IsOpen Then LesePersonen=LesePersonen+"OrgaDB erfolgreich geöffnet" End If If dbUser.IsOpen Then LesePersonen=LesePersonen+"UserDB erfolgreich geöffnet" End If LesePersonen="Ende" ExitFunction: Exit Function ErrHandler: Print |Error: Code Erweiterungen -> LeitsystemXML Agent: LesePersonen - |+Str(Err) Resume ExitFunction End Function
-
Hallo Zusammen,
vielen Dank für eure Rückmeldung.
Alle drei DBs (DB des Agenten, Orga DB und Benutzer DB) liegen alle auf dem gleichen Server in unterschiedlichen Verzeichnissen
Mit dem Code oben, bekomme ich bei beiden DBs keine Rückmeldung:
Code
Alles anzeigen%REM Function LesePersonen %END REM Function LesePersonen As String On Error GoTo ErrHandler Dim s As New NotesSession Dim db As NotesDatabase Dim testmeldung As String Set db = s.GetDatabase( "m50003", "it\Benutzer.nsf") Set db = s.GetDatabase( "m50003", "ebuero\OrgaKrKle.nsf") Call db.Open("","") If db.IsOpen Then testmeldung="Datenbank erfolgreich geöffnet" Else testmeldung="Datenbank nicht geöffnet" End If LesePersonen=testmeldung ExitFunction: Exit Function ErrHandler: Print |Error: Code Erweiterungen -> LeitsystemXML Agent: LesePersonen - |+Str(Err) Resume ExitFunction End Function
-
Hallo Zusammen,
ich versuche eine neue Datenbank zu öffnen, jedoch klappt dies nicht.
Den Grund dafür konnte ich bisher nicht finden.
Die erste DB funktioniert egal mit welchem Aufruf, ich erhalte die Rückmeldung "Datenbank erfolgreich geöffnet":
Call db.Openbyreplicaid("","C1257111004084AS") 'Orga DB
Call db.Open( "m50003", "ebuero\OrgaKrKle.nsf" ) 'Orga DB
Nehme ich die neue DB:
Call db.Openbyreplicaid("m50003","C1258A680037C84E") 'Benutzer DB
Call db.Open( "m50003", "it\Benutzer.nsf" ) 'Benutzer DB
Bekomme ich keine Rückmeldung, auch nicht "Datenbank nicht geöffnet"
Code
Alles anzeigen%REM Function LesePersonen %END REM Function LesePersonen As String On Error GoTo ErrHandler Dim session As New NotesSession Dim db As New NotesDatabase("","") Dim testmeldung As String LesePersonen="" 'Call db.Openbyreplicaid("","C1257111004084AS") 'Orga DB 'Call db.Open( "m50003", "ebuero\OrgaKrKle.nsf" ) 'Orga DB 'Call db.Openbyreplicaid("m50003","C1258A680037C84E") 'Benutzer DB Call db.Open( "m50003", "it\Benutzer.nsf" ) 'Benutzer DB If db.IsOpen Then testmeldung="Datenbank erfolgreich geöffnet" Else testmeldung="Datenbank nicht geöffnet" End If LesePersonen=testmeldung ExitFunction: Exit Function ErrHandler: Print |Error: Code Erweiterungen -> LeitsystemXML Agent: LesePersonen - |+Str(Err) Resume ExitFunction End Function
-
Hallo Zusammen,
könnt Ihr mir sagen, ob die Funktion in einer Notes Version besteht, dass man aus einem Sammelpostfach an alle eingehenden Mails eine Automatische Antwort senden kann?
Über die Mailregeln konnte ich das nicht lösen.
Die Mail soll ein automatische Antwort sein, mit ungefährer Bearbeitungsdauer etc. damit die Kunden wissen, wie lange Sie ungefähr warten müssen auf eine Antwort.
Beste Grüße
-
Hallo Zusammen,
aus einem "Funktionspostfach" sagen wir abc@firma.de haben Person A, B, C Zugriff.
Nun gibt es eine Mailverteiler Gruppe in der Personen A,B,C,D,E,F enthalten sind.
Wenn nun Person A aus dem Funktionspostfach eine Mail an die Verteilergruppe weiterleitet, erhalten alle in der Gruppe diese Email, nur nicht Person A.
Diese sendet aus dem Funktionspostfach als abc@firma.de (Principal?) und gesendet von Persona A (From?) und erhält selbst diese nicht durch den Verteiler.
Hoffe habe das verständlich erklärt, kann man das Verhalten beeinflussen?
-
Vielen Dank Carsten für deine ausführliche Antwort.
Das stimmt natürlich Schleifen sollten nicht vorkommen und gerade Bilder/Logos etc. werden auch im @FILE geführt.
Dann führt kein Weg am Script Agenten vorbei
Besten dank
-
Hallo Zusammen,
wir würden gerne in einer Maildatenbank, automatisch auf Mails mit Anhängen antworten.
Besteht die Möglichkeit dies mit einem einfachen Agenten zu machen?
Das Feld der Anhänge @FILE taucht bei der Auswahl nicht auf.
- Neuer Agent > "einfache Aktion",
- Aktion > Antwort an Absender & einmal pro Person + Nachricht hinterlegen
- Dokumentenauswahl > "Bedingung hinzufügen" > Nach Feld??
- Eigenschaftsbox des Agenten >Laufzeit "Nach Eingang neuer Mail"
-
Hallo Zusammen,
ich versuche aus unsere Notes-Datenbank Daten via JSON an unser Intranet (Wordpress) weiter zu geben.
Mit Hilfe von einer Xpage, welche ein REST-Service Steuerelement beinhaltet.
Das Beispiel wird hier im Video erläutert ab ca. 3:25
Externer Inhalt youtu.beInhalte von externen Seiten werden ohne Ihre Zustimmung nicht automatisch geladen und angezeigt.Durch die Aktivierung der externen Inhalte erklären Sie sich damit einverstanden, dass personenbezogene Daten an Drittplattformen übermittelt werden. Mehr Informationen dazu haben wir in unserer Datenschutzerklärung zur Verfügung gestellt.Ich hatte mir auch die Beispieldatenbank "Extension Library Demo Database Extended" hier geholt und installiert:
OpenNTF.org - The Open Source Community for Collaboration Solutions
Mit dieser klappt es wie im Video.
Jedoch wenn ich meine Seite wie folgt einbinde:
Sieht der Quelltext so aus:
und bekomme folgende Fehlermeldung:
Fehlt dort etwas an der Datenbank, damit ich diese Funktion einbunden kann?
-
Vielen Dank für den Tipp, so mache ich das
-
Hallo Zusammen,
ich versuche einen Raum anhand eines Schlüssels (Zimmernummer) aus einem View/Tabelle zu finden.
Wenn gefunden, dann wird dies angezeigt, ansonsten nicht. Der Code ist nicht vollständig...
Der Teil bei dem ich eine Frage hätte wäre:
Wird der Schlüssel nur mit der ersten Spalte (Column) der Ansicht verglichen, oder kann ich diesen auch auf eine andere Spalte anwenden?
Denn wenn der Schlüssel nicht in der ersten Spalte steht, komme ich immer in den Else-Teil....
Der Codeschnipsel dazu:
Code
Alles anzeigenFunction LeseBesprechungsraeume As String Dim session As New NotesSession Dim db As NotesDatabase Set db = session.CurrentDatabase Dim viewMapping As NotesView Dim entryMapping As NotesViewEntry Dim zimmernummer As String On Error GoTo ErrHandler Set viewMapping=db.Getview("meineAnsicht") If (viewMapping Is Nothing) Then GoTo ErrHandler End If Set entryMapping = viewMapping.GetEntryByKey(zimmernummer) If Not (entryMapping Is Nothing) Then displayInnerXml="true" Else 'Räume ohne Mapping sollen gar nicht angezeigt werden? displayInnerXml="false" End If ErrHandler: Print |Error: - |+Str(Err)
-
Guten Morgen Zusammen,
besteht die Möglichkeit einzusehen, welcher Benutzer meine Maildatenbank geöffnet hat?
Ich habe selbst Adminrechte und habe Zugriff. Kann jedoch bisher nur diese Infos finden:
-
Den Besitzer einzutragen ist essenziell wichtig in jeder Mail-Db und hat erstmal nichts mit Berechtigungen zu tun:
Jeweilige Mail-DB (bzw. bei dir den Teamkalender) öffnen, Aktion Mehr > Vorgaben ...
Dort den Mail-(in)-Namen dieser Mail-DB (!) unter Mail > Allgemein > Besitzer auswählen und eintragen.
WICHTIG:
1) Der Besitzer muss identisch mit dem Namen des Mail-In-Dokuments sein; keine andere Person oder sich selbst eintragen da dieser Name zur Adressierung im Notes verwendet wird und dann nicht mehr eineindeutig wäre.
2) Name im Mail-In-Dokument sollte hierarchisch (Team Muster/Meine Firma) sein und NICHT identisch mit der Internetmailadresse.
Nur einige der Einstellungen hier greifen später für weitere Nutzer dieser Teamdatenbank, der Einstellungsdialog ist ebenso wie das gesamte Mailtemplate eigentlich nicht für Teamfunktionen konzipiert kann aber mit Einschränkungen durchaus so benutzt werden.
Was alle Mitglieder des Teams später zu machen haben:
1) eigenen Kalender öffnen und in der Navigationsleiste "Kalender hinzufügen..." auswählen
2) Hinzufügen als "Notes-Benutzer-Kalender" wenn der Teamkalender mit dem Standard-Mailtemplate angelegt wurde
3) im Feld Benutzername den Mail-In-Namen eintippen, sobald die richtige Db angezeigt wird diese auswählen
4) Offline-Modus auswählen, wenn der Nutzer auch mit alternativen Clients seinen Kalender benutzt (Verse, iNotes, ...)
5) Farben festlegen (kann später noch geändert werden) und OK
Carsten
Hallo Carsten,
vielen Dank für die Mühe und Erklärung.
Dann hatte ich zumindest schonmal den Besitzer unter Vorgaben richtig eingestellt, dass dort die MailinDB genannt wurde.
(Team Muster/Meine Firma) sein und NICHT identisch mit der Internetmailadresse.
Okay, dass war zum Glück nicht der Fall die Adresse lautet teamkalender-xxx@domain.de und die Mail In DB heißt Teamkalender XXX/Firma
Genau an dieser Stelle hapert es:
1) eigenen Kalender öffnen und in der Navigationsleiste "Kalender hinzufügen..." auswählen
Diesen Menüpunkt besitze ich, jedoch die Teammitglieder nicht.
Kann dies vielleicht an der optischen Einstellung hängen wie usebasicnotes=1 in der Ini?
Wie gesagt, Schablone der Teammitglieder hatte ich bereits aktualisiert...
-
Die Funktion, in einem Kalender weitere Kalender hinzuzufügen/anzuzeigen/einzublenden, ist nur für den Besitzer verfügbar.
Das hat verschiedene Gründe, unter anderem, weil zum Beispiel für viele (Internet-) Kalender auch Zugangsdaten hinterlegt werden müssen, die dann im persönlichen Adressbuch des Besitzers gespeichert werden. Der Client holt sich für die Anzeige der eingeblendeten Kalender wiederum die Informationen über eine Mischung aus Profildokumenten (in der Mail-DB) und Kontodokumenten (aus dem Adressbuch) - diese Informationen stehen nur dem Besitzer uneingeschränkt zur Verfügung.
In diesem Fall (Team) würde ich den umgekehrten Weg gehen: jedes Teammitglied blendet sich den Teamkalender in seinen persönlichen Kalender ein.
HTH
Carsten
Danke für die Erklärung, wo kann ich denn den Besitzer herauslesen?
Ich habe folgendes gemacht mit meinem Admin User:
- MailIn DB angelegt, theoretisch ist der Kalender nun auch erreichbar unter teamkalender-xxx@domain.de
- DB angelegt mit Vorlage Notes R9
- Berechtigungsgruppe erstellt, alle Teammitglieder und meinen eigenen nicht Admin Benutzer
Mein Client/Benutzer hat die Möglichkeit den Team Kalender hinzuzufügen, so das ich diesen in meinem Kalender sehen kann und ein/ausblenden kann.
Der Rest vom Team kann das leider nicht.
Wie könnten sie den umgekehrten Weg gehen, so dass der Teamkalender im persönlichen eingeblendet wird?
-
Hallo Zusammen,
ich habe für ein Team eine eigene Mail/Kalender DB angelegt.
Alle Teammitgleider haben vollzugriff auf die DB.
Leider taucht im Notes Client, der Button "Kalender hinzufügen" wie hier beschrieben nicht auf:
https://www.uni-kassel.de/its-…kalender-hinzufuegen.html
Den Kalender selbst können die Teammitglieder öffnen, also scheint es kein Rechteproblem zu sein.
Ich als Admin Benutzer habe zumindest im Client den Button.
Beim Teammitglied habe ich auch bereits die Schablone aktualisiert.
Beim Anlegen habe ich mich an diese Anleitung gehalten:
-
Hallo Zusammen,
ich verusche für den Benutzer verschiedene Signaturen zu hinterlegen.
Ich habe den Beitrag gefunden, wo man den Text direkt hinter einem Button legen kann:
http://www.alanlepofsky.com/al….nsf/dx/customize-toolbar
Daneben habe ich die Lösung im Netz gefunden mit dem Command Befehl hinter dem Button:
https://www.assono.de/blog/meh…naturen-und-textbausteine
Wenn ich jedoch diesen Befehl:
erhalte im Client die Meldung: Angegebener Befehl kann nicht ausgführt werden.
Ist dies ein Rechteproblem?
-
Hallo Carsten,
danke für den Tipp, die Gruppen hatte ich bereits angelegt.
Habe nun dementsprechend 5 Agenten angelegt mit Infobrief und Dokumentenauswahl
Werde trotzdem für mich weiter versuchen dies als Lotusscript Agent zu lösen, auf kurz oder lang bekomme ich immer wieder solche Anfragen.
-
Ich hab den Trigger beim Agenten nun mal auf Ereignis "nachdem Dokument erstellt oder geändert wurde" der Agent löst nun bei neuer Mail aus, leider greift die IF Abfrage nicht bei neuen Dokumente doc.IsNewNote da das Dokument wohl schon gespeichert ist?
Wenn die If Abfrage raus ist, erhalte ich zu jedem Dokument eine Mail
Ich dachte ich könnte ohne If Abfrage arbeiten, da der Agent bei .unprocesseddocuments nur neue Dokumente seitdem letzten laufen einbeziehen sollte?
Code
Alles anzeigenSub Initialize Dim session As New NotesSession Dim db As NotesDatabase Dim col As NotesDocumentCollection Dim doc As NotesDocument Set session = New NotesSession Set db = session.CurrentDatabase Set col = db.unprocesseddocuments On Error GoTo ErrHandler Set doc = col.GetFirstDocument() While Not(doc Is Nothing) If doc.IsNewNote Then doc.Form = "CST_Dateitransfer" Call doc.send(True, "Vorname Name") End If Set doc = col.GetNextDocument(doc) Wend ErrHandler: Print |Error: Dateitransfer -> MailNewDoc Agent: - |+Str(Err) Exit Sub End Sub
-
Im Log gefunden, das ist auch die URL die aufgerufen wird, wenn der 404 erscheint
2020-03-06 09_29_33-meinBenutzer- Remotedesktopverbindung.jpg