Select fra dato til dato !!

Prøv

\"SELECT * FROM nyheder where \'\" & dato1 & \"\' BETWEEN dato1 AND dato2;\"

det skal ikke kun være dem imellem. Der kan jo være nogen der er oprettet før. Idet der er nogen der også bliver skrevet ind før de skal køre.

De skal så først komme frem på den dato hvor start er sat til.

Ok, der skulle have stået

\"SELECT * FROM nyheder where \'\" & Date(Now) & \"\' BETWEEN dato1 AND dato2;\"

= Vælg alle nyheder hvor start-datoen er FØR idag og slut-datoen er EFTER idag.

(ikke 100 på at man kan selecte på den måde, men i princippet skulle det virke)

Nope den går ikke ...

hvad mener du ? Har du testet det ?

Jep jeg har testet...

Jeg er måske bange for, at man ikke kan SQL\'e sig ud af den (hvis jeg tar fejl vil jeg da gerne høre hvordan man gør)
Jeg kan se to muligheder:

1.
Selecte alle nyheder og kun vise dem der overholder kriterierne... altså:

strQuery = \"SELECT * FROM Nyheder\"
Set RS = MyConn.Execute(strQuery)

Do While Not RS.EOF
  If DateDiff(\"d\", Now, RS(\"dato1\")) < 0 And DateDiff(\"d\", Now, RS(\"dato2\")) > 0 Then
  \'Vis nyheden
  End If
  RS.MoveNext
Loop

Ikke en optimal løsning... det bliver nok lidt tungt hvis der er mange nyheder i databasen.

2.
Tilføje en binær række i tabellen (aktiv eller ej). På den første session hver dag går du så ind og tjekker hvert enkelt record for om det skal aktiveres eller ej:

strQuery = \"SELECT (ID, Dato1, Dato2) FROM Nyheder\"
Set RS = MyConn.Execute(strQuery)

Do While Not RS.EOF
  If DateDiff(\"d\", Now, RS(\"dato1\")) < 0 And DateDiff(\"d\", Now, RS(\"dato2\")) > 0 Then
  strQuery = \"UPDATE Nyheder SET Aktiv=True WHERE ID=\'\" & RS(\"ID\") & \"\'\"
  Set Update = MyConn.Execute(strQuery)
  Else
  strQuery = \"UPDATE Nyheder SET Aktiv=False WHERE ID=\'\" & RS(\"ID\") & \"\'\"
  Set Update = MyConn.Execute(strQuery)
  RS.MoveNext
Loop

... Lidt mere bøvlet end løsning 1, men mere holdbar i længden, tror jeg ...

Ups, sparede lige en End If før den sidste RS.MoveNext

Hvis dato1 er start og dato2 er slut er betingelsen (logisk udtryk) i din SQL sætning også forkert. Betingelsen vil aldrig være fyldt (du har vist fået byttet rundt på dem ;=)

noget a la:

strNow = Day(Now()) &\"-\" &Month(Now()) &\"-\" &Year(Now())

strQuery = \"SELECT * FROM nyheder where \"&strNow &\">=Date1 AND \" &strNow &\"<=\" &date2

Flemming >> Rigtigt, der er byttet rundt på de to... MEN jeg kan nu stadig ikke få den til at æde en \"større end / mindre end\"-sammenligning når det drejer sig om datoer...
Hvis det KAN lade sig gøre er det selvfølgelig det man skal gøre...

En der ved om det kan lade sig gøre ???

Har kigget mine moduler igennem - og fundet et eksempel - som virker, her benyttes # tegn (access database), prøv med:

strNow = &\"# &Year(Now()) &\"-\" &Month(Now()) &\"-\" &Day(Now()) &\"#\"

Flemming >> Jep, det virker!
Kan du forklare hvorfor, hehe? Hvad gør #\'erne?
Og burde strNow = \"#\" & Date & \"#\" ikke også virke? (Hvilket det ikke gør...)

Hele humlen er at SQLServer skal fodres med \' mens Access skal fodres med # Så nemt er det...