Probleme mit GetDocumentByKey

[mrx]

Hallo,

ich habe folgende Funktion... beim Aufruf bekomme ich immer den Fehler "Object Variable not set" und zwar in der letzten Zeile (so weit hab ich schon eingränzen können) ich nehme an das die Variable Doc nicht gesetzt wird weil das Dokument nicht gefunden wird (ist nur so ne Vermutung) aber der Suchstring "SFK" ist richtig gesetzt, also sollte er eigentlch das Dokument finden können. Auch eine Manuelle Suche mit einem Statischen Suchstring ist erfolglos...

hat jemand ne Ahnung?!

Sub Exiting(Source As Field)
   Dim db As New NotesDatabase("","C:\Temp\CASAUFTR.NSF")
   Dim view As NotesView
   Dim doc As NotesDocument
   
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Dim SFK As String               ' Kurzformulierung
   
   Set uidoc = workspace.CurrentDocument
   SFK = uidoc.FieldGetText("FormulierungKurz")
   
   Set view = db.GetView( "Formulierungen" )
   Set doc = view.GetDocumentByKey(SFK, False)
   
   Messagebox(doc.Formulierungstext)
End Sub

[Glombi]

Hi,
sicherheitshalber immer bei Zugriff auf Objekte deren Existenz abfragen.

Ausserdem muss es
doc.Formulierungstext(0)
heißen, da Items (sprich Felder) von Notes als Array gespeichert werden.

Versuchs mal so:

Set doc = view.GetDocumentByKey(SFK, False)
if not doc is nothing then
   Messagebox(doc.Formulierungstext(0))
end if


Andreas

[mrx]

Hi,

mit der Abfrage funktionierts, d.h. es funktioniert nicht, es gibt aber auch keinen Fehler... also ist die var. Doc nicht gesetzt.

Aber wieso findet er das Teil net? irgendeine Idee?

Gruß
Malte.

[mrx]

Kommando zurück... mein Fehler... das View war nicht sortiert ;-)

Problem gelöst...