Søg
Avatar billede steen_hansen Forsker
18. maj 2002 - 00:53 Der er 10 kommentarer og
1 løsning

Dato?

Jeg vil gerne have vist datoen på flg. måde:

<table border="0" cellpadding="4" cellspacing="0" width="215">
  <tr>
    <td>
      <p align="center"><font face="Verdana" font size="1">Søndag den</font><br>
      <font face="Verdana" font size="8"><b>28</b></font><br>
      <font face="Verdana" font size="1">maj 2002<br>Uge 14</font></td>
  </tr>
</table>

Hvordan gør jeg det? Jeg kan ikke få det til at passe med JavaScript og Response.Write :o(
Avatar billede steen_hansen Forsker
18. maj 2002 - 00:56 #1
Sådan her skal det nærmere se ud:

<table border="0" cellpadding="4" cellspacing="0" width="215">
  <tr>
    <td>
      <p align="center"><span class="tekst11">Søndag den</span><br>
      <span class="overskrift19">28</span><br>
      <span class="tekst11">maj 2002<br>Uge 14</span>
    </td>
  </tr>
</table>
Avatar billede eagleeye Praktikant
18. maj 2002 - 00:59 #2
Hvad mener du mend JavaScript / Response.write???

ekd på Response.write

Response.write "<table border=""0"" cellpadding=""4"" cellspacing=""0"" width=""215"">"

Var det sådan noget du tænkte på?
Avatar billede soes Nybegynder
18. maj 2002 - 08:50 #3
er det vbscript eller js du skriver din asp side i?

/Søren Søndergård
Avatar billede soes Nybegynder
18. maj 2002 - 09:50 #4
kan dette bruges?

<%
Function WeekDay(Date)
strWeekdat = DatePart("w", Date)
Select Case strWeekdat
Case 1 strWeekdat = "Søndag"
Case 2 strWeekdat = "Mandag"
Case 3 strWeekdat = "Tirsdag"
Case 4 strWeekdat = "Onsdag"
Case 5 strWeekdat = "Torsdag"
Case 6 strWeekdat = "Fredag"
Case 7 strWeekdat = "Lørdag"
End Select
WeekDay = strWeekdat
End Function

Function MonthName()
Select Case Month(Now)
Case 1 strMonth = "Januar"
Case 2 strMonth = "Februar"
Case 3 strMonth = "Marts"
Case 4 strMonth = "April"
Case 5 strMonth = "Maj"
Case 6 strMonth = "Juni"
Case 7 strMonth = "Juli"
Case 8 strMonth = "August"
Case 9 strMonth = "September"
Case 10 strMonth = "Oktober"
Case 11 strMonth = "November"
Case 12 strMonth = "December"
End Select
MonthName = strMonth
End Function

Response.write "<table border='0' cellpadding='4' cellspacing='0' width='215'>"
Response.write "  <tr>"
Response.write "    <td>"
Response.write "      <p align='center'><font face='Verdana' font size='1'>" & WeekDay(Date()) & " den</font><br>"
Response.write "      <font face='Verdana' font size='8'><b>"& DatePart("d", Date()) &"</b></font><br>"
Response.write "      <font face='Verdana' font size='1'>"& MonthName &" "& Year(Now) &"<br>Uge "& DatePart("ww", date()) &"</font></td>"
Response.write "  </tr>"
Response.write "</table>"
%>

/Søren Søndergård
Avatar billede steen_hansen Forsker
18. maj 2002 - 10:07 #5
eagleeye, jeg her dette, som virker fint:

<head>
<script language=JavaScript>
<!--
    var ugeDag = new  Array ("Søndag ","Mandag ","Tirsdag ","Onsdag ","Torsdag ","Fredag ","Lørdag ")
    var maaned = new Array ("1","2","3","4","5","6","7","8","9","10","11","12")
    var nu = new Date
//-->
</script>
</head>

<body>

<script language=JavaScript>
    <!--
        document.write(ugeDag[nu.getDay()] + "den " + nu.getDate() + "/" + maaned[nu.getMonth()] + "-" + [nu.getYear()])
    //-->
</script>

</body>

Men her har jeg simpelthen ikke kunnet formattere teksten.

soes, jeg vil lige prøve dit eksempel...
Avatar billede steen_hansen Forsker
18. maj 2002 - 10:13 #6
soes, my man! Det virker! Tak for hjælpen :o)

