Vis ikke nyhed før efter en bestemt dato.......

SqlQ = \"Select * From Nyheds_Tabel Where Dato < \'\" & Date & \"\'\"

Prøv det her. Det skulle kunne gøre det (tror jeg)

SQLstmt = \"select top 5 * FROM news WHERE dato <= \" & Date & \"ORDER BY ID Desc;\"

SQLstmt = \"select top 5 * FROM news WHERE dato <= #\" & Date() & \"# ORDER BY ID Desc;\"

Frosig dit giver følgende fejl:

Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket \"dato <= 01-11-2001ORDER BY ID Desc\".

keysersoze dit giver ingen fejl med viser siden uden at trække nogle poster ud overhovdet. Det fulde script set således ud:

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"data/NEWS.mdb\")
SQLstmt = \"select top 5 * FROM news WHERE dato <= \" & Date & \"ORDER BY ID Desc;\"
Conn.Execute (SQLstmt)
Set rs = conn.Execute(SQLstmt)
  %>   

  <%
  DO WHILE NOT rs.EOF
    id = rs(\"ID\")
    headline = rs(\"headline\")
    dato = rs(\"dato\")
  %>

<!--ASP HEADLINE START-->
href=\"vis_news.asp?id=<%=id%>\">
<%=Headline%>
<=dato%>
<!--ASP HEADLINE SLUT-->

<%
    rs.MoveNext
  LOOP
  RS.Close
conn.Close
Set conn = nothing
Set SQLstmt = nothing
    %>

Altså bare med denne:

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"data/NEWS.mdb\")
SQLstmt = \"select top 5 * FROM news ORDER BY ID Desc;\"
Conn.Execute (SQLstmt)
Set rs = conn.Execute(SQLstmt)
  %> 

Datoen bliver indskrevet indtastet via et form felt af personen selv....Skal der oprettes et ekstra felt i db til dato som access selv skriver ind.

hmmm - prøv engang så at vende < om til et >

Nu viser den nyhederne som den gjore før, og det virker ikke efter hensigten.............

og der ER artikler i databasen, hvor datoen både er nyere og ældre en dagen i dag så?

Jep de er

bruger du ## omkring din datoen i sql\'en?

SQLstmt = \"select top 5 * FROM news WHERE dato <= \" & Date & \"ORDER BY ID Desc;\"

som du skrev er nemlig forkert... skole nok nærmere være

SQLstmt = \"select top 5 * FROM news WHERE dato <= #\" & Date & \"# ORDER BY ID Desc;\"

eller

SQLstmt = \"select top 5 * FROM news WHERE dato <= #\" & Date() & \"# ORDER BY ID Desc;\"

Ja der har jeg gjort....Har du prøvet det i praksis da...Ved du om det virker ???

man plejer at gøre det lidt den anden vej - altså kun vælge nogle der _ikke_ er for gamle... og til dette plejer jeg at bruge:

sqlstr = \"SELECT  TOP  5  * FROM news where date > #\" & Date()-7 & \"# ORDER BY Date

Ved godt det spørgsmål her ikke vedkommer det stillede. Men jeg har en side som skal vise alt hvad der er i DB af nyheder MEN bare ikke dem som er på TOP 5, altså ældre nyheder....Vil gerne give poimts for det her...Det andet må hvile :)

du laver en almindelig

select * from...

og så skriver du

rs.move 5

inden din normale udskrivning

Helt præcis hvordan...jeg er lidt dum til asp...

damn - troede ikke jeg skulle undervise SÅ meget... anyway:

<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
conn.Open \"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\" & Server.MapPath(\"xxx.mdb\")
SQL = \"SELECT * FROM tabel;\"
Set rs = Conn.Execute(SQL)

rs.move 5

Do while not rs.EOF then

Response.Write \"\" & rs(\"kolonne\") & \"\"

loop
rs.movenext

RS.Close
Set RS = Nothing
%>

thx for hjælprn :)

det var så meget ;) skulle det være en anden gang

LOL