Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Johann am 05.12.05 - 14:53:18

Titel: documents.Count
Beitrag von: Johann am 05.12.05 - 14:53:18

Sub Initialize
Dim dateTime As New NotesDateTime( "01/01/2001" )
   
strServer = "dom07/Energie"
strPath = "Impel\Test\Impel170.nsf"
   
Set s = New NotesSession
   
Set sourcedb =  s.GetDatabase(strServer, strPath, False)
   
If sourcedb Is Nothing Then
Error lsERR_NOTES_DATABASE_MISSING, "Datenbank " + strPath + " konnte auf " + strServer + _  
" nicht gefunden werden."
End If
   
Set destdb = s.CurrentDatabase
   
   
Set documents  = destdb.Search( form=frDokument, dateTime, 0 )
If documents.Count = 0 Then Exit Sub

hallo,
habe einen befehl erstellt oder vielmehr entstammt er aus der aktion im persönlichen adressbuch um dieses mit dem firmenadressbuch abzugleichen. die abzugleichende datenbank greift auf die original datenbank zu und aktualisiert sie dann. mein problem:
immer wenn ich ein dokument ändere, so müsste es eigentlich registrieren und der "count" sich um eins erhöhen, aber dies ist nicht der fall. so dass die aktion bei exit sub beendet ist, obwohl doch was verändert wurde.

Titel: Re: documents.Count
Beitrag von: eknori am 05.12.05 - 14:58:09

For the sake of good programming, user option declare !!

Zitat

Set documents  = destdb.Search( form=frDokument, dateTime, 0 )

Da liegt der Hase im Pfeffer; deine Suche funktioniert so nicht ...

Titel: Re: documents.Count
Beitrag von: Johann am 05.12.05 - 15:02:23

ja soweit war ich schon. warum funktioniert sie nicht. wenn ich die zeile rausnehme, dann rennt es bis zum ende durch, aber natürlich findet er kein dokument.

Titel: Re: documents.Count
Beitrag von: m3 am 05.12.05 - 15:28:04

Code

Syntax
Set notesDocumentCollection = notesDatabase.Search( formula$, notesDateTime, maxDocs% )
Parameters
formula$
String. A Notes @function formula that defines the selection criteria.

Schon mal probiert, die Suchformel als String und nicht als GLeichung zu übergeben? Weiters ist es immer recht praktisch, den Sucbegriff mal im GUI in das Volltextsuchfenster einzugeben, da kommt man auch auf einige Syntaxfehler drauf.

Titel: Re: documents.Count
Beitrag von: Driri am 05.12.05 - 15:57:49

Es wäre auch gut, die DocumentCollection vorher noch zu deklarieren. Nicht deklarierte Objekte sind erstmal vom Typ Variant, ich bin mir nicht sicher, was da bei Set documents = ... dann mit passiert.

Titel: Re: documents.Count
Beitrag von: koehlerbv am 05.12.05 - 23:48:58

Ulrich aka eknori hat es schon geschrieben, und m3 aka Martin nachgehakt: Deine Syntax ist bei NotesDatabase.Search katastrophal.
Bitte lese hierzu die DesignerHelp oder anderes - es ist so offensichtlich:

Code

form=frDokument

ergibt das Ergebnis des Vergleich zwischen den Werten der Variablen "form" und "frDokument". Das Resultat ist ein numerischer Wert ... Der ist nicht brauchbar ...

Den Rest liest Du bitte selber nach.

Bernhard