<html>

<head>
<!--#include virtual="/includes/inc_header.asp"-->
<title></title>
</head>

<body>

<%
Function WeekDay(Date)
strWeekdat = DatePart("w", Date)
Select Case strWeekdat
Case 1 strWeekdat = "Søndag"
Case 2 strWeekdat = "Mandag"
Case 3 strWeekdat = "Tirsdag"
Case 4 strWeekdat = "Onsdag"
Case 5 strWeekdat = "Torsdag"
Case 6 strWeekdat = "Fredag"
Case 7 strWeekdat = "Lørdag"
End Select
WeekDay = strWeekdat
End Function

Function MonthName()
Select Case Month(Now)
Case 1 strMonth = "Januar"
Case 2 strMonth = "Februar"
Case 3 strMonth = "Marts"
Case 4 strMonth = "April"
Case 5 strMonth = "Maj"
Case 6 strMonth = "Juni"
Case 7 strMonth = "Juli"
Case 8 strMonth = "August"
Case 9 strMonth = "September"
Case 10 strMonth = "Oktober"
Case 11 strMonth = "November"
Case 12 strMonth = "December"
End Select
MonthName = strMonth
End Function

Response.write "<table border='0' cellpadding='4' cellspacing='0' width='215'>"
Response.write "<tr><td><p align='center'><span class='tekst11'>" & WeekDay(Date()) & " den</span><br>"
Response.write "<span class='overskrift19'>"& DatePart("d", Date()) &"</b></span><br>"
Response.write "<span class='tekst11'>"& MonthName &" "& Year(Now) &"<br>Uge "& DatePart("ww", date()) &"</span></td></tr>"
Response.write "</table>"
%>

</body>
</html>
Avatar billede steen_hansen Forsker
18. maj 2002 - 10:14 #7
soes, læg lige et svar
Avatar billede eagleeye Praktikant
18. maj 2002 - 12:35 #8
Husk måneder staves med små bogstaver. du kan i stedet for to function lave to arrays, så kommer koden til at se sådan ud:

arrMonth = Array("januar", "febuar", "marts", "april", "maj", "juni", "juli", "august", "september", "oktober", "november", "december")
arrDay = Array("Søndag", "Mandag", "Tirsdag", "Onsdag", "Torsdag", "Fredag", "Lørdag")

Response.write "<table border='0' cellpadding='4' cellspacing='0' width='215'>"
Response.write "<tr><td><p align='center'><span class='tekst11'>" & arrDay(WeekDay(now)-1) & " den</span><br>"
Response.write "<span class='overskrift19'>"& DatePart("d", Date()) &"</b></span><br>"
Response.write "<span class='tekst11'>"& arrMonth(CInt(month(now()))-1) &" "& Year(Now) &"<br>Uge "& DatePart("ww", date()) &"</span></td></tr>"
Response.write "</table>"
Avatar billede steen_hansen Forsker
18. maj 2002 - 12:39 #9
Hej eagleeye!

Det har jeg sådan set ændret, det er rigtigt hvad du siger. Men tak for oplysningen :o)
Avatar billede soes Nybegynder
18. maj 2002 - 18:28 #10
du får lige et svar
Avatar billede steen_hansen Forsker
18. maj 2002 - 19:30 #11
Tak for hjælpen :o)
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 17:19 Kender I "Dropbox" ? Af Ikke-ekspert i Andet software
I går 16:28 Indsæt en kort video i Outlook 2024 Af ErikHg i E-mail programmer
22/1019:20 Hvor kan man finde en god bærbar computer? Af Strawberry i PC
22/1015:45 lukke sikkerhedshuller Af Asky i PHP
21/1018:38 Værktøj til redigering af hjemmeside på android tablet Af Lisbet 80 i Apps til Android
White papers
Flere white papers »