hente dags dato fra access db

Det kan godt lide sig gøre men jeg vil først anbefale dig at lave en ny kolonne hvor du opretter en rigtig dato i:

update dinTabel set nyDatoKolonne = cDate(aar&'-'&maaned&'-'&dag)

Ellers bliver din sql som det er på nuværende tidspunkt noget ala:

select top 5 * from dinTabel where cDate(aar&'-'&maaned&'-'&dag) >=date order by cDate(aar&'-'&maaned&'-'&dag)

hvor i tabellen i db skal denne ind? cDate(aar&'-'&maaned&'-'&dag)

Det skal ikke end nogen steder.

cDate er bare en funktion til at omdanne tekst til en dato. På den måde samler du de 3 kolonner til en rigtig dato, som man så kan arbejde vidre med.

F.eks med følgende kode:
select cDate(aar&'-'&maaned&'-'&dag) as dato from dinTabel

Får du en dato direkte ud, så du er fri for at samle felterne i ASP.

Ok kigger på det og vender tilbage i aften morgen, skal lige ud en tur nu her

hej fennec--> har rodet lidt med det men gør noget fatalt fejl da, men det er nok fordi mine asp kunskaber er til hobby brug.

bruger normalt dette kald til databsaen, hvor skal den linie ind, hvis du kan hjælpe, smider flere points på hvis det er behov for det.

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../database/xxxxDB.mdb")
SQL = "SELECT * FROM golfscore ORDER By Id"
Conn.Execute (SQL)
Set rs = conn.Execute(SQL)
%>

Og "golfscore" tabellen er den som indeholder aktiviteterne?? Og du vil hente de første 5 aktiviteter fra dagsdato og frem?

nej det var bare et exempel.
Tabellen hedder events
kolonnerne hedder:
ID Dag Maaned Aar Beskrivelse EventType LinkDato URL URLTekst

Det jeg vil have er at jeg henter events fra og med dags dato og de næste 5 events
de skal listes med dato først, så beskrivelse og derfeter EventType

Bare så jeg har opfattet det rigtigt. Du vil have alle events for i dag (det kunne sagtens være 20 forskellige) samt de første 5 events de efterfølgende dage (det kunne være 2 dagen efter og 3 dagen efter igen, selv om der kunne være 6 events på denne dag)

Hvis det er rigtig, så burde det gøres med denne kode:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../database/xxxxDB.mdb")
SQL = "SELECT * FROM events where cDate(aar&'-'&maaned&'-'&dag) = date() "&_
  "union "&_
  "SELECT top 5 * FROM events where cDate(aar&'-'&maaned&'-'&dag) > date() "&_
  "order by cDate(aar&'-'&maaned&'-'&dag), ID"
Conn.Execute (SQL)
Set rs = conn.Execute(SQL)
%>

Der var lige en linje for meget:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../database/xxxxDB.mdb")
SQL = "SELECT * FROM events where cDate(aar&'-'&maaned&'-'&dag) = date() "&_
  "union "&_
  "SELECT top 5 * FROM events where cDate(aar&'-'&maaned&'-'&dag) > date() "&_
  "order by cDate(aar&'-'&maaned&'-'&dag), ID"
Set rs = conn.Execute(SQL)
%>

jeg kigger på det, men skal lige til et møde om 2 minutter, så jeg vender tilbage lidt sener

men du har ret i din kommentar

Microsoft OLE DB Provider for ODBC Drivers error '80040e07'
[Microsoft][ODBC Microsoft Access Driver] The ORDER BY expression (cDate(aar & '-' & maaned & '-' & dag)) includes fields that are not selected by the query. Only those fields requested in the first query can be included in an ORDER BY expression.

/mgk/skabelon.asp, line 182

Skulle lige ændres lidt. Denne har jeg testet hos mig:

SELECT * FROM events where cDate(aar&'-'&maaned&'-'&dag) = date()
union
SELECT top 5 * FROM (select * from  events where cDate(aar&'-'&maaned&'-'&dag) > date() order by aar, maaned, dag)
order by aar, maaned, dag

skal den se således ud:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../database/xxxxDB.mdb")
SQL = "SELECT * FROM events where cDate(aar&'-'&maaned&'-'&dag) = date()
union
SELECT top 5 * FROM (select * from  events where cDate(aar&'-'&maaned&'-'&dag) > date() order by aar, maaned, dag)
order by aar, maaned, dag"
Conn.Execute (SQL)
Set rs = conn.Execute(SQL)
%>

Der skal lige styr på linje skift:

SQL = "SELECT * FROM events where cDate(aar&'-'&maaned&'-'&dag) = date() "&_
  "union "&_
  "SELECT top 5 * FROM (select * from  events where cDate(aar&'-'&maaned&'-'&dag) > date() order by aar, maaned, dag) "&_
  "order by aar, maaned, dag"

Henter den dags dato fra serveren eller fra folks computer?

Fra serveren

Tak for hjælpen det funker optimalt,er 100 points OK? Smid også et svar

/cdc

.o) <-- One Eyed Jack

hvis du har tid kunne du måske kigge her ind: http://www.eksperten.dk/spm/794771