RTItem.AppendDocLink - Couldn't get view ID

[LukasSChl]

Hallo zusammen,

Ich möchte gerne automatisch ein E-Mail versenden und dort den Link des aktuell geöffneten Dokumentes einfügen.
Durch das klicken eines Buttons in der Eingabemaske wird das Save-Event aufgerufen, welches unteranderem den untenstehenden Code enthält.

Hab mit dem Debugger schon nachgeschaut und immer hält er bei der  Zeile
(Call oRTItem.AppendDocLink( oDoc, "" ))
an und gibt folgende Fehlermeldung aus:
Couldn't get default view ID for Database (Pfad der Datenbank.nsf)

Hab schon gegoogelt und in der Hilfe geschaut aber die Parameter für AppendDocLink sind meiner Meinung nach doch richtig.

Code

Sub Querysave(Source As Notesuidocument, Continue As Variant)

	Dim oSession As New NotesSession
	Dim oDb As NotesDatabase
	Set oDb = oSession.CurrentDatabase
	Dim oView As NotesView
	Dim oDocView As NotesDocument
	Dim oDoc As NotesDocument
	Set oDoc = Source.Document

  			'Nachricht an Bearbeiter das geprüft wurde
			Set oDocMail = New NotesDocument( oDB )
			oDocMail.Form = "Memo"
			oDocMail.Subject = "Freies-Depot: ( " + Trim(oDoc.Vorname(0) + " " + oDoc.Name(0)) +  " ) Einlieferung geprüft durch " + oDoc.GeprueftEin(0)


' DocLink hinzufügen

Set oRTItem = New NotesRichTextItem( oDocMail, "Body" )
			Call oRTItem.AddNewLine( 2 )
			Call oRTItem.AppendText( "Link zum Dokument >>> " )
			Call oRTItem.AddTab( 1 )
			Call oRTItem.AppendDocLink( oDoc, "" )
			Call oRTItem.AddNewLine( 1 )
			Call oDocMail.Send( False, oDoc.BearbEin(0) ) 

End Sub

Weiß jemand hier weiter?
Wie erstelle / weise ich eine default view zu?

mfg
Lukas

[ascabg]

Hallo,

Ein Dok-Link der versendet werden soll benoetigt, wie dei Meldung auch sagt eine Default-View in der Db.

Wie erstelle / weise ich eine default view zu?

Im Designer und hier in den Eigenschaften einer View.


Andreas

[LukasSChl]

Im Designer und hier in den Eigenschaften einer View.

Meinst du damit, dass der Name der View nicht in Klammern steht?
Also die Ansicht die nicht in Klammern steht (bei mir jetzt nur eine) automatisch die default view?

Ich hab das getestet und bekomme immernoch den selben Fehler
(Achja, ich arbeite mit Notes 6.5.1)

mfg
Lukas

[ascabg]

Nein.

Hier findest Du die Einstellung. (siehe Screenshot)

In der Uebersicht aller Ansichten ist die "Default-View" mit einem Stern vor dem Eintrag erkennbar.


Andreas

[LukasSChl]

ahh vielen Dank,
jetzt funktioniert alles so wie es soll.

mfg
Lukas