ParentDocumentUNID aus Back-End bekommen??

[cfiber]

Hallo,

ein klitzekleines Problem plagt mich:

Mit einem Agenten im Back-End versuche ich die ParentDocumentUNID von verschiedenen Dokumenten herauszubekommen, der Debugger meldet aber immer "Invalid Universal ID".

Mein Quellcode ist grob so:

Dim doc As NotesDocument
Dim parentdoc As NotesDocument
Dim db As NotesDatabase

Set db = session.CurrentDatabase
Set dc = db.AllDocuments
Set doc = dc.GetFirstDocument

Set parentdoc = db.GetDocumentByUNID(doc.ParentDocumentUNID)


dc ist nicht leer und doc ist ein Antwortdokument.


Kann mir jemand helfen?

[umi]

Wie sieht den deine ParentdocumentUNID aus?  evtl. ist die leer?
Oder zeigt auf ein Parent das nicht mehr existiert?

[cfiber]

habe die ID mal mit Prompt ausgeben lassen und die stimmt mit dem parent überein.

Und es existiert natürlich auch... 

[klaussal]

Copy & Paste aus der Hilfe:  

Code

Sub Initialize
  Dim s As New NotesSession
  Dim db As NotesDatabase
  Dim dc As NotesDocumentCollection
  Dim doc As NotesDocument, pdoc As NotesDocument
  Dim docSubj As String, pdocSubj As String
  Set db = s.CurrentDatabase
  Set dc = db.AllDocuments
  Set doc = dc.GetFirstDocument
  While Not(doc Is Nothing)
    If doc.IsResponse Then
      Set pdoc = _
      db.GetDocumentByUNID(doc.ParentDocumentUNID)
      docSubj = doc.Subject(0)
      pdocSubj = pdoc.Subject(0)
      Messagebox "Parent: " + pdocSubj,, docSubj
    End If
    Set doc = dc.GetNextDocument(doc)
  Wend
End Sub

[cfiber]

hm hier wird ja auch nur gecheckt, ob das wirklich nen Antwortdoc ist. Aber die Collection, wo "doc" herkommt habe ich so gebastelt, dass es nur aus bestimmten Antwortdokumenten besteht.

Warum meckert der Compiler trotzdem??

[klaussal]

Dann wäre etwas mehr Code hilfreich, weil unsere Kristallkugeln nicht mehr so recht wollen.....

[cfiber]

ok, jetzt gehts, ich frage mich zwar, warum ich diese Abfrage brauche, denn laut Debugger ist sie immer wahr und somit sinnlos, aber damit kann ich leben...


Danke euch!

[Axel]

ich frage mich zwar, warum ich diese Abfrage brauche, denn laut Debugger ist sie immer wahr und somit sinnlos, aber damit kann ich leben...

Also, wenn ich mit deinen Quellcode oben anschaue, dann kann die Abfrage nicht immer wahr sein. Mit db.AllDocuments hast du nämlich alle Dokumente aus der Datenbank in der Collection und somit auch die Hauptdokumente.


Axel
 

[cfiber]

ja der ist sehr grob, ich habe mir auf ziemlich komplizierte Weise ne Collection gebastelt, die wirklich nur Response enthält und später im Code heisst es dann:

Set doc = dcresp.GetFirstDocument
.
.
.
Set parentdoc =    db.GetDocumentByUNID(doc.ParentDocumentUNID)
.
.
.
Set doc = dcresp.GetNextDocument(doc)