Sortering ved hjælp ad dato.

hvis du laver et datofelt i stedet for så kan du skrive:
select * from dintabel where datofelt >= 'now()'

det ved jeg, men nu har jeg ikke et dato felt, men som beskrevet ovenfor tre felter: dag, måned og år. Det er der problemet ligger.
Jeg vil beholde disse tre felter.

d = 30
m = 06
yy = 2003
           
sql = "select * from tabel  " & _
" WHERE " & _
" (DATEPART(d, datetime)>'" & d & "') " & _
" AND (DATEPART(m, datetime)>'" & m & "') " & _
" AND (DATEPART(yy, datetime)>'" & yy & "') "

vender tilbage senere idag

cesil>> Hvad så hvis der er tale om den 1/7/2003, så finder din funk. det ikke.
Har ikke selv lige nogen umiddelbar løsning, men det der vil ikke virke

Absolut utestet:

SQL = "SELECT * FROM MyTable WHERE CAST(Year||'-'||Month||'-'||Day) AS DATE >= NOW()"

Det er nu under alle omstændigheder mere et SQL spørgsmål end et ASP ditto.

hvad med

sql = "SELECT DATEDIFF(day," & yy & m & d " &", now()) AS no_of_days
FROM tabel"
Set oRs = oConn.Execute(sql)
if oRs("no_of_days")>0 then

end if

Er det M$Access som du bruger? hvis ja så skal du sætte din kolonner sammen i en forspørgsel (Query) i selve access i design. Også kalder du fra dinASP side denne forspørgsel (Query). Din Query er noget i den retning:
Select (dag &"-"&måned&""&år) as minDato From minTabel
og din Query fra din ASP side:
select * from minTabel where minDato >= 'now()'

minTabel er navnet på din Query i:
select * from minTabel where minDato >= date()
og det skal vær Date og ikke Now.

jeg kigger på jeres forslag senere iaften.
 
hossein: MS Server.

OK, hvad med at lave en temp table, også indsætte data i den?

Det lyder som en god ide, hvordan?

Min egen ide gik i den her retning:
Tempdate: <%
Dim  Tempdate
Tempdate = (aktivitet.Fields.Item("Slutdato_dag").Value)&"-"&(aktivitet.Fields.Item("Slutdato_maaned").Value)&"-"&(aktivitet.Fields.Item("Slutdato_aar").Value)
Response.Write(Tempdate)
%>
er
<% If Tempdate < Date() Then %>
større end
<% Else %>
mindre end
<% End If %>
<%= Date() %>

Men den fanger ikke værdien rigtigt. Den skriver bare mindre end ved alle datoerne. Kan det overhovedet lade sig gøre på den måde jeg foreslår?

Hvad med denne her:
select * from minTabel
where måned >= month(now)
and år >= year(now)
and dag > day(now)

hossein -> Den vil f.eks. fejle med 1/1-2004.

Opgaven kan ikke løses ved at teste på dag, måned eller år hver for sig selv - de *skal* samles til en hel dato først.

moso -> Du kan enten løse opgaven i SQL-delen (det er det min 15:36:20 forsøger) eller du kan trække alle datoerne ud og så fjerne de uønskede i ASP-delen. Hvilken metode ville du foretrække?

Det tror jeg ikke at den vil give fejl ved 1/1-2004 fordi alle 3 betingelser skal være opfyldt. Skriv 3 eller 4 af din rækker så kan jeg se hvad din tabel indeholder.

har du prøvet min ide?

sql = "SELECT DATEDIFF(day," & yy & m & d " &", now()) AS no_of_days
FROM tabel"
Set oRs = oConn.Execute(sql)
if oRs("no_of_days")>0 then

end if

hossein -> Så prøv lige at forklare hvorfor 1/1-2004 ikke skulle blive sorteret fra? Den ville jo f.eks. aldrig opfylde delbetingelsen dag > day(now)

Datoen 1/1-2004 skulle jo netop ikke sorteres fra.

cesil -> Måske skulle du lige tjekke syntaksen. Specielt når du nu poster den anden gang:

sql = "SELECT DATEDIFF(day, " & yy & "-" & m & "-" & d & ", now()) AS no_of_days FROM tabel"
Set oRs = oConn.Execute(sql)
if oRs("no_of_days")>0 then
  ....
end if

For det første ville den oprindelige version give fejl ved ...m & d " &", now()...

For det andet så ville din ...yy & m & d... give en ret ubrugbar del-streng (200367 for i dag) - ubrugbar idet SQL gerne vil have bindestreg mellem de enkelte komponenter af datoen (2003-06-30).

