Indsæt dato i access db

Jeg har prøvet med dette:

set rsOprettet = server.createobject("adodb.recordset")
sql = "select * from T_Person where Oprettet = 0"
rsOprettet.open sql, conn
i = 30
Do while rsOprettet.eof
set rsIndsaet = server.createobject("adodb.recordset")
sql1 = "insert into T_Person (Oprettet) values = ('"
sql1 = sql1 & now + i & "')"
rsIndsaet.open sql1, conn, 1, 3
i = i + 30
rsOprettet.movenext
loop
rsOprettet.close

men det virker ikke

/Mickill

Do while not rsOprettet.eof

Det har jeg prøvet, virker ikke.

set rsOprettet = server.createobject("adodb.recordset")
sql = "select * from T_Person where Oprettet = ''"
rsOprettet.open sql, conn
set nu = now
set i = 30
Do while not rsOprettet.eof
sql1 = "update T_Person set Oprettet = '" & nu + i & "'"
connectionObjekt.Execute(sqll)
set i = i + 30
rsOprettet.movenext
loop
rsOprettet.close

Jeg får denne fejl:

Et objekt er obligatorisk: 'now'
/vvc_jobbank/udfyldning.asp, line 6

set nu = Now()

Jeg forstår ikke helt database layoutet?
Du har en kolonne  Oprettet  og så kommer der og felt1, felt2, og felt3 er disse også kolonnenavne?

Nej, kolonnen hedder "Oprettet" og felt1, 2 og 3 er felterne tilhørende kolonnen "Oprettet". Der er mange flere felter end bare de 3. Det er derfor jeg godt kunne tænke mig en måde at udfylde alle disse felter under "Oprettet", uden at skulle gøre det manuelt.

Jeg kan godt finde ud af at udfylde dem således:

sql = "update T_Kontakter set Oprettet = '" & Now & "' where Oprettet = ''"

men så står der bare den samme dato i alle felterne.

Okay, jeg må finde på noget andet.