hvis ugen er lige så v. 2

Det er rimeligt svært at svare på uden en konkret kode !

If datepart("ww", date(), 3,3)mod 2 = 0 Then
skemaet for ulige uge
else
skemaet for lige uge
end if
sådan ser det ud

ved dog ikke om det kan have noget med noget kode oven over at gøre
<%
ugeNr = DatePart("ww", AnyDate, vbMonday, vbFirstFourDays)
dagiuge = DatePart("W", date, 2)-1 '2 angive føste dag er mandag.:
'Find dato for mandag
dato = DateAdd("d", -dagiuge, date)

'Find ugens dage navne + dato
dagMandag = WeekdayName(DatePart("W", dato, 1))
dagMandag = UCase(Left(dagMandag,1)) & Mid(dagMandag,2) & " " & Day(dato) & "/" & Month(dato)
dato = DateAdd("d", 1, dato)
dagTirsdag = WeekdayName(DatePart("W", dato, 1))
dagTirsdag = UCase(Left(dagTirsdag,1)) & Mid(dagTirsdag,2) & " " & Day(dato) & "/" & Month(dato)
dato = DateAdd("d", 1, dato)
dagOnsdag = WeekdayName(DatePart("W", dato, 1))
dagOnsdag = UCase(Left(dagOnsdag,1)) & Mid(dagOnsdag,2) & " " & Day(dato) & "/" & Month(dato)
dato = DateAdd("d", 1, dato)
dagTorsdag = WeekdayName(DatePart("W", dato, 1))
dagTorsdag = UCase(Left(dagTorsdag,1)) & Mid(dagTorsdag,2) & " " & Day(dato) & "/" & Month(dato)
dato = DateAdd("d", 1, dato)
dagFredag = WeekdayName(DatePart("W", dato, 1))
dagFredag = UCase(Left(dagFredag,1)) & Mid(dagFredag,2) & " " & Day(dato) & "/" & Month(dato)
%>

hmm, det skulle jo virke fint !, men prøv lige at ændre den her :

If datepart("ww", date(), 3,3)mod 2 = 0 Then

Til

if ((datepart("ww", Date(), 3, 3) Mod 2) = 0) Then

-grunken

den viser stadig ulige uge..

jeps det skal du, ellers må du have rod i din lige og ulige uger et eller andet sted

kan du ikke give mig koden der ned til hvor den udskriver om det er en lige eller ulige uge ???

-grunken

det har jeg givet oven over, det er det eneste den gør for at skelne dem fra hinanden, skal jeg evt. sende siden

meget gerne :)

enten post den her :

ellers send den til : grunken@post.cybercity.dk

sendt til din mai

okay :)

hmm, den er ik kommet endnu !

okay den er ellers afsendt

der var den :)

ok :-)

hmm, må jeg sige det højt ?

du har byttet rudt på "Lige" og "ULige" uge teksten i din kode

det er vist en "på de sene timer bummert", skal jeg rette det til, eller vil du ?

kig på linie 39 :)

Hvad mener du ?

Hvis det er de to skemaer du mener skal byttes om kan det ikke passe for sådan har de altid stået -> og virket

aha, jeg har osse sovet ! (burde have kigget ordentligt efter i de øverste indlæg..!)

If datepart("ww", date(), 3,3)mod 2 = 0 Then
skemaet for ulige uge
else
skemaet for lige uge
end if

skal byttes rundt til !

If datepart("ww", date(), 3,3)mod 2 = 0 Then
skemaet for lige uge
else
skemaet for ulige uge
end if

okay, jeg ændrer det, og sender den tilbage, lad os så se om det ikke virker ;)

Deal ? ;)

jamen det har virket som de står før.. men prøver det da og må så se i næste uge. fik du min anden mail

passer skemaerne, eller er det det hele der er byttet rundt på ?

Jeps fik din anden mail, kigger lige på det :)

skemaerne har haft de nuværende positioner, men kan sagten rette det på nuværende tidspunkt men det er så bare det om det passer næste uge *g*

Okay, kan du se hvad jeg mener med det andet spm i forhold til det nuværende.

Jeps, er ved at kigge på det !

og bare rolig, det virker i næste uge :)

hvordan kan det være det har virket før så ? *s* ligger du et svar så kan du give tilbage hvis den er gal.

Jeg forstår heller ikke at den har virket før :), er du sikker på at du ikke har ændret på det siden overhovedet ?

Jeg ved det virker, og du skal nok få dine 30 point tilbage, hvis den er gal :)

-grunken