Dato overskredet

Hej makais

Jeg antager at feltet hvor datoen står har navnet DATOFELT
I din formular skal du indsætte følgende kode

Private Sub Form_Current()
    if datediff("d",Date(),Me!DATOFELT) <= 0 then
    Me!DATOFELT.backcolor = 255
    end if
End Sub

Hej Jordan

Den virker ej hos mig. Hvor skal jeg indsætte kommandoen?

Når du har formen i designmode skal du i formens egenskabsark trykke på fanebladet hændelser. Tryk derefter på hændelsen VED AKTUEL og vælg Hændelsesprocedure.
Du kan herefter indsætte koden

MVH Lars

Hej Jordan

Nu har jeg prøvet den (Access 97), men virker åbentbart ikke. Er det fordi jeg bruger flere datofelter (flere tekstfelter med datoer). Jeg ændrer DATOFELT til korrekt feltnavn. Det ser ud til at Access 97 ændrer følgende:

if datediff("d",Date(),Me!DATOFELT) <=
0 then
Til
if datediff("d",Date,Me!DATOFELT) <= 0 then

Hvad skyldes det?

Det har ingen betydning at Access fjerner paranteserne.

Det felt som du ønsker der skal reageres på.
Hvad hedder det i tabellen og Hvad hedder det tilsvarende kontrolelement på formularen ?

Send evt. databasen til lj@infocd.dk så fikser jeg det.