Udtryk

Brug funktionen DateDiff

if DateDiff("d", Udlånsdato, tilbageleveringsdato) > 30 then
    msgbox "Dato overskredet"
endif

Beklager at det tager lidt tid, men jeg kommer tilbage efter å have afprøvet funktionen.
Tak foresten..

for resten, denne returnerer vel ikke antallet dage, kun at dato er overskredet, ikke sandt?

Hvis du bruger

tidsforskel = DateDiff("d", Udlånsdato, tilbageleveringsdato)

får du netop de dage som der er tilbage/overskredet, og så er det bare om at gange din sats på.


tidsforskel = DateDiff("d", Udlånsdato, tilbageleveringsdato)

if tidsforskel > 30 then
    atbetale = tidsforskel*sats
endif

Prøv desuden at se under DateDiff i hjælpen.

Held og lykke med det.

Problemet er egentlig løst nå, men tak ligevel