12. juli 2001 - 23:48Der er
14 kommentarer og 1 løsning
Hjælp - NyhedsArkiv
Jeg er ved at lave et nyheds system, men den laver fejl.. for mig at se skulle det være rigtigt nok..
maanede = request(\"maanede\") if maanede <> \"\" then Set rstemp = Server.CreateObject(\"ADODB.RecordSet\") SQL = \"SELECT * FROM [Nyheder] WHERE dato=\"& month(maanede) rstemp.Open SQL, conntemp, 1 Select Case maanede case 1 maaned=\" januar \" : case 2 maaned=\" februar \" : case 3 maaned=\" marts \" : case 4 maaned=\" april \" case 5 maaned=\" maj \" : case 6 maaned=\" juni \" : case 7 maaned=\" juli \" : case 8 maaned=\" august \" case 9 maaned=\" september \" : case 10 maaned=\" oktober \" : case 11 maaned=\" november\" : case 12 maaned=\" december \" End Select
if rstemp.EOF or rstemp.BOF then response.write \"<br><font face=verdana size=1><center>Der er ingen nyheder i \"& maaned &\" månede.</center></font>\" else do while not (rstemp.eof or rstemp.bof) Fundet nogle.. (jeg laver selv det her senere) rstemp.movenext Loop response.write \"</table><br>\" end if
ok, men så kan du ikke bare spørge om dato=januar , vel.
Du skal teste om den er dato er større end den 1. i måneden, og mindre en den sidste dag i måneden. Eller udvide din database med et ekstra felt til netop dette brug.
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.