Beiträge von codec

Wir haben eine defekte Maildatenbank, die sich bisher jedem Reparaturversuch widersetzt hat (Schablone tauschen, fixup und was man so alles machen kann).
Das Problem ist, dass diese Datenbank, wenn sie auf dem Server liegt und per Lotus Notes Client angesprochen wird, diesen sofort abstürzen läßt.

Ich habe es jetzt geschafft eine lokale Replik zu erstellen, die meinen Client nicht abstürzen läßt, jedoch weder eine Kopie noch eine neue Replik der Datenbank auf einem Server funktioniert.

Ich überlege jetzt eine neue frische Datenbank zu erstellen und per Skript alle Dokumente und Folder aus der alten in die neue Datenbank zu kopieren.
Habt Ihr vielleicht schon ein kleines Progrämmchen, dass dies für mich erledigt, bzw. habt Ihr vielleicht eine Idee, wie ich dem Problem sonst beikommen könnte.

Danke im Voraus

Norbert

Zitat

Hinzu kommt, dass spätestens ab R8 auf dem Domino keine Datenbank namens NAMES.NSF mehr erwartet werden darf.

So wie ich das hier sehe, wird es außer Lotus Notes 6.5.5 in diesem Laden hier keine neuere Version mehr geben.
Hier soll tatsächlich Scalix eingeführt werden...
Bis dahin wird der Workaround schon noch halten...

:undweg:

Norbert

Super Danke,

ich habe jetzt den folgenden Part "On Error" eingebaut:

control_error:
	Print "Error: "+Cstr(Err)+" Line: "+Cstr(Erl)
	If Err = 4294 Then
		Msgbox "Error sending mail to:" & sendto,  0+16,"Warning."
		Print Cstr(Erl)+" "+Err
	Else
		Set namesdb= session.getdatabase(db.server, "names.nsf")
		Set Persondoc= namesdb.getview("($Users)").getdocumentbykey(docmail.SendTo(0))
		docMail.SendTo = Persondoc.fullname(0) & "@" & Persondoc.MailDomain(0)
		Call docMail.Send(True)
		Resume Next 
	'	Msgbox "Error sending mail",  0+16,"Warning."     
	'	Print Cstr(Erl)+" "+Err
	End If
	Print Cstr(Erl)+" "+Err
	Exit Sub

und schon klappt es...

Danke

Norbert

Hallo Zusammen,

wenn ich über den folgenden Code eine Mail per Button aus einer Anwendung versende, dann funktioniert es prima, wenn der Empfänger nur im allgemeinen Adressbuch ist. Wenn er aber auch im lokalen Adressbuch des Users ist erhalte ich die Fehlernummer 4349 (NOTES_ERR_CANT_SELF_ASSIMILATE) im "docMail.send(False)"
Wie kann ich dieses Problem umgehen???

Set docMail = New NotesDocument( dbMailBox )	
	Set body = New NotesRichTextItem( docMail, "Body" )	

	docMail.Form ="Memo"
	docMail.subject = subject	
	docMail.SendTo = sendto
	docMail.From = who
	docMail.Principal = who
	docMail.PostedDate = Now
	docMail.ReplaceItemValue("$AssistMail","1").IsSummary = True 

	Call docMail.Save(True,True)
	Call docMail.send (False)


	Exit Sub

Na prima,

dann brauch ich ja nicht weiter suchen....

Danke

Norbert

Hallo,

wir haben ein seltsames Problem hier. Wenn ich eine Weiterleitungsregel generiere, die auf alle neuen Dokumente einer Mail-Datenbank (R6.5) wirken soll, so werden die S/MIME verschlüsselten Mails nicht weitergeleitet.
Hat irgendjemand eine Ahnung, wo das her kommen kann??
Ich habe im Profil Dokument geschaut, dort steht:

@If((@All); (@Do(@SetField("$FilterActions";@Trim($FilterActions:"COPYTO1 +=+ ich@domain.com"));@SetField("DisplayCopyTo_Icon";"1"))); "" )

?????

Norbert

So sei es...

temp:=@ReplaceSubstring("notes://"+@Name([CN]; @ServerName)+"/"+@Subset(@DbName; -1)+"/0/"+@Text(@DocumentUniqueID)+"?OpenDocument";"\\\\";"/");

Danke noch mal...

Norbert

Hi Taurec,

danke, jetzt hab ich den Wald entdeckt zwischen den Bäumen. Leider hatte ich keine tiefgreifenden Infos gefunden, wie genau der Link aufgebaut wird. Ein +"/0/"+ vor der DocID hat das Problem behoben. Die Backslashes sind scheinbar nicht ganz so wichtig.

Danke nochmal

Norbert

Die Fehlermeldung lautet:

Zitat

The document specified by the link cannot be located within the linked-to database

???

Er kann die UID nicht finden, Oder???

Ich sehe nicht was an dem Link verkehrt ist:

Zitat

notes://Admin-K1/Develop\Test\infoCenter.nsf/5B4B3AA6C5BDC03BC125725800379D6B?OpenDocument

