Nyheder + arkiv
Hejsa. :o)Jeg sidder og roder med et nyhedssystem med tilhørende administrationssystem. Jeg har to problemer, der begge er knyttet til måneder.
1. På forsiden vil jeg gerne have vist alle de nyheder, der er oprettet i den måned det år man nu engang befinder sig i. Altså vil jeg f.eks. lige nu kun have nyheder der er oprettet i juli måned.
Det har jeg sådan set fundet ud af, men jeg har en formodning om det kan gøres smartere. Min kode
<%
Session.LCID = 1030
strNowmonth = FormatDateTime(Now, vbShortDate)
strNowmonth = Month(strNowmonth)
strNowyear = FormatDateTime(Now, vbShortDate)
strNowyear = Year(strNowyear)
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("min_db.mdb")
Conn.Open DSN
strSQL = "SELECT * FROM min_tabel Where year = '" & strNowyear & "' AND month = '" & strNowmonth & "' ORDER BY Id DESC"
Set rs = Conn.Execute(strSQL)
%>
I ovenstående kode har jeg altså oprettet to kolonner (year & month) med henholdvis tallet for måneden og året som indlægget blev oprettet i. De virker sådan set OK, men sagen er den, at jeg allerede har et datofelt i vbShortDate-format, altså f.eks. 03-07-2002. Kan man ikke på en eller anden måde få taget månden og året fra det felt OG bruge det i strSQL så man slipper for de to kolonner month og year? Jeg er helt med på f.eks. year(rs("Dag")) og month(rs("Dag")), men hvordan kan jeg bruge det i strSQL?
2. Til det her nyhedssystem vil jeg gerne have et arkiv. Kan man gøre noget smart, så arkivet automatisk finder ud af, fra hvilket år og hvilke måneder der er nyheder og så selv opretter links til en arkivside, f.eks. href="arkiv.asp?month=1&year=2002". Her er jeg lidt på bar bund. Det at lave selve arkivsiden, der kigger på Querystrings og hiver de relevante records ud er ikke noget problem. Det er mere den side, hvor henvisningerne bliver dannet: Kan man få ASP til selv at kigge i en database, tælle op fra hvilke måneder og år der er nyheder og så skrive henvisninger til de forskellige måneder i de forskellige år? Her er jeg helt på bar bund. :o)
På forhånd tak for hjælpen.
/voller.
