Domino 9 und frühere Versionen > Entwicklung

Merkwürdige probleme mit Public, private on first use

<< < (3/4) > >>

Rob Green:
rechte Maus auf ein doc (wegen den Nullen, da Du wohl in der Spalte irgendetwas ausliest...) und über Feldeigenschaften $REF rauspicken und wenn Du magst, mal nach dem Elterndoc suchen damit.

Don Pasquale:
Es sind die Replizierkonflikte, die haben ein REF !

ata:
... die könnten durchaus Schuld sein...

ata

Rob Green:
*schaut von seinem Sternengucker Gerät hoch und Don Pille an*
*"faszinierend"*
*und wirft einen Blick auf Cpt. Ata rüber*
"aus"

Don Pasquale:
Hallo Leute,

ich möchte die Fehlermeldung für den Anwender unterdrücken
(auch wenn ich mir nicht sicher bin das das Sinnvoll ist)
Was spricht dagegen, das
'   On Error Resume Next
mit reinzu nehmen?

Ciao

Don Pasquale


   Dim ws As New NotesUiWorkspace
   Dim s As New NotesSession
   Dim view As NotesView
   Dim dc As NotesDocumentCollection
   Dim db As NotesDatabase
   
   Dim ORDNER_DOKS_NACH_INITIATOREN As String
   Dim ORDNER_DOKS_NACH_SENDEN_AN As String
   Dim ORDNER_EIGENE_DOKUMENTE As String
   
   ORDNER_DOKS_NACH_INITIATOREN =  "_Initiator"
   ORDNER_DOKS_NACH_SENDEN_AN = "_Senden"
   ORDNER_EIGENE_DOKUMENTE  = "Eigene Dokumente"
   
   
'   On Error Resume Next
   
   Set db = s.CurrentDatabase  
   Dim session As New NotesSession
   Dim vc As NotesViewEntryCollection
   
'   Call dc.RemoveAllFromFolder( ORDNER_EIGENE_DOKUMENTE )
   
   Set db = session.CurrentDatabase
   Set view = db.GetView(ORDNER_DOKS_NACH_INITIATOREN)
   Set vc = view.GetAllEntriesByKey(session.CommonUserName,False)
   Call vc.PutAllInFolder( ORDNER_EIGENE_DOKUMENTE, True)
   
   
   Set view = db.GetView(ORDNER_DOKS_NACH_INITIATOREN)      
   Set vc = view.GetAllEntriesByKey(s.CommonUserName, False)
   Call vc.PutAllInFolder( ORDNER_EIGENE_DOKUMENTE, True )
   
   Set view = db.GetView(ORDNER_DOKS_NACH_SENDEN_AN)      
   Set vc = view.GetAllEntriesByKey(s.CommonUserName, False)
   Call vc.PutAllInFolder(ORDNER_EIGENE_DOKUMENTE, True )
   
   Set view = db.GetView( ORDNER_EIGENE_DOKUMENTE )      
   Call ws.ViewRefresh

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete