DayOfWeek() Problem

[Michael K]

Hallo

penConsole()
Day = DayOfWeek(Datum)
Print(Str(Ergebnis))
If Day = 0
tag$ = "Sonntag"
ElseIf Day = 1
tag$ = "Montag"
ElseIf Day = 2
tag$ = "Dienstag"
ElseIf Day = 3
tag$ = "Mittwoch"
ElseIf Day = 4
tag$ = "Donnerstag"
ElseIf Day = 5
tag$ = "Freitag"
ElseIf Day = 6
tag$ = "Samstag"
EndIf

Print(tag$)
Input()
CloseConsole()

Ich kann das Sytemdatum verstellen, es git immer denselben Wert retour. Wer kann mir helfen

Gruss Michael

[Lars]

Ich würde ja mal denken, dass es einfach etwas ungünstig ist, das Datum
bei 0 zu belassen. Ändere doch mal Datum in Date() um. Und wenn du
schon dabei bist, die Variable, die du haben willst, heißt Day und nicht
Ergebnis, Ergebnis zu debuggen hilft also nichts.

[Ynnus]

So geht das bei mir:

Code: Alles auswählen

OpenConsole()
Day = DayOfWeek(Date())
Print(Str(Day))
If Day = 0
  tag$ = "Sonntag"
ElseIf Day = 1
  tag$ = "Montag"
ElseIf Day = 2
  tag$ = "Dienstag"
ElseIf Day = 3
  tag$ = "Mittwoch"
ElseIf Day = 4
  tag$ = "Donnerstag"
ElseIf Day = 5
  tag$ = "Freitag"
ElseIf Day = 6
  tag$ = "Samstag"
EndIf

Print(tag$)
Input()
CloseConsole() 

[Michael K]

Ihr habt ja so recht, manchmal sieht man einfach den Wald
vot lauter Bäumen nicht mehr
Alles logisch
Trotzdem Danke

Michael

[MLK]

ich würde die ganzen if abfragen weglassen und per Day den wochentag aus einem array oder stringfield lesen.

Code: Alles auswählen

Wochentage$ = "Sonntag|Montag|Dienstag|Mittwoch|Donnerstag|Freitag" 
OpenConsole()  
Print(Str(DayOfWeek(Date()))+StringField(Wochentage$,DayOfWeek(Date())+1,"|"))
Input() 
CloseConsole()