Hallo,
ich habe da eine "doppelte if Verbindung". Ich möchte gerne erst auf ein Feld verweisen, wenn das einen bestimmten Feldwert hat, dann soll der Rest auch durchlaufen, sonst braucht nichts gemacht werden. Innerhalb dieser If else Anweisung gibt es noch eine If Else Anweisung. Aber irgendwas stimmt da nicht.
So sieht das bei mir aus:
If Feld="1" Then
If count = 0 Then
Else rmove
else
'nothing
ist das überhauptmöglich und wenn nein, wie kann ich es besser regeln?
Set sourcenote = documents.GetNthDocument(n) 'Erstes Dokument der gefundenen Dokumente
' n wird um 1 erhöht
Str_Doc_ID =sourcenote.Doc_ID(0) 'ID holen
' Über Doc_ID filtern
selection ="form=""Doc"" & Doc_ID = "+"'"+Cstr(Str_Doc_ID)+"'"
Set collDocs = sourcedb.Search( selection, dateTime, 0 )
If colldocs.Count = 0 Then
Call sourcenote.CopyToDatabase(sourcedb)
DocsCopied = DocsCopied + 1
Else
Set doc=collDocs.getfirstdocument
Call doc.Remove(True)
Call sourcenote.CopyToDatabase(sourcedb)
DocsCopied = DocsCopied + 1
Call doc.ReplaceItemValue ( "changes",0)
End If
Next
Msgbox docscopied & " Dokumente wurden in die Zieldatenbank kopiert!", 0 + 64, "Kopieren"