Sotere efter dato

Hvis datofeltet hedder createt så skal du jo sige:
...SORT BY createt

Undskyld ... order by createt ;-)

WHERE datoStr >= Createt

Sorry: WHERE datoStr <= Createt

<%
' Går 7 dage tilbage 
dato = DateAdd("d", -7, date)

datoStr =  Day(Dato) & "-" & Month(Dato) & "-" & Year(Dato)
datoStr = CDate(datoStr)

' SQL Sætnignen
strSQL = "SELECT * FROM stats WHERE createt <= #" & datoStr & "# ORDER BY createt;"

' Udskriver et eller andet
Response.Write("bla")
%>

/hiks

Nu har jeg skrevet den sådan her synes ikke der sker noget:

<%
' Går 7 dage tilbage
dato = DateAdd("d", -7, date)

datoStr =  Day(Dato) & "-" & Month(Dato) & "-" & Year(Dato)
datoStr = CDate(datoStr)

' SQL Sætnignen
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};UID=; PWD=;DBQ=" & Server.Mappath("../../db/base.mdb")
strSQL = "SELECT * FROM stats WHERE createt <= #" & datoStr & "# ORDER BY createt;"
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs = Conn.Execute(SQL)

' Udskriver et eller andet
Response.Write("" & rs("IP") & "")
%>

Den skulle meget gerne udskrive alle mine poster da de er tilføjet idag.
Hvad kan der være galdt?

Den lister kun en enkelt hvis jeg skiver f.eks.
Response.Write("bla")
tilsidst

du skal have det placeret i en løkke:

<%
' Går 7 dage tilbage
dato = DateAdd("d", -7, date)

datoStr =  Day(Dato) & "-" & Month(Dato) & "-" & Year(Dato)
datoStr = CDate(datoStr)

' SQL Sætnignen
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};UID=; PWD=;DBQ=" & Server.Mappath("../../db/base.mdb")
strSQL = "SELECT * FROM stats WHERE createt <= #" & datoStr & "# ORDER BY createt;"
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs = Conn.Execute(SQL)

' Udskriver et eller andet
While rs.EOF = False
    Response.Write("" & rs("IP") & "")
    rs.movenext
Wend
%>

For en fejl der siger?
Item cannot be found in the collection corresponding to the requested name or ordinal.


Er ikke så meget inde i de fejl der...Desværre.

har du en attribut der hedder ip?

/hiks

Uddyb tak :D.

I din sql bruger du "SELECT *"

Er der en kolonne (attribut), der hedder IP i tabellen? Ligesom der er en createt (attribut).

/hiks

ja har prøvet med ID også, samme fejl kommer.
Der er et felt i databasen der hedder IP under tabelen stats.

To ting. Datoer via SQL skal overføres i formatte yyyy-mm-dd og ikke DK format med dagen først så vil access bytte rundt på dag og måned.

Så disse to linjer:_

datoStr =  Day(Dato) & "-" & Month(Dato) & "-" & Year(Dato)
datoStr = CDate(datoStr)

Skal blive til denne ene:
datoStr =  Year(Dato) & "-" & Month(Dato) & "-" & Day(Dato)


Det andet ting du ligger SQL sætningen ind i variablen strSQL men executer variablen SQL. Så prøv at rette denne linje:
Set rs = Conn.Execute(SQL)

Til denne:
Set rs = Conn.Execute(strSQL)

eagleeye ang det med datoer der skal være år, månede, dag. Min database ændre det selv til det omvendte hvad kan jeg gøre ved det?

Når du overføre datoer via SQL skal det være i formatet yyyy-mm-dd og det kan gøres som vist før med Year, Month og Day funktionerne. Kolonnen i databasen må havde det dato du ønsker det kan fint være DK format.

Sådan her laver du formatet yyyy-mm-dd:

Dato = "25-02-2005"
atoStr =  Year(Dato) & "-" & Month(Dato) & "-" & Day(Dato)

eagleeye Smæk lige et svar så lukker vi denne :)

eagleeye svar hjæp mig, men da jeg ikke har fået respons i 1.5 år lukker jeg.