Vraag : De Codes van MS-Access/Uitdrukking

Schemerige D als Date
Schemerige I als Integer
For i = 0 aan 6
CurrentDb.Execute „TUSSENVOEGSEL IN tblPySub ([Datum], [driverID] ) de WAARDEN (“ & DateAdd („D“, I + 1, Me.StartDate) &“, „& Me.DriverID &“) „
Next i

Me.frmPySub.Form.Requery


in de code boven data zijn niet juist, alle verslagen zijn de zelfde datum d.w.z. Me.startDate = moeten 8/24/10 deze code 7 verslagen 1st datum maken = Me.startDate, tweede =Me.startDate+1, 3de Me.startDate+2, 4de Me.startDate +3, etc…
what het uit Me.startDate = 8/25/2010 alle toegevoegde 7 zet de verslagen zijn 12/30/1989

Antwoord : De Codes van MS-Access/Uitdrukking

U kunt proberen.

CurrentDb.Execute „TUSSENVOEGSEL IN tblPySub ([Datum], [driverID])
WAARDEN (# " & formaat (DateAdd („D“, I + 1, Me.StartDate), „yyyy-mm-dd“) & „#,“ & Me.DriverID & „)“

maar er zou een kwestie met me.startdate kunnen zijn, zodat alvorens het „voor…“ bevel i= een tijdelijke lijn. toevoegt.

msgbox me.startdate

en zorg ervoor u ziet wat u verwacht.
Andere oplossingen  
 
programming4us programming4us