title image


Smiley Re: Vorschlag
Hi,



ich habe mir noch mal Code aus einer anderen Datenbank angeguckt, in der ich nach einer Kundennummer suche. Dort arbeite ich aber noch mit GetNextDocument. Das habe ich auf jeden Fall schon mal vergessen, damit die ganze Auflistung abgearbeitet wird.



Mache es jetzt so:



Sub Click(Source As Button)



Set view = db.GetView("Wareneingangskontrolle")

Liefname = uidoc.FieldGetText("Firmenname")

schluessel = Liefname

Set doc = view.GetFirstDocument



While Not ( doc Is Nothing )

If doc.Firmenname(0) = schluessel Then



'hier Code Aufrufen von vorhandenen Doc B und Daten aktualisieren



Exit Sub

Else

Set doc = view.GetNextDocument( doc )

End If

Wend



' Hier Code neues Doc B erstellen und Daten von A nach B übergeben



End sub



Das klappt. Ganze Ansicht wird durchsucht, wenn das Doc da ist, kommt der If-Teil, ansonsten kommt der Teil mit dem neuen Dokument.



Gruß Sabine

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: