Avatar billede riishoj Nybegynder
24. november 2002 - 18:25 Der er 10 kommentarer og
1 løsning

Hente datoer ud fra ugenummeret

Kan man ud fra ugenummeret hente datoerne i den pågældende uge. Jeg har et skema (skoleskema med dagene fra man. til fre.) som hentes ved hjælp af

If Request.Querystring("uge") <> "" Then
      uge = Request.Querystring("uge")
    Else
      uge = DatePart("ww",date())
    End If
   
    Response.Write "<font color=white face=verdana size=5>"
    Response.Write uge

Jeg vil gerne have skrevet datoerne på dagene i ugen altså f.eks. hvis det er skemaet for uge 48, så skal datoen for mandag også skrives, datoen for tirsdag osv.
Avatar billede Slettet bruger
24. november 2002 - 18:36 #1
Du kan bruge nedenstående funktion til at finde den første dato i en given uge. Derudfra kan du ved hjælp af et loop generere de fire andre dage i skoleskemaet.

http://www.magik.dk/funktioner/6/
Avatar billede riishoj Nybegynder
24. november 2002 - 19:36 #2
Kan du kort vise, hvordan jeg laver et sådant loop. Et andet problem er at

DatePart("ww",date())

giver uge 48 i dag, dvs. at funktionen beregner uge ud fra søndag som den første dag i ugen, mens danske kalendere regner mandag som den første dag i ugen.
Avatar billede riishoj Nybegynder
24. november 2002 - 20:05 #3
Jeg kan ikke få dit eksempel med at finde den første dato i en given uge til at virke. Hvad skriver jeg helt nøjagtigt??
Avatar billede Slettet bruger
24. november 2002 - 20:09 #4
For at få mandag til at være den første ugedag, skal du fortælle webserveren at du anvender dansk datoformat mv. Dette angives vha.:

Session.LCID = 1030

Funktionen skal have et ugenummer og en startdato for at virke. Prøv at se eksemplerne neden for funktionen på siden for yderligere forklaring.
Avatar billede riishoj Nybegynder
24. november 2002 - 20:49 #5
OK, men jeg kan altså ikke få den her til at virke, og det er jo nok den som jeg har brug for! Hvad skal der tilføjes ud over Response.Write for at funktionen skrive datoen??

Den første dag i indeværende uge:
getDate(DatePart("ww", Date(), vbMonday, vbFirstFourDays), "01-01-2002")
Avatar billede riishoj Nybegynder
24. november 2002 - 22:10 #6
Jeg kan heller ikke få

Session.LCID = 1030

til at virke. Skal det ikke sættes ind i toppen af scriptet?
Avatar billede riishoj Nybegynder
24. november 2002 - 22:52 #7
Når jeg kører eksemplerne på din side får jeg fejlen

Der opstod en Microsoft VBScript-kørselsfejl fejl '800a000d'

Typerne passer ikke sammen: 'getDate'
Avatar billede riishoj Nybegynder
25. november 2002 - 17:32 #8
magik>>Jeg har hårdt brug for dit svar. Det er lige din funktion jeg står og mangler, men jeg kan altså ikke få det til at virke! Hvorfor?
Avatar billede Slettet bruger
26. november 2002 - 09:49 #9
Du må meget undskylde at jeg ikke har svaret igen, men til tider får jeg ikke mails her fra Eksperten når der er indlæg i de spørgsmål jeg deltager i.  :(

Har du ikke noget kode jeg kan få lov at se? Det er lidt svært at se hvor fejlen opstår.
Avatar billede riishoj Nybegynder
26. november 2002 - 13:47 #10
Jeg har fået det til at virke. Tak for hjælpen:)
Avatar billede Slettet bruger
26. november 2002 - 13:51 #11
Selv tak  :)
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester