webForumDet fria alternativet

Dela upp poster efter publicerad månad

ASP

2 svar · 501 visningar · startad av Yepp

Medlem sedan juni 200083 inlägg
Frågan#1

Hejsan!

Har letat, sökt och provat själv som en tok - men får inte riktigt ihop det som jag vill... därför hoppas jag på att nån vänlig själ kan bidra med sin expertis, är säkerligen inget svårt då det återfinns på många ställen - men just nu står det helt still...

Till "problemet"

Har en enkel databas ur vilken jag vill presentera rubrikerna i en tabell efter vilken månad de är inlagda (publiceringstidpunkt finns lagrat med hjälp av "now") och helst också efter år.

Med andra ord så att resultatet blir något i stil med:

2006
April
Rubrik 1
Rubrik 2

Mars
Rubrik 3

Februari
Rubrik 4
Rubrik 5
Rubrik 6

Januari
Rubrik 7
Rubrik 8

2005
December
Rubrik 9
Rubrik 10
Rubrik 11

osv...

Självklart är det önskvärda att nya månader fylls utan några konstigheter - dvs inom kort trillar även maj in som en månad.

Är antagligen inte i behov av någon fullständing kod, borde kunna knåpa ihop det mesta om jag bara får lite hints - men orkar någon så är det självklart mycket välkommet.
Tack för mig... :OO

Medlem sedan dec. 200012 464 inlägg
#2

jag förutsätter att du hämtar dina poster sorterade i fallande ordning med avseende på datum

pYear = 0
pMonth = 0
while not rs.eof
    if cint(rs("year")) <> pYear then
       pYear = cint(rs("year"))
       response.write pYear & "<br>"
       pMonth = 0
    end if
    if cint(rs("month")) <> pMonth then
       pMonth = cint(rs("month"))
       response.write pMonth & "<br>"
    end if
'skriv ut resten
     rs.movenext
wend
Medlem sedan juni 200083 inlägg
#3

Tackar - ändrade lite smått med formateringen och så, fungerade perfekt

<%
pYear = 0
pMonth = 0
while not RSNA.eof
    if cint(year(RSNA("datum"))) <> pYear then
       pYear = cint(year(RSNA("datum")))
       response.write pYear & "<br>"
       pMonth = 0
    end if
    if cint(month(RSNA("datum"))) <> pMonth then
       pMonth = cint(month(RSNA("datum")))
       response.write monthname(pMonth) & "<br>"
    end if
'skriv ut resten
     RSNA.movenext
wend
%>

Finfint!
Än en gång, tack!

261 ms totalt · 4 externa anrop · v20260731065814-full.2f471f9e
132 ms — deklarationer (db)
0 ms — hämta statistik (cache)
126 ms — hämta tråd, inlägg och bilagor (db)
132 ms — ändringar (db)