Avatar billede west Nybegynder
21. september 2002 - 00:02 Der er 10 kommentarer og
1 løsning

vis tilføjede link fra de sidste 30 dage

kode :
strSQL = "Select * from links where dato (er max 30 dage gammel) order by navn"

altså vis poster der er under 30 dage gammel

hvad skal jeg skrive ????
Avatar billede eagleeye Praktikant
21. september 2002 - 00:09 #1
evt hvis der er Access og dato er defineret som Dato felt.:

dato = DateAdd("d",-30,date)
dato = Year(dato) & "-" & Month(dato) & "-" & Day(Dato)
strSQL = "Select * from links where dato >= #" & dato & "# order by navn"
Avatar billede west Nybegynder
21. september 2002 - 00:14 #2
<%    ' SQL forespørgsel
dato = DateAdd("d",-30,date)
dato = Year(dato) & "-" & Month(dato) & "-" & Day(Dato)
strSQL = "Select * from links where dato >= #" & dato & "# order by navn"
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
if rs.eof OR rs.bof then
Response.Write "<br><left>Ingen link<br>i denne<br>kategori endnu<br>"
else
%>
???? men det virker ikke - og det er en access database - dato står som fx. 20-09-2002
Avatar billede west Nybegynder
21. september 2002 - 00:14 #3
felt er defineret som "tekst" felt
Avatar billede eagleeye Praktikant
21. september 2002 - 00:15 #4
kommer der en fejl ?
Avatar billede eagleeye Praktikant
21. september 2002 - 00:16 #5
Så prøv at ændre SQL'en til:

strSQL = "Select * from links where CDate(dato) >= #" & dato & "# order by navn"
Avatar billede eagleeye Praktikant
21. september 2002 - 00:18 #6
Eller måske:

strSQL = "Select * from links where format(dato, 'dd-mm-yyyy') >= #" & dato & "# order by navn"
Avatar billede west Nybegynder
21. september 2002 - 00:20 #7
den skriver "ingen link i denne katagori
Avatar billede eagleeye Praktikant
21. september 2002 - 00:23 #8
Eller sådan her:

strSQL = "Select * from links where format(dato, 'yyyy-mm-dd') >= #" & dato & "# order by navn"
Avatar billede eagleeye Praktikant
21. september 2002 - 00:30 #9
Jeg har lige prøvet at lave en tekst kolonne og putte en dato i.. og denne virker for mig:

dato = DateAdd("d",-30,date)
dato = Year(dato) & "-" & Month(dato) & "-" & Day(Dato)
strSQL = "Select * from links where CDate(dato) >= #" & dato & "# order by navn"
Avatar billede west Nybegynder
21. september 2002 - 00:30 #10
stadig samme negative resultat
Avatar billede west Nybegynder
21. september 2002 - 00:31 #11
JUBII - nu virker det
takker for hjælpen
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester