Schwaches strSQL als Schnur
Schwaches varID
strSQL = „* vom tbl_survey IN DEM survey_year='2010'" VORWÄHLEN
Mit CurrentDb.OpenRecordset (strSQL, dbOpenDynaset)
Bis .EOF tun
varID = DLookup („Identifikation“, „Query2“, „part_rate='52 und ID=“ u.! Identifikation)
Wenn nicht IsNull (varID) dann
. Redigieren
! Service = ausrichten en
. Update
Beenden wenn
.MoveNext
Schleife
. Abschluss
Ende mit
|