Monatskalender

Der HTML-Kalender (nur Internet-Explorer-tauglich) zeigt einen Monatskalender und die aktuelle Uhrzeit an, und ist für die Verwendung als Desktop-Hintergrund ausgelegt.

Der Kalender zeigt wahlweise auch die Wochen; die Uhrzeit wahlweise digital oder analog (bitte Scripte bei Bedarf anfordern).
Danke an Gregor für Hinweis, Korrektur und Lob :-)


Sourcecode:

<head>

<script language="JavaScript">
Wochentagname =
  new Array("Sonntag","Montag","Dienstag","Mittwoch","Donnerstag","Freitag","Samstag");
Wochentagkurz =
  new Array("So","Mo","Di","Mi","Do","Fr","Sa");
Monatsname = new Array
("Januar","Februar","März","April","Mai","Juni","Juli",
"August","September","Oktober","November","Dezember");
Tag = new Array ("Mo","Di","Mi","Do","Fr","Sa","So");

var KSchrArt = "Verdana, Times New Roman, Arial"; /* Schriftart Kalenderkopf */
var KSchrGroesse = 4;            /* Schriftgroesse 1-7 Kalenderkopf */
var TitelCol = "#003300";
var KSchrFarbe = "#000033";      /* Schriftfarbe Kalenderkopf */
var Khgrund = "#eeeeee";         /* Hintergrundfarbe Kalenderkopf */
var TSchrArt = "Verdana, Times New Roman, Arial";   /* Schriftart Tagesanzeige */
var TSchrGroesse = 2;            /* Schriftgroesse 1-7 Tagesanzeige */
var TSchrFarbe = "#6600FF";      /* Schriftfarbe Tagesanzeige */
var Thgrund = "#eeeeee";         /* Hintergrundfarbe Tagesanzeige */
var SoFarbe = "#993300";         /* Schriftfarbe f. Sonntage */
var Ahgrund = "#eeeeee";         /* Hintergrundfarbe f. heutigen Tag */
var AhFarbe = "#ad1300";         /* Schriftfarbe f. heutigen Tag */
var AhSoFarbe = "#ffdd00";       /* Schriftfarbe f. heutigen Tag (Sonntag) */
var AhSogrund = "#eeeeee";       /* Hintergrundfarbe f. heutigen Tag (Sonntag) */

function Zeit()
{
 var Jetzt = new Date();
 var Tag = Jetzt.getDate();
 var Monat = Jetzt.getMonth() + 1;
 var Jahr = Jetzt.getYear();
 var Stunden = Jetzt.getHours();
 var Minuten = Jetzt.getMinutes();
 var Sekunden = Jetzt.getSeconds();
 var WoTag = Jetzt.getDay();
 var Vortag  = ((Tag < 10) ? "0" : "");
 var Vormon  = ((Monat < 10) ? ".0" : ".");
 var Vorstd  = ((Stunden < 10) ? "0" : "");
 var Vormin  = ((Minuten < 10) ? ":0" : ":");
 var Vorsek  = ((Sekunden < 10) ? ":0" : ":");
 var Datum = Vortag + Tag + Vormon + Monat  + "." + Jahr;
 var Uhrzeit = Vorstd + Stunden + Vormin + Minuten + Vorsek + Sekunden;
// document.all.Clock.innerHTML = Wochentagkurz[WoTag] + ", " + Datum + ", " + Uhrzeit + " Uhr";
 document.all.Clock.innerHTML = Uhrzeit + " Uhr";
 window.setTimeout("Zeit()",1000);
}

