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
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
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.