Avatar billede tormood Nybegynder
08. september 2003 - 22:34 Der er 10 kommentarer og
1 løsning

Ocean12 kalender

Jeg trenger hjelp til å få vise Mandag som den første dag i uken i Ocean12 kalenderen.
Avatar billede swamboo Seniormester
09. september 2003 - 07:44 #1
Hej Thormdo - hvad er Ocean12 kalenderen??
Avatar billede benkebus Nybegynder
09. september 2003 - 07:49 #2
öppna default.asp och leta upp följnade kod:
<tr>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Mån<%Else%>Måndag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Tis<%Else%>Tisdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Ons<%Else%>Onsdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Tors<%Else%>Torsdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Fre<%Else%>Fredag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Lör<%Else%>Lördag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Sön<%Else%>Söndag<%End If%></b></font></td>
</tr>

klipp ut översta td som innehåller Sunday och klistra in den som sista td...
eller ersätt med koden nedan:
<tr>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Tis<%Else%>Tisdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Ons<%Else%>Onsdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Tors<%Else%>Torsdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Fre<%Else%>Fredag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Lör<%Else%>Lördag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Sön<%Else%>Söndag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Mån<%Else%>Måndag<%End If%></b></font></td>
</tr>
Avatar billede benkebus Nybegynder
09. september 2003 - 07:49 #3
sorry klistrade in samma textstycke... bägge två har måndag som första dag i veckan...
Avatar billede benkebus Nybegynder
09. september 2003 - 07:50 #4
nej fel igen... ignorera den nedersta kodsnutten helt o hållet
Avatar billede benkebus Nybegynder
09. september 2003 - 08:14 #5
sorry... allt jag skrev var fel... det var inte så enkelt som jag trodde
Avatar billede benkebus Nybegynder
09. september 2003 - 10:23 #6
nu har jag löst det...
leta upp följande kodstycke i default.asp:

<tr>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Sön<%Else%>Söndag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Mån<%Else%>Måndag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Tis<%Else%>Tisdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Ons<%Else%>Onsdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Tors<%Else%>Torsdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Fre<%Else%>Fredag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Lör<%Else%>Lördag<%End If%></b></font></td>
</tr>

tag och klipp ut td som innehåller Söndag och klistra in sist i tr efter Lördag... då ser koden ut så här:
<tr>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Mån<%Else%>Måndag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Tis<%Else%>Tisdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Ons<%Else%>Onsdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Tors<%Else%>Torsdag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Fre<%Else%>Fredag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Lör<%Else%>Lördag<%End If%></b></font></td>
<td width="<%=Cell_Width%>" align="center" bgcolor="<%=Weekday_Background_Color%>"><font face="<%=Weekday_Font%>" size="<%=Weekday_Font_Size%>" color="<%=Weekday_Font_Color%>"><b><%If (RSBODY("Abbreviate_Days") = True) Then%>Sön<%Else%>Söndag<%End If%></b></font></td>
</tr>

leta sedan upp följande rad:
firstday = Weekday(CDate(navmonth & "/" & 1 & "/" & navyear))

byt ut 1 mot 7, så här:
firstday = Weekday(CDate(navmonth & "/" & 7 & "/" & navyear))

sedan är det bara att spara...
Avatar billede hnteknik Novice
09. september 2003 - 14:26 #7
Avatar billede swamboo Seniormester
09. september 2003 - 16:37 #8
Tak...  ;-) Nu er jeg med...
Avatar billede tormood Nybegynder
09. september 2003 - 17:03 #9
Tusen tusen takk benkebus, det virket!!!
Avatar billede tormood Nybegynder
09. september 2003 - 17:05 #10
aller helst ville jeg gjerne forandre den til en halvårs kalender hvor de seks månedene ligger i rader, men det er vel for avanseret.
Avatar billede tormood Nybegynder
09. september 2003 - 17:29 #11
hvis noen har lyst å prøve kan jeg jo oprette et nytt spørsmål til 200 poeng.
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

IT-JOB

Capgemini Danmark A/S

AI Data Architect

Capgemini Danmark A/S

AI/Data Engineer

Capgemini Danmark A/S

Client Partner

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Solution Manager til Cyberdivisionen