title image


Smiley DAO Datensatz kopieren
VB6

Hi, ich versuche eine Quelldatenbank zu filtern, z.B. nach Postleitzahl und die gefilterten Datensätze in eine neue Datenbank zu kopieren. Leider geht das unter folgenden Code sehr langsam:



For y = 0 To dy1.Fields.Count - 1

dy2.Fields(y) = dy1.Fields(y)

tmp = tmp & dy1.Fields(y) & String(dy1.Fields(y).Size - _

IIf(IsNull(dy1.Fields(y)) Or Len(dy1.Fields(y)) > dy1.Fields (y).Size, 0, Len(dy1.Fields(y))), " ")

Next y



Gibt es eine einfachere Lösung wie Datensatz 1 = Datensatz 2?

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: