Beiträge von Nemesis

    Hallo,


    ich habe folgendes Problem.


    Ich erzeuge über eine LotusScript-Funktion eine HTML-Datei mit Daten aus der Notesdatenbank und möchte mir anschließend das Ergebnis ohne die Datei auf der Festplatte suchen zu müssen, anzeigen lassen.


    Wie kann ich eine Datei über LotusScript, welche Sie z.B. unter C:\TEMP befindet starten. Alternativ wäre es auch möglich die Datei zunächst als Attachment in das Dokument zu laden. Leider komme ich dabei auch nicht weiter...


    Bitte um Hilfe. Danke!

    Hallo,


    zur Datenselektion möchte ich innerhalb einen LotusScripts die PickList-Funktion verwenden, scheitere aber beim Versuch es mit Evaluate zu machen (Habe ein Problem mit den Anführungszeichen):


    Wie schaffe ich es die @Funktion


    @PickList([Custom]:[Single];"":"";"($PRODUCTS)";"Produkte";"";1);


    in ein


    ArtKey = Evaluate("...


    zu verpacken. Vermutlich sehe ich den Wald vor Weihnachtsbäumen nicht und bin deshalb für Hilfe dankbar.

    Mein persönlicher Vorschlag


    Im Exiting-Event prüfst du mit einem kleinen LotusScript einfach, ob die Nummer bereits vorhanden ist:


    Sub Exiting(Source As Field)

    Dim ws As New notesuiworkspace
    Dim sid As New notessession
    Dim db As notesdatabase
    Dim view As notesview
    Dim iddoc As notesdocument
    Dim doc As notesdocument

    Set db = sid.currentdatabase
    Set doc = ws.currentdocument.document
    Set view = db.getview("IDs")
    Set iddoc = view.getdocumentbykey(doc.ID(0))

    If Not iddoc Is Nothing Then
    Print "nummer bereits vorhanden"
    End If

    End Sub

    Auch wenn das Problem offenbar schon erledigt ist, möchte ich an der Stelle meine Lösung vorstellen. Diese ist insbesondere hilfreich, wenn das Unternehmen aufgrund der Struktur mit verschiedenen Notesdomänen arbeitet.


    Ich hatte genau das gleiche Problem und im Blackberry-Zeitalter ist es völlig normal, dass Mitarbeiter der Firma samt Mail-Adresse im persönlichen Adressbuch wegen der Synchronisation stehen.


    Ich fange den Fehler ab, wenn es mehrere Übereinstimmungen gibt (Fehlercode 4295) und lege dann die Mail zum Senden einfach in der Mail.box des Servers ab


    On Error Resume Next
    Call Mail.Send(False)
    If Err = 4295 Then
    Print "Copy Mail to Mail.box"
    Dim MailBox As New NotesDatabase(DBServer,"mail.box")
    Dim MailBoxDoc As NotesDocument
    Set MailBoxDoc = New NotesDocument(MailBox)
    Call Mail.CopyAllItems(MailBoxDoc)
    Set Item = MailBoxDoc.AppendItemValue("Recipients",MailBoxDoc.SendTo)
    Set Item = MailBoxDoc.AppendItemValue("From",SID.UserName)
    Call MailBoxDoc.Save(True,False)
    End If

    Hallo,


    ich generiere mit LotusScript eine Tabelle in einem Richtextfeld, um diese hinterher mit Daten zu füllen. Klappt alles prima, nur habe ich bislang keine Möglichkeit entdeck, wie ich die Rahmen (Farbe, Breite, usw.) der Tabelle per Script festlegen kann.


    Auch die Style property der notesRichtTextTable bringt mich irgendwie auch nicht weiter.


    Bin für Tipps dankbar.

    Wir haben eine Datenbank, welche Ansichten vom Typ "Gemeinsam, privat bei Erstbenutzung" enthält. Diese Ansichten wollen wir jetzt ablösen und natürlich die privaten Ansichtern der User (sofern die überhaupt genutzt worden sind) löschen.


    Verwende ich DB.Views, sehe ich allerdings nur meine persönlichen Ansichten.


    Wie komme ich an die persönlichen Ansichten der User ran?


    Vielen Dank im Voraus.

    OK, ich konnte den Fehler jetzt abfangen (4295). Ich habe es auch geschafft, das Dokument in die Mail.box zu kopieren (sehr guter Tipp), jedoch erscheint dann (ich teste es lokal) der Fehler:


    "Mail-Nachrichten eines anderen Bentuzers wurden nicht zugestellt. Überprüfen Sie MAIL.BOX, um weitere Informationen zu erhalten."


    Ich habe festgestellt, dass keine Empfänger und kein Sende-Datum in der Ansicht erscheint. Kopiere ich die Infos in die Mail-DB, sind jedoch die Felder besetzt.


    Ich habe jetzt schon das Feld SendTo nach Recipients kopiert, doch es geht immer noch nicht. Lässt die Mail.box es vielleicht nicht zu???


    On Error Resume Next
    Call Mail.Send(False)
    If Err = 4295 Then
    Print "Copy Mail to Mail.box"
    Dim MailBox As New NotesDatabase(DBServer,"mail.box")
    Dim MailBoxDoc As NotesDocument


    Set MailBoxDoc = New NotesDocument(MailBox)
    Call Mail.CopyAllItems(MailBoxDoc)
    Set Item = MailBoxDoc.AppendItemValue("Recipients",MailBoxDoc.SendTo)
    Call MailBoxDoc.Save(True,False)
    End If

    Hat jemand eine Idee, was ich gegen folgendes Problem machen kann:


    Ein LS verschickt mit Call xDoc.Send(False) das Dokument per Mail an eine zuvor angegebene Person. Da jedoch der Empfänger sowohl im öffentlichen als och im privaten Adressbuch steht, erscheint o.g. Meldung.


    Wie kann ich das umgehen. Das xDoc soll allerdings nicht im Frontend sichtbar werden/sein.

    Mit @Elements geht das in diesem Fall nicht, da ich die Ansicht über einen Feldwert und der Option Einzelne Kategorie anzeigen eingrenze und über @Elements und @DBColumn immer alle Dokumente erhalte, die regulär in der Ansicht sind.


    OK, dann habe ich offenbar nur die unschöne Option, die Actions der View einzublenden... Schade...

    Es wäre in Ordnung, wenn die Anwender persönliche Masken hätten, da nur etwa 50 von 7000 Usern davon betroffen sind. Jedoch wenn ein User die private Ansicht mit der View.SelectionFormula = ... nutzt, dann kommt der NDS-Fehler...


    @SetViewInfo brachte mich leider auch nicht weiter...

    Ich suche verzweifelt nach einer Möglichkeit auf eine embedded View innerhalb einer Form zuzugreifen, um beispielsweise die angezeigten Dokumente zu zählen oder auf das aktuell markierte Dokument zuzugreifen.


    Hat jemand eine Idee?

    Möchte mit Hilfe von Aktionsschaltfläche die Selectionformel ändern. Dies klappt sehr gut, jedoch nur wenn der Anwender Entwickler-Rechte hat (ist ansich logisch).


    Ich habe jetzt versucht, dieses Konzept auf persönliche Ansichten zu übertragen, doch wenn ein User mit Editor-Recht die Aktion ausführt kommt ein NDS-Fehler.


    Kennt jemand Abhilfe?