10. juli 2004 - 13:40Der er
19 kommentarer og 2 løsninger
Sortering efter dato
Hej...
Jeg har en database over nogle (mange) arrangementer. Til hvert arrangement er der tilknyttet en dato. Jeg ville så høre hvordan man på sin hjemmeside får vist udelukkende de arrangementer der foregår fra fx i dag og 10 dage frem.
Altså jeg har 3 kolonner med fx Sted, Taler og Dato...og i de respektive rækker står der så Hundested, Peter, 25/6...fx.
Jeg skal måske lige huske at sige at jeg er meget nybegynder med ASP...men kan man, når man har lavet sådan en select der, så lave en løkke der hedder Response.Write rs("Sted") og så vil den udskrive alle de steder hvor der er et arrangement fra i da og 10 dage frem????
og i stor sammenhæng med ellebaeks SQL vil det se ud noget i den her stil:
<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("dindb.mdb") strSQL = "select * from tabel where dato >= date() AND dato <= #" & dateadd("d",date,10) & "# order by dato desc" Set rs = conn.Execute(SQLarrangement)
' så udskriver vi posterne
DO WHILE NOT rs.EOF %>
<%= rs("dato") %> <br> <%= rs("sted") %>
osv. osv.
det der står i denne while løkke gentages indtil der ikke er flere poster udfor din sql
<% rs.MoveNext LOOP rs.Close conn.Close Set conn = nothing Set strSQL = nothing %>
Jeg kan ikke tjekke om det virker lige nu...hmm, jeg må prøve at stole på jer. Det går nok! ellebaek - jeg er ikke sikker på jeg forstod det sidste du sagde. Mener du bare at DO WHILE NOT rs.EOF skal være WHILE NOT rs.EOF ????
det er kommando for at den skal udskrive det der nu står i rs("sted")
f.eks. kan du også udskrive en variabel på sammen måde:
eks.
<% dim variabel1
variabel1 = "dette er en variabel"
%>
så udskriver vi den i html:
<html> <head>
<body> <%= variabel1 %>
</body> </html>
og til ellebaek. var jeg lidt for hurtig havde glemt jeg checkede om recordsættet var tomt, og hvis det ikke var så udskrev jeg det med DO WHILE. Men det er rigtigt hvad du skriver
<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("dindb.mdb") strSQL = "select * from tabel where dato >= date() AND dato <= #" & dateadd("d",date,10) & "# order by dato desc" Set rs = conn.Execute(SQLarrangement)
' så udskriver vi posterne
WHILE NOT rs.EOF %>
<%= rs("dato") %> <br> <%= rs("sted") %>
osv. osv.
det der står i denne while løkke gentages indtil der ikke er flere poster udfor din sql
<% rs.MoveNext wend rs.Close conn.Close Set conn = nothing Set strSQL = nothing %>
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.
Ny bruger
Nybegynder
Opret
Preview