Gruß

Norbert

Hallo, danke für die Hinweise...

Ich hab jetzt mal:

temp:="notes://"+@Name([CN]; @ServerName)+"/"+@Subset(@DbName; -1)+"/"+@Text(@DocumentUniqueID)+"?OpenDocument";

versucht, aber ich kriege Fehlermeldungen und keine Dokumente...

Was mache ich falsch???

Norbert

Uff!!!

hast Du auch einen Tipp, oder eine Bauanleitung an der Hand??

Norbert

Mmmmh,

gibt es neben dem [IncludeDocLink] Parameter noch einen weiteren??
Oder muß ich mir den Link "selberbauen"??

Codec

Hallo,

ich habe hier eine "antike" Datenbank, in der per:

@MailSend(@Unique(@Trim(_Resp:_Backup));"";"";"Neue Reisebuchung";"Es gibt eine neue Reisebuchung von "+Traveller;@NewLine;[PriorityHigh] :[IncludeDoclink]));

Mails mit Doclinks versendet werden.
Nun haben wir eine ganze Reihe Mitarbeiter, die zusätzlich zum Notes Client auch einen IMAP Client einsetzen. Diese Mitarbeiter haben, damit sie SMIME verschlüsselte Mails erhalten "Preferes MIME Messages" im Personendokument eingetragen.
Leider enthalten die Mails aus der obigen Datenbank keinen Doclink mehr.
Wie kann ich einen Doclink ala: notes://DatabaseServer@Domain/__C1256E170046FF4E.nsf/0/28EC063808EE3774C125740A004B5C45?OpenDocument
in die Mails einfügen??
Ich kriege es per Lotus script hin, jedoch müßte ich dann die ganze Logik der Datenbank verändern...

Wer weiß Rat???

Danke

Codec

Hallo Helmut,

nein, dass bringt leider nix. Diese Funktion hatte ich auch schon gefunden..

Danke

Norbert

Hallo,

heute mal eine DAU Frage mit Tomaten auf den Augen.

Bei gewissen Mails, die per Thunderbird an Lotus Notes Clients 6.5.x geschickt werden und ein Textattachment enthalten wird dieses inline angezeigt, also nicht als Anhang. Das führt z.B. bei Programmcode dazu, dass die Datei nicht einfach gespeichert werden kann, sondern per Cut and Past rauskopiert werden muß, wodurch dann auch noch unter Umständen zusätzliche Zeilenumbrüche eingefügt werden, die das Programm "zerstören".
Kann ich am Notes Client irgendetwas einstellen, damit er diese Attachments als Attachment anzeigt??

codec

Vielleicht schaust Du erstmal in der ID nach, was da steht.
Dort stehen ja die Zertifikate der Zertifier drin. Dann weißt Du wenigstens, als was sich dein Administrator fühlt....

Gruß

codec

OK, damit das hier nicht unbeantwortet bleibt...

Mein Vorschlag: Pack das skript in einen Button:

Dim session As New NotesSession
	Dim db As NotesDatabase
	Dim acl As NotesACL
	Dim entry As NotesACLEntry
	Dim nextentry As NotesACLEntry
	Dim HopOderTop As Variant
	Set db = session.CurrentDatabase
	Set acl = db.ACL
	Set entry=acl.GetFirstEntry
	While Not entry Is Nothing
		Set nextentry=acl.GetNextEntry(entry)
		HopOderTop=Messagebox("Darf bleiben? "+entry.Name,36,"Hop oder Top")
		If HopOderTop<>6 Then
			entry.remove
		End If
		Set entry=nextentry
	Wend
	Call acl.Save

Das sollte funktionieren...

Codec

Schau doch mal hier:
OoO für andere Benutzer aktivieren...

bzw.:
hier

Du öffnest die Datenbank im Designer und erstellst irgendwo eine Aktion, die das Lotus skript enthält.
Nun speicherst du die aktion ab, aktivierst den Debugger und führst die Aktion aus.
Der Debugger springt an und Du klickst im Einzelschrittmodus durch das Progrämmle.
Wenn das "Set acl = db.ACL " ausgeführt wurde, schaust Du in den Variablen unter acl nach und siehst, wie die Notation.
Nun stoppst Du das Skript, gehst in den Designer und öffnest die Aktion. Dort fügst du nun den ACL eintrag ein anstatt von: "Hier den ACL-Eintrag eintragen".
Nun speicherst du die aktion und führst sie nochmal aus. Diesmal komplett.
Das problem sollte behoben sein, du kannst die Aktion wieder aus der Datenbank löschen (mit dem Designer....)

voila

codec

Zitat

Set acl = db.ACL
Set entry = acl.GetEntry( "Hier den ACL-Eintrag eintragen" )
Call entry.Remove
Call acl.Save

Wenn man das Skript im Debugger ausführt, dann kann man auch gleich sehen, was da so alles an ACL Kram steht um den Part "Hier den ACL-Eintrag eintragen" füllen zu können...

codec