hvis i dag er som er 30-06-2003 kommer 1-1-2004 og bliver ikke sorteret fra. Jeg ved ikke hvordan du læser det.

Hvis vi bruger dit eksempel på de to datoer, så bliver SQL-strengen:

select * from minTabel where 1>=6 and 2004>=2003 and 1>30

Jeg tror faktisk at den vil fejle på både 1>=6 og 1>30.

nielle: Jeg vil helst sortere i asp.

Mit foreslag giver dette resultat:
Tempdate: 31-5-2003 er mindre end 30-06-2003 
Tempdate: 18-6-2003 er mindre end 30-06-2003 
Tempdate: 12-8-2003 er mindre end 30-06-2003 
Tempdate: 16-8-2003 er mindre end 30-06-2003 

Hvilket jo ikke er sandt.
Men jeg er enig med dig i at der ikke bare kan sorteres på de enkelte datoer, men at det skal samles først. Spørgsmålet er så bare hvordan...

moso --> Prøv nu min, den virker når syntaxfejlene er rettet ;-)

cecil: Det kunne jeg ikke få til at køre...

nielle har vist rettet dem :-)

sql = "SELECT DATEDIFF(day, " & yy & "-" & m & "-" & d & ", now()) AS no_of_days FROM tabel"
Set oRs = oConn.Execute(sql)
if oRs("no_of_days")>0 then
  ....
end if

hvad får du af fejl

cesil: syntaxfejlene?

prøv og kom med din sql

og syntaxfejlen ja

Fejl:
unclosed quotationmark before the character string...

SELECT *
FROM dbo.Aktivitetskalender_2003
ORDER BY Startdato_aar ASC, Startdato_maaned ASC, Startdato_dag ASC

lad mig se din sql

Session.LCID = 1030  ' Sæt til dansk datoformat

SQL = "SELECT Day, Month, Year FROM MyTable ORDER BY Year, Month, Day"
rs = Conn.Execute(SQL)

do while not rs.eof
  DatoFraDB = CDate(rs("Day") & "-" & rs("Month") & "-" & rs("Year"))
  if DatoFraDB > Date() then
    ' Her gør du det du vil med datoerne
  end if
  rs.MoveNext
loop

Ovenstående eksempel går ud fra at du har kaldt de tre felter for hhv. Day, Month og Year.

Men, det er nu mest effektivt at gøre det i SQL-delen.

nielle>> du har ret det skulle vær or isted for and. jeg prøvede med denne her og giver svar det er godt nok med access men:
<%@ Language=VBScript %>
<%session.LCID = 1030%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>

<%
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &server.mappath("minDB.mdb")
Set conn = Server.CreateObject("ADoDB.Connection")
conn.open DSN
set rs = server.CreateObject("ADODB.recordset")

strSQL = "Select * from Tabel where dag > day(date()) or måned >= month(date()) or år >= year(date())"

rs.Open strSQL, conn

do while not rs.EOF%>
<%=rs("dag")%>&nbsp;&nbsp;<%=rs("måned")%>&nbsp;&nbsp;<%=rs("år")%>
<%rs.MoveNext

loop
%>

</BODY>
</HTML>

hossein: Jeg ved ikke om det har nogen betydning, men jeg kører på en MS server, ike Access.

Nielle: Hvordan kan det se ud i sql? Hvis det er lettere så er jeg lutter øre...

bare lav om på din connection

hossein -> Nej det dur skam heller ikke med or. Den ville f.eks. godkende datoen 12/12-2000:

select * from minTabel where 12>=6 or 2000>=2003 and 12>30

Success på 12>=6

moso -> Har du da slet ikke prøve min 15:36:20?

jeg mener i sted for den:
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &server.mappath("minDB.mdb")
Set conn = Server.CreateObject("ADoDB.Connection")

resten er ens.

skal du ha connection til din msSQL database, har du ikke den allerede

hossein -> Din:

strSQL = "Select * from Tabel where dag > day(date()) or måned >= month(date()) or år >= year(date())"

- er vis sammenblanding af ASP ind i SQL-strengen...

Sådan laver du forbindelse til msSQL:
DSN = "Provider=SQLOLEDB;Data Source=xxxx;UID=xxxx;PWD=xxxx;DATABASE=xxxx"
Set conn = Server.CreateObject("ADoDB.Connection")
conn.open DSN
...

Jo, den duer ikke ;-)

nielle>> jo det er det, men hvad tænker du på? :)

moso -> Kunne du ikke hjælpe lidt og beskrive hvad der sker? Fejlkoder? Eller bare forkerte resultater?

det kan ikke passe! :)) hvad får du?