function Kalender()
{
CalText="";
var d = new Date();
var dm = d.getMonth() + 1;
var dj = d.getYear();
if(dj < 200) dj+=1900;
var Monat = dm;
var Jahr = dj;
var jetzt = new Date();
var DieserMonat = jetzt.getMonth() + 1;
var DiesesJahr = jetzt.getYear();
if(DiesesJahr < 999) DiesesJahr+=1900;
var DieserTag = jetzt.getDate();
var Zeit = new Date(Jahr,Monat-1,1);
var Start = Zeit.getDay();
if(Start > 0) Start--;
else Start = 6;
var Stop = 31;
if(Monat==4 ||Monat==6 || Monat==9 || Monat==11 ) --Stop;
if(Monat==2)
{
 Stop=28;
 if(Jahr%4==0) Stop++;
 if(Jahr%100==0) Stop--;
 if(Jahr%400==0) Stop++;
}

CalText=CalText+"<table border=0 cellpadding=1 cellspacing=0>";
var Monatskopf = Monatsname[Monat-1] + " " + Jahr;
SchreibeKopf(Monatskopf,Khgrund,TitelCol,KSchrGroesse,KSchrArt);
SchreibeTagName(Khgrund,KSchrFarbe,TSchrGroesse,KSchrArt,Khgrund);
var Tageszahl = 1;
for(i=0;i<=5;i++)
 {
  CalText=CalText+"<tr>";
  
  if(Tageszahl <= Stop) {
    SchreibeZelle(KalenderWoche(Jahr, Monat, Tageszahl),Thgrund,KSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
  }
  
  for(j=0;j<=5;j++)
   {
    if((i==0)&&(j < Start))
     SchreibeZelle(" ",Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
    else
     {
      if(Tageszahl > Stop)
        SchreibeZelle(" ",Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
      else
       {
        if((Jahr==DiesesJahr)&&(Monat==DieserMonat)&&(Tageszahl==DieserTag))
         SchreibeZelle(Tageszahl,Ahgrund,AhFarbe,TSchrGroesse,TSchrArt,TSchrFarbe);
        else
         SchreibeZelle(Tageszahl,Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
        Tageszahl++;
       }
      }
     }
    if(Tageszahl > Stop)
      SchreibeZelle(" ",Thgrund,SoFarbe,TSchrGroesse,TSchrArt,Khgrund);
    else
     {
      if((Jahr==DiesesJahr)&&(Monat==DieserMonat)&&(Tageszahl==DieserTag))
        SchreibeZelle(Tageszahl,AhSogrund,AhSoFarbe,TSchrGroesse,TSchrArt,SoFarbe);
      else
        SchreibeZelle(Tageszahl,Thgrund,SoFarbe,TSchrGroesse,TSchrArt,Khgrund);
      Tageszahl++;
     }
    CalText=CalText+"</tr>";
  }
CalText=CalText+"</table>";
document.all.Cal.innerHTML = CalText;
window.setTimeout('Kalender()',5000);
}

function SchreibeKopf(Monatstitel,HgFarbe,SchrFarbe,SchrGroesse,SchrArt)
{
CalText=CalText+"<tr>";
CalText=CalText+"<td align=center colspan=8 valign=middle bgcolor="+HgFarbe+">";
CalText=CalText+'<font size='+SchrGroesse+' color='+SchrFarbe+' face="'+SchrArt+'"><b>';
CalText=CalText+Monatstitel;
CalText=CalText+"</b></font><br><br></td></tr>";
}

function SchreibeTagName(HgFarbe,SchrFarbe,SchrGroesse,SchrArt,BdrCol)
{
CalText=CalText+"<tr>";
SchreibeZelle("KW  ",HgFarbe,SchrFarbe,SchrGroesse,SchrArt,BdrCol);
for(i=0;i<=6;i++)
  SchreibeZelle(Tag[i],HgFarbe,SchrFarbe,SchrGroesse,SchrArt,BdrCol);
CalText=CalText+"</tr>";
}

function SchreibeZelle(Inhalt,HgFarbe,SchrFarbe,SchrGroesse,SchrArt,BorderColor)
{
CalText=CalText+"<td bgcolor="+BorderColor+">";
CalText=CalText+"<table border=0 cellspacing=0 cellpading=5 width=100% 
 height=100%><tr><td width=30 height=30 align=center valign=middle bgcolor="+HgFarbe+">";
CalText=CalText+'<font size='+SchrGroesse+' color='+SchrFarbe+' face="'+SchrArt+'"><b>';
CalText=CalText+Inhalt;
CalText=CalText+"</td></tr></table>";
CalText=CalText+"</b></font></td>";
}

function KalenderWoche(Jahr, Monat, Tageszahl)
{
  DatumKW=new Date(Jahr,Monat-1,Tageszahl);
  DoDatKW=donnerstag(DatumKW);
  kwjahr=DoDatKW.getFullYear();
  DoKW1=donnerstag(new Date(kwjahr,0,4)); 
  kw=Math.floor(1.5+(DoDatKW.getTime()-DoKW1.getTime())/86400000/7); 
  return kw;
}

function donnerstag(datum) { 
  var Do=new Date();
  Do.setTime(datum.getTime() + (3-((datum.getDay()+6) % 7)) * 86400000); 
  return Do;
}

function KalenderSmall1()
{
CalText="";
var d = new Date();
var dm = d.getMonth() + 1;
var dj = d.getYear();
dm=dm+1;
if(dm>12){
  dm=dm-12;
  dj=dj+1;
}
if(dj < 999) dj+=1900;
var Monat = dm;
var Jahr = dj;
var jetzt = new Date();
var DieserMonat = jetzt.getMonth() + 1;
var DiesesJahr = jetzt.getYear();
DieserMonat=DieserMonat+1;
if(DieserMonat>12){
  DieserMonat=DieserMonat-12;
  DiesesJahr=DiesesJahr+1;
}
if(DiesesJahr < 999) DiesesJahr+=1900;
var DieserTag = jetzt.getDate();
var Zeit = new Date(Jahr,Monat-1,1);
var Start = Zeit.getDay();
if(Start > 0) Start--;
else Start = 6;
var Stop = 31;
if(Monat==4 ||Monat==6 || Monat==9 || Monat==11 ) --Stop;
if(Monat==2)
{
 Stop=28;
 if(Jahr%4==0) Stop++;
 if(Jahr%100==0) Stop--;
 if(Jahr%400==0) Stop++;
}

CalText=CalText+"<table border=0 cellpadding=1 cellspacing=0>";
var Monatskopf = Monatsname[Monat-1] + " " + Jahr;
SchreibeKopf(Monatskopf,Khgrund,TitelCol,KSchrGroesse,KSchrArt);
SchreibeTagName(Khgrund,KSchrFarbe,TSchrGroesse,KSchrArt,Khgrund);
var Tageszahl = 1;
for(i=0;i<=5;i++){
  CalText=CalText+"<tr>";
  
  if(Tageszahl <= Stop) {
    SchreibeZelle(KalenderWoche(Jahr, Monat, Tageszahl),Thgrund,KSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
  }else{
    CalText=CalText+"<td> </td>";
  }

  for(j=0;j<=5;j++){
    if((i==0)&&(j < Start)){
     SchreibeZelle(" ",Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
    }else{
      if(Tageszahl > Stop){
        SchreibeZelle(" ",Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
      }else{
        SchreibeZelle(Tageszahl,Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
        Tageszahl++;
      }
    }
  }
  if(Tageszahl > Stop){
    SchreibeZelle(" ",Thgrund,SoFarbe,TSchrGroesse,TSchrArt,Khgrund);
  }else{
    SchreibeZelle(Tageszahl,Thgrund,SoFarbe,TSchrGroesse,TSchrArt,Khgrund);
    Tageszahl++;
  }
  CalText=CalText+"</tr>";
}
CalText=CalText+"</table>";
document.all.CalSmall1.innerHTML = CalText;
window.setTimeout('KalenderSmall1()',5000);
}

function KalenderSmall2()
{
CalText="";
var d = new Date();
var dm = d.getMonth() + 1;
var dj = d.getYear();
dm=dm+2;
if(dm>12){
  dm=dm-12;
  dj=dj+1;
}
if(dj < 999) dj+=1900;
var Monat = dm;
var Jahr = dj;
var jetzt = new Date();
var DieserMonat = jetzt.getMonth() + 1;
var DiesesJahr = jetzt.getYear();
DieserMonat=DieserMonat+2;
if(DieserMonat>12){
  DieserMonat=DieserMonat-12;
  DiesesJahr=DiesesJahr+1;
}
if(DiesesJahr < 999) DiesesJahr+=1900;
var DieserTag = jetzt.getDate();
var Zeit = new Date(Jahr,Monat-1,1);
var Start = Zeit.getDay();
if(Start > 0) Start--;
else Start = 6;
var Stop = 31;
if(Monat==4 ||Monat==6 || Monat==9 || Monat==11 ) --Stop;
if(Monat==2)
{
 Stop=28;
 if(Jahr%4==0) Stop++;
 if(Jahr%100==0) Stop--;
 if(Jahr%400==0) Stop++;
}

CalText=CalText+"<table border=0 cellpadding=1 cellspacing=0>";
var Monatskopf = Monatsname[Monat-1] + " " + Jahr;
SchreibeKopf(Monatskopf,Khgrund,TitelCol,KSchrGroesse,KSchrArt);
SchreibeTagName(Khgrund,KSchrFarbe,TSchrGroesse,KSchrArt,Khgrund);
var Tageszahl = 1;
for(i=0;i<=5;i++){
  CalText=CalText+"<tr>";
  
  if(Tageszahl <= Stop) {
    SchreibeZelle(KalenderWoche(Jahr, Monat, Tageszahl),Thgrund,KSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
  }else{
    CalText=CalText+"<td> </td>";
  }

  for(j=0;j<=5;j++){
    if((i==0)&&(j < Start)){
     SchreibeZelle(" ",Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
    }else{
      if(Tageszahl > Stop){
        SchreibeZelle(" ",Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
      }else{
        SchreibeZelle(Tageszahl,Thgrund,TSchrFarbe,TSchrGroesse,TSchrArt,Khgrund);
        Tageszahl++;
      }
    }
  }
  if(Tageszahl > Stop){
    SchreibeZelle(" ",Thgrund,SoFarbe,TSchrGroesse,TSchrArt,Khgrund);
  }else{
    SchreibeZelle(Tageszahl,Thgrund,SoFarbe,TSchrGroesse,TSchrArt,Khgrund);
    Tageszahl++;
  }
  CalText=CalText+"</tr>";
}
CalText=CalText+"</table>";
document.all.CalSmall2.innerHTML = CalText;
window.setTimeout('KalenderSmall2()',5000);
}
</script>

</head>

<body>

<table border=0 cellspacing=0 cellpadding=0 align="center">
<tr>
 <td>
  <p id="Cal" style="font-family:Times New Roman, Times, Arial; font-size:9pt;
  font-weight:bold; color:#0000cc" align=center></p>

 <script language="JavaScript">
 Kalender();
 </script>

 <table border=0 cellspacing=0 cellpadding=0>
 <tr>
 <td>
  <p id="CalSmall1" style="font-family:Times New Roman, Times, Arial; font-size:9pt;
   font-weight:bold; color:#0000cc" align=center></p>

 <script language="JavaScript">
 KalenderSmall1();
 </script>

 </td>

 <td>
  <p id="CalSmall2" style="font-family:Times New Roman, Times, Arial; font-size:9pt;
   font-weight:bold; color:#0000cc" align=center></p>

 <script language="JavaScript">
 KalenderSmall2();
 </script>

 </td>
 </tr>
 </table>

 <p id="Clock" style="font-family:Times New Roman, Times, Arial; font-size:14pt;
  font-weight:bold; color:#000033" align=center></p>

 <script language="JavaScript">
 Zeit();
 </script>

</td>
</tr>
</table>
 Ranking-Hits zurück Sitemap
Designed by www.wbrnet.info