Ja ha då var det dax igen för en fråga....
Sitter nu med en ny uppgift,
jag har skapat en databas för tentaregistering det finns dels ett datum för när tentan går och ett datum för sista regstreringsdag som ligger 7 dagar innan själva tentadagen nu ska vi (ja vi sitter 3 stycken här och slår våra kloka huvuden ihop.... hjälper inte just nu i varje fall)

När en elev registerar sig för en tenta skall en kontroll göras så att sista registeringsdatumet inte är passerat och att om det är passerat så
skall eleven inte kunna registera sig utan få upp en alert att det är för sent att registera sig....

Tanken jag har är att göra en kontroll med dagens datum mot datumet i kolumnen sista regdatum, men hur ska jag göra för att få kontrollen på de 7 dagarna mot det som finns i databasen och dagens datum?

Finns det någon som någon bra ide? Eller kan hänvisa till ett bra exempel

Anna

OBS Torrkodat så fel kan finnas.

Två varianter beroende på vad ni vill.

************************
stmSQL = "select regdatum From MinTabell Where regdatum >= #"&Date&"# AND tentaID = " & TentaID

Set tblTemp = Conn.Execute(stmSQL)

If tblTemp.EOF Then
'Försent
Else
'Registrera
End If

************************

stmSQL = "select * From MinTabell Where tentaID = " & TentaID
Set tblTemp = Conn.Execute(stmSQL)

If tblTemp("regdatum ") < Date Then
'Försent
Else
'Registrera
End If

************************
/Janne

du kan även använda funktionen (ej sql- bara principen):

oldestdate = dateadd("d", -7, now)

if oldestdate > thisdate then
.. nyare än 7 dagar
else
.. äldre än 7 dagar
end if