Nielle: Det virker nu:
Tempdate: 31-05-2003 er mindre end 30-06-2003 
Tempdate: 18-06-2003 er mindre end 30-06-2003 
Tempdate: 12-08-2003 er større end 30-06-2003 
Tempdate: 16-08-2003 er større end 30-06-2003 
Jeg kan ikke give dig point, hvorfor?

Og 1000 tak forresten

hossein -> Jeg tænker på at det slet ikke ville virke! Databasen forstår jo ikke ASP koden.

Den skal rettes til:

"Select * from Tabel where dag > " & day(date()) & " or måned >= " & month(date()) & " or år >= " & year(date())

Den grundlæggende konstruktion med 'or' er imidlertid også forkert (22:14:45) men det er en anden sag.

Jeg skulle bare lige have koden sat rigtigt op, du ved, lidt for mange tommelfingre...

Fordi jeg ikke har lagt et svar. cesil bør dog også have nogle - unden at være sikker så burde hans løsning også fungere.

nielle>> nej det passer ikke (30/06-2003 22:14:45), den trækker rigtig ud!

ok

hossein -> Din SQL ville også trække 12/12-2000 ud. Det er ikke rigtigt!

hossein: Din løsnning duer ikke fordi man ikke bare kan sortere dem individuelt. Som nielle skriver giver det mange fejl, selv om man lavede en del if-sætninger, vil det stadig være en kompliceret affære.
Den anden løsning virkede efter hensigten fordi datoen blev sat sammen, og derefter kunne sammenlignes, men tak for forsøget alligevel.

nielle> nej, den trækker rigtig ud, har du prøvet med msAccess, jeg har lagt nogle data og svaret er korrekt.
output:
10  10  2003
1  7  2003

det virker fint med msAccess lige nu har ikke adgang til msSQL. men det var så lidt.

hossein -> Hvilke datoer har du puttet i databasen?

også 12-12-2000

Så *forklar* mig lige hvorfor at:

SELECT * from Tabel WHERE 12>30 OR 12>7 OR 2000>2003

- ikke spytter noget ud?! OR delen er sand lige så snart en af komponenterne er sand. Og 12>7 er altså sand.

min kode er her, lav en tabel i access og prøv den og glem ikke =:
strSQL = "Select * from Tabel where dag > day(date()) or måned >= month(date()) or år >= year(date())"
og moso skrev: "de records der er ældre end i dag ikke kommer med." dvs alt i fremtiden :) dvs alt hvad han har i sin tabel: ALT>30-06-2003

hossein -> Det der er *ikke* din kode. Der er igen blandet ASP ind i SQL-strengen. Hvorfor klipper du ikke koden ud fra det ASP-scipt du rent faktisk køre?

Og uanset om du har =-tegn med i din kode, så vil:

"Select * from Tabel where dag > 30 or måned >= 6 or år >= 2003"

- stadig også spytte en dato som 12/12-2000 ud. Hvis den ikke gør det, så har du en fejl i din Access - for det *skal* den gøre!

det kan godt vær at det er fejl i access det er dansk, måske, men det virker.

Hvis den ikke udføre SQL-sætningerne korrekt - så virker den sgu ikke.

12-12-2003
Select * from Tabel where 12> 30 or 12>= 6 or 2000 >= 2003
da 2000 er ikke større eller lige med 2003 opfylder ikke kriterie ergo den er falsk

1) Ved "or" skal bare et af deludsagnene være sandt (f.eks. 12>6) før det hele er sandt.

2) Ved "and" skal alt sammen være sandt før det hele er sandt.

Hvis man skal løse det på nemmeste vis, så vil det være, at trække alt ud, og så sortere fra i ASP. Det er desværre også det der performer dårligst.
Men her er den løsning:
y = Datepart("yyyy", now)
m = DatePart("m", now)
d = DatePart("d", now)
If rs("Year") > y Then
  'Skal vises
ElseIf rs("Year") = y Then
  If rs("Month") > m Then
    'Skal vises
  ElseIf rs("Month") = m Then
    If rs("Day") >= d Then
      'Skal vises
    End If
  End If
End If

Hovsa.
Sidste del kom ikke med, men det kommer så her.
Og det kan man så med lidt logik omskrive til en sql streng. Måske ikke den kønneste, men den virker, og er hurtigere end at gøre det i ASP.

SELECT * FROM Table WHERE (Year > DatePart("yyyy", GetDate())) OR (Year = DatePart("yyyy", GetDate()) AND Month > DatePart("m", GetDate())) OR (Year = DatePart("yyyy", GetDate()) AND Month = DatePart("m", GetDate()) AND Day >= DatePart("d", GetDate()))