Schwaches DB als Datenbank
Schwache rs als DAO.Recordset
DB=currentdb einstellen () '<>
Für i = Val (txtNoFrom) zu Val (txtNoTO)
cmbCarInsert.SetFocus
DB.Execute „Einsatz in tblPetrolDetails (PetrolID, Carno, voucherno, vouchervalue)“ u. _
„Werte (“ u. Identifikation u. „, „“ u. cmbCarInsert.Text u. „“, „„u. i u.““, „u. Val (txtInsertValue) u. ") „
Zunächst