Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren INFO - FAQ - CC2-Forum - CCPro-Forum

Programm Jahrestag und Dow Kategorie: C-Control I V1.1 (von ManfredW, Homepage - 5.04.2004 21:15)

Als Antwort auf Re: Immer ärger mit Dow von ManfredW - 4.04.2004 18:13

> > OK Also Dow stellt sich nicht selbst (steht übrigens auch nicht in der faq) > > > > weiss denn jemand wie ich mit einem kleinen Basic Programm > > den Wochentag aus dem Datum berechnen kann ? > > > > ich möchte das nicht vom benutzer stellen lassen. > > Auf meiner homepage unter Tipps und Tricks liegt jetzt ein Programm zur Berechnung des Jahrestages und DOW aus dem Datum mit Berücksichtigung der Schaltjahre.   > Hallo, > als erstes muss die TagNr. des Jahres berechnet werden. > TagNr = (month - 1) * 31 + day > > Dann wird je nach Monat korrigiert. > if month > 2 then TagNr = TagNr - 2 ' wegen Schaltjahr sonst -3 > if month > 4 then TagNr = TagNr - 1 > if month > 6 then TagNr = TagNr - 1 > if month > 9 then TagNr = TagNr - 1 > if month > 11 then TagNr = TagNr - 1 > Danach angepasst an Woche 1 des Jahres 2004 > TagNr = TagNr + 3 > > Zuletzt wird durch 7 geteilt, Rest ist der Wochentag. > Dow = TagNr MOD 7 > > Für den 5.4.2004 berechnet > (4-1)*31+ 5 = 98;  98 -2 = 96; 96 +3 = 99; 99 MOD 7 = 1 (Montag) > > Für 2005 usw.musst Du  Korrekturen in das Programm einbauen. > MfG > ManfredW > > Meine Homepage: http://manfred.wilzeck.de

Antwort schreiben

Bisherige Antworten:

Re: Programm Jahrestag und Dow (von Michael - 6.04.2004 22:56)
Re: Programm Jahrestag und Dow (von Michael - 6.04.2004 22:54)