Domino 9 und frühere Versionen > ND6: Entwicklung

Dokumente in Datenbank suchen und Werte ändern

<< < (5/7) > >>

klaussal:

--- Zitat ---Set doc = dc.GetFirstDocument()
--- Ende Zitat ---

Wer lesen kann, ist eindeutig im Vorteil.

DAU-in:
Wenn ich "Dim doc as NotesDokument" einfüge lässt sich das Script nicht mehr speichern.

Dann würde ich es mal mit

 "Dim doc as NotesDocument"

versuchen.

Und schalte doch mal Option declare ein.

klaussal:

--- Zitat ---Und schalte doch mal Option declare ein.
--- Ende Zitat ---

Das haben wir schon ein paar Mal empfohlen: er hört aber nicht auf uns !

m3:

--- Zitat von: klauss am 22.09.08 - 11:55:38 ---
--- Zitat ---Set doc = dc.GetFirstDocument()
--- Ende Zitat ---

Wer lesen kann, ist eindeutig im Vorteil.

--- Ende Zitat ---
Ja, da stimme ich Dir zu. Nur wo siehst Du das in dem Code VOR dem While() ? ;)


--- 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
   Set view = db.GetView( "A1" )
   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
--- Ende Code ---

DAU-in:

--- Zitat von: klauss am 22.09.08 - 12:02:37 ---
--- Zitat ---Und schalte doch mal Option declare ein.
--- Ende Zitat ---

Das haben wir schon ein paar Mal empfohlen: er hört aber nicht auf uns !

--- Ende Zitat ---

Auf euch nicht, aber vielleicht auf eine T.....trägerin.   ;)

Männer brauchen manchmal eine Konzentrationshilfe  ;D

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete