Domino 9 und frühere Versionen > ND6: Entwicklung

Dokumente in Datenbank suchen und Werte ändern

<< < (3/7) > >>

Blitz:
Hallo,

bin jetzt wieder aus den Urlaub zurück und probire es noch mal:

Habe jetzt folgenden Code:

Sub Click(Source As Button)
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim view As NotesView
   Dim dc As NotesDocumentCollection
   Set db = session.CurrentDatabase
   Dim A_USER As String
   Set view = db.GetView( "A_User" )
   Set dc = view.GetAllDocumentsByKey("A_USER")
   While Not(doc Is Nothing)
      Call doc.ReplaceItemValue("Status", "7")
      Call doc.Save( True, False )
      Set doc = collection.GetNextDocument(doc)   
   Wend      
End Sub

Leider kommt der Fehlerhinweis: Object Variable not set.

Welche wird da gemeint? Stehe voll auf der Leitung. Mit Lotus Script tue ich mir noch echt schwer!

Vielen Dank im Voraus.

klaussal:
Sollte da ein "Dim doc as.... " fehlen ?

Was sagt der Debugger ?


--- Zitat ---schalte mal Option Declare ein
--- Ende Zitat ---

Hast Du das getan ?

Klafu:
Du hast z.B.: "doc" nicht deklariert und willst dann damit arbeiten


--- Code: ---Dim doc as NotesDokument
--- Ende Code ---

und


--- Code: ---Set doc = view.GetAllDocumentsByKey("A_USER")
--- Ende Code ---
würd ich sagen


Chris

klaussal:

--- Zitat ---Set doc = view.GetAllDocumentsByKey("A_USER")
--- Ende Zitat ---

Nein: so war schon richtig !


--- Zitat ---Set dc = view.GetAllDocumentsByKey("Spanish leather", False)
--- Ende Zitat ---

Klafu:
Hm, dann ist das aber nicht der ganze Code, oder ?
Weil er nach Set dc = view.GetAllDocumentsByKey("A_USER") nicht mehr mit dc arbeitet und auch doc nirgends setzt.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete