Beiträge von olli691

@ RockWilder

ich bevorzuge deine Version 1 :lol:

das wäre sicher ein Ansatz. Doch Geld bekomme ich keines dafür. Also kann ich nur auf Bormittel zurückgreifen.

Hallo Zusammen,

in einer größeren Lotuslandschaft möchte ich (soll ich) alle Mails die darüber versand werden mit einer automatischen Textsignatur am Ende der Mail versehen.

Da es nur diesen einen Server betrifft und noch einige andere für den Mailversand zuständig sind, scheidet das Ändern der einheitlichen Mailschablone leider aus.

Hat jemand einen Ideenansatz wie sich das verwirklichen lässt?

Danke!

Das ganze Spielchen geht per Sametime. Hat ein User einen Sametimeclient, z.B. 3.2 und der Empfänger der sinnlosen Nachricht Sametime im Lotus Notes integirert taucht eine Meldung vom Sametimeclient gesendet in Lotus Notes ohne Absenderangebe, aber mit "Lotus Notes" in der Titelzeile auf. Das lädt User geradezu zum spielen ein! Dies lässt sich nur unterbinden indem alle den gleichen Sametimclient in einem Netzwerk verwenden.

Danke das war der entscheidende Hinweis !!

Zitat

Also wozu das abfangen??

Damit die Benutzer nicht Ihre Eingabe verlieren wenn Sie die ESC Taste drücken ohne vorher gespeichert zu haben.
Komischerweise funktioiert dies bei allen Masken in der DB nur eben nicht in der Wichtigsten, da kann man einfach schließen.
Wenn das Dokument sich ändert und es wir ESC gedrückt soll lediglich die Frage kommen Speicher Ja/Nein
Da dies bei allen ander masken bisher ohne mein zutun funktioniert frage ich mich was ich bei dieser Falsch mache.

Wenn ich in einer Datenbank ein neues Dokument angelegt habe und drücke die ESC Taste schließt das Dokument ohne zu speichern. Wie kann ich das abfangen?
Vielen Dank für eure Hilfe Oliver

ES KLAPPT !!
Ihr seit spitze - ich bedanke mich recht herzlich !!
Als Beginner habe ich echt viel von euch gelernt !

Oliver

Hier nochmal das Script:

Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)

Dim s As NotesSession

Set s = New NotesSession
Set db = source.database

Set coll_del = db.UnprocessedDocuments
If coll_del.count > 0 Then
Set doc_del = coll_del.GetFirstDocument
Do While Not doc_del Is Nothing
If doc_del.DokumentAutor(0) <> s.Username Then
Messagebox("Forget it")
Continue = False
Exit Sub
End If
Set doc_del = coll_del.GetNextDocument(doc_del)
Loop
End If

End Sub

Kannst du mal deinen posten ?
Danke Oliver

Danke für den Hinweis. Ich habe auf @Username geändert und es wird jetzt der canonische Name zurückgegeben. Der Fehler hält jedoch an. Das Feld wird auf der Dokumentenmaske erzeugt. Ist das falsch ?
Danke für eure Hilfe!!

Danke für die Hinweise.

Ich hab das jetzt eingebaut. Der Fehler wechselte zu "Type mismatch"
Ist das vielleicht aus dem Feld "DokumentAutor"? muss ich dort den canonischen Namen einlesen oder zu Vorname Nachname konvertiern?
Das debuggen gibt keinen Aufschluss?!

Habt IHr noch eine Idee??

Gruß Oliver

Hallo Zusammen,

In einer Datenbank dürfen alle Personen alle Dokumente editieren, aber nur ihre eigenen löschen. Die Dokumente anderer dürfen nicht gelöscht werden.

Dazu habe ich folgendes gemacht:
In der ACL:
Alle Editor Rechte mit Löschen

In der Maske:
Ein ausgeblendetes Feld „DokumentAutor“ in das ich mit @V3UserName den Autor in Canonischer Form speichere (Berechnet beim Anlegen)

In der Querydocumentdelete:
Folgendes Script:

Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)

Set coll_del = db.UnprocessedDocuments
If coll_del.count > 0 Then
Set doc_del = coll_del.GetFirstDocument
Do While Not doc_del Is Nothing
If doc_del.DokumentAutor(0) <> s.Username Then
Messagebox("Sie dürfen nicht löschen!“)
Continue = False
Exit Sub
End If
Set doc_del = coll_del.GetNextDocument(doc_del)
Loop
End If

End Sub

Folgender Fehler tritt auf:

Beim markieren des Dokuments zum löschen kommt die Fehlermeldung:

„Variant does not contain an object“

Dannach kann man löschen.

Keine Ahnung wo der Fehler liegt.

Hat jemand eine Idee und kann mir helfen ?!

Vielen Dank

Oliver

Hallo Zusammen,

ich möchte gerne ein Löschscript (Lotusscript) in QueryDocumentDelete (Database Script event) eingeben. Aber ich find das einfach nicht. Kann mir bitte jemand auf die Sprünge helfen wo ich QueryDocumentDelete finde um das Script einzugeben.

Vielen Dank!
Oliver

Hi,

vielen Dank, das hab ich soweit verstanden. Ich habe mir jetzt die DB im Designer geöffnet und die entsprechende Maske geöffnet und das Feld DokumentAutor angelegt das beim Erstellen eines Dokuments den Auto speichert.

Ich finde jedoch nicht das Objekt "Querydokumentdelete".
Ist das gar nicht bei der Maske? Kannst du mir bitte noch sagen wo ich das genau finde, bzw wo ich das Script genau eintragen muss?
Vielen Dank!
Oliver

Folgendes Problem:
In einer Datenbank dürfen alle Personen alle Dokumente editieren, aber nur ihre eigenen löschen. Die Dokumente anderer dürfen nicht gelöscht werden.
Wie stelle ich das in der ACL ein? Oder weis jemand eine andere Lösung.
Vielen Dank für die Hilfe!
Oliver

Hat geklappt, vielen Dank für den kurzen doch sehr guten Hinweis !!

Hallo Zusammen,

ich möchte gerne beim erstellen eines neuen Dokuments eine ExcelDatei automatisch in ein RTF Feld einfügen. Habe keine Ahnung wie das geht. Kann mir jemand helfen ?
Vielen Dank olli691

Hallo,

bei manchen Notes Datenbanken kann ich bei dem Ausdruck der Ansicht nur 200 Dokumente richtig in der Vorschau anzeigen und drucken. Wähle ich mehr als 200 Dokumente fehlen die Kategorie Einträge.
Bei manchen Datenbanken geht es jedoch mit x Dokumenten.
Weiß jemand Rat ??

Unabhängig vom Client. Gleiches Phämomen bei 5, 6 und 6.51.
Server ist ein Domino 6.51.