German Kalenderwoche ermitteln

Discussion in 'German Forum' started by Wolli013, Feb 21, 2015.

  1. Wolli013

    Wolli013 Active Member Licensed User

    Wi ermittelt man die aktuelle Kalenderwoche?
    Gibt es da eine Date funktion?

    In der Forumsuche habe ich leider nichts gefunden.
    Über Antworten würde ich mich freuen.
     
  2. klaus

    klaus Expert Licensed User

    Gib mal week number oben rechts in das Search Fenster ein, dann bekommst Du einige Links zum Thema.
     
    DonManfred likes this.
  3. Wolli013

    Wolli013 Active Member Licensed User

    Danke für die schnelle Antwort!
     
  4. Wolli013

    Wolli013 Active Member Licensed User

    Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("normal")
    Dim dt As AHDateTime
    dt.Initialize
    dt.Pattern = "w"
    Label2.Text = "Kalenderwoche: " & dt.format(DateTime.Now)
    End Sub

    Das klappt soweit Super, nur wie bekomme ich von einem bestimten Datum die KW
    z.B. 21.01.2015 hin.
    Was muss ich statt (DateTime.Now) einsetzen?
     
  5. klaus

    klaus Expert Licensed User

    Ich hab diese Library noch nie gebraucht, müsste auch erst suchen.
     
  6. jobaw245

    jobaw245 Member Licensed User

    Hallo Wolli013
    Du kannst nicht einfach bei "dt.Pattern = "w" einsetzen. jjjj und mm und dd u.s.w. sind festgelegte Sachen für Jahr,Monat und Tag.
    "w" gibt es nicht.
    Du musst erst einmal herausfinden was für ein Wochentag der 01.01 ist . Ist der erste Tag des Jahres größer als Donnerstag ist die erste
    Komplette Woche vom 28.12.- 03.01 die Kalenderwoche 1 .Ist der 01.01 weniger wie Freitag ist die Kalenderwoche noch die 53 , auch wenn schon
    Januar ist.
     
  7. Wolli013

    Wolli013 Active Member Licensed User

    Doch es geht mit "dt.Pattern = "w"
    weil ich eine (Libary AHLocale) nutze, funktioniert ja auch alles, nur immer mit dem heutigen Datum und ich möchte ja ein ganz bestimtes Datum einsetzen.
     
  8. DonManfred

    DonManfred Expert Licensed User

    Dann mach das doch und
    setze bei
    Code:
    dt.format(DateTime.Now)
    ein anderes Datum ein.
    Code:
    dt.format(datetime.DateParse("23.02.2015"))
     
  9. Wolli013

    Wolli013 Active Member Licensed User

    Vielen Dank, genau das habe ich gebraucht.
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice