Problem: Ordnerwechsel inkl. Daten auslesen funktioniert nicht

    Hallo Community =),

    In meinem Script, werden Ini-Dateien nach Tagen angelegt, im jeweiligen Monats Ordner, die wiederum im jeweiligen Jahres Ordner erstellt werden.
    Diese Dateien werden dann in eine ListeView eingetragen.
    Allerdings werden nur solche Dateien eingelesen die nicht älter als 10 Tage sind, also z.b. 11.Februar bis 1.Feb.

    Das klappt auch wunderbar =)

    Jetzt kommt mein Problem dabei.

    Wenn ich jetzt z.B. den 3.Feb angelegt habe, dann sollen ja dementsprechend die Dateien bis zum 25.Jan in die ListView eingetragen werden und das klappt leider nicht, ich hab schon alles probiert, was mir einfällt =(

    Unten findet ihr meine Funktionen für diese Script Aufgabe

    Ich hoffe mir kann einer dabei helfen :S
    ^^

    [autoit]

    ;~ -------ListView Übersicht komplett füllen---------------------------------------
    Func ListView_Uebersicht_fuellen()
    $DateAdd = _DateAdd('D', 0, _NowCalcDate())
    $DateAdd2 = _DateAdd('D', -10, _NowCalcDate())
    $Tag = int(StringRegExpReplace($DateAdd,'(\d{4})/(\d{2})/(\d{2})', ' $3 '))
    $Tag2 =int(StringRegExpReplace($DateAdd2,'(\d{4})/(\d{2})/(\d{2})', ' $3 '))
    $Monat2A = StringRegExpReplace($DateAdd2,'(\d{4})/(\d{2})/(\d{2})', ' $2 ')
    MsgBox(0,"",$DateAdd)
    MsgBox(0,"",$DateAdd2)

    [/autoit][autoit][/autoit][autoit]

    If $Tag < 11 Then
    For $x = $Tag To 1 step -1
    ListViewLaden($Pfad_Start&"\Start.ini",0,$x)
    ListViewLaden($Pfad_Stopp&"\Stopp.ini",1,$x)
    ListViewLaden($Pfad_Ende&"\Ende.ini",2,$x)
    MsgBox(0,"","x = "&$x)
    If $Tag < $Tag2 Then
    For $y = 31 To $Tag2 Step -1
    ListViewLaden($Pfad_Start&"\Start.ini",0,$y)
    ListViewLaden($Pfad_Stopp&"\Stopp.ini",1,$y)
    ListViewLaden($Pfad_Ende&"\Ende.ini",2,$y)
    MsgBox(0,"","y = "&$y)
    Next
    EndIf
    Next
    ElseIf $Tag > 10 Then
    For $z = $Tag To $Tag2 step -1
    ListViewLaden($Pfad_Start&"\Start.ini",0,$z)
    ListViewLaden($Pfad_Stopp&"\Stopp.ini",1,$z)
    ListViewLaden($Pfad_Ende&"\Ende.ini",2,$z)
    MsgBox(0,"","z = "&$z)
    Next
    EndIf

    [/autoit][autoit]

    ;~ -------ListView Übersicht Komplett füllen Func----------------------------------
    Func ListViewLaden($Pfad_ListViewLaden,$Auswahl,$h)
    $DateAdd = _DateAdd('D', 0, _NowCalcDate())
    $DateAdd2 = _DateAdd('D', -10, _NowCalcDate())
    $Tag = int(StringRegExpReplace($DateAdd,'(\d{4})/(\d{2})/(\d{2})', ' $3 '))
    $Tag2 =int(StringRegExpReplace($DateAdd2,'(\d{4})/(\d{2})/(\d{2})', ' $3 '))
    $Monat2A = StringRegExpReplace($DateAdd2,'(\d{4})/(\d{2})/(\d{2})', ' $2 ')
    $SectionsCount = IniReadSectionNames($Pfad_ListViewLaden)
    If NOT @error Then
    $Count = $SectionsCount[0]
    For $e = 1 To $Count
    $ArrayStartName = IniReadSection($Pfad_ListViewLaden, $SectionsCount[$e])
    $Name = $ArrayStartName[1][1]
    $Spool = $ArrayStartName[2][1]
    $Stopp = $ArrayStartName[3][1]
    $Time = $ArrayStartName[4][1]
    $Date = $ArrayStartName[5][1]
    ;~ _ArrayDisplay($ArrayStartName)

    [/autoit][autoit][/autoit][autoit]

    If $h < 10 Then
    $Kom = IniRead($Pfad_Auftragserfassung_Archiviert&"\0"&$h&".ini", $Spool ,"Kom","")
    $Bemerkung = IniRead($Pfad_Auftragserfassung_Archiviert&"\0"&$h&".ini", $Spool ,"Bemerkung","Fehler")
    $Express = IniRead($Pfad_Auftragserfassung_Archiviert&"\0"&$h&".ini", $Spool ,"Express","Fehler")
    $EndGe = "-"
    Else
    $Kom = IniRead($Pfad_Auftragserfassung_Archiviert&""&$h&".ini", $Spool ,"Kom","")
    $Bemerkung = IniRead($Pfad_Auftragserfassung_Archiviert&""&$h&".ini", $Spool ,"Bemerkung","Fehler")
    $Express = IniRead($Pfad_Auftragserfassung_Archiviert&""&$h&".ini", $Spool ,"Express","Fehler")
    $EndGe = "-"
    EndIf

    [/autoit][autoit][/autoit][autoit]

    If $Bemerkung <> "Fehler" AND $Express <> "Fehler" Then
    If $Auswahl = 0 Then
    GUICtrlCreateListViewItem($Name&"|"&$Kom&"|"&$Spool&"|"&$Time&"|"&$Date&"|"&$EndGe&"|"&$EndGe&"|"&$EndGe&"|"&$EndGe&"|"&$Bemerkung&"|"&$Express,$Voll_Uebersicht_List);Start
    ElseIf $Auswahl = 1 Then
    GUICtrlCreateListViewItem($Name&"|"&$Kom&"|"&$Spool&"|"&$EndGe&"|"&$EndGe&"|"&$EndGe&"|"&$EndGe&"|"&$Time&"|"&$Date&"|"&$Bemerkung&"|"&$Express,$Voll_Uebersicht_List);Stopp
    ElseIf $Auswahl = 2 Then
    GUICtrlCreateListViewItem($Name&"|"&$Kom&"|"&$Spool&"|"&$EndGe&"|"&$EndGe&"|"&$Time&"|"&$Date&"|"&$EndGe&"|"&$EndGe&"|"&$Bemerkung&"|"&$Express,$Voll_Uebersicht_List);Ende
    EndIf
    EndIf
    If $Express = "Ja" Then GUICtrlSetBkColor(-1,0xFF0000)
    Next
    EndIf
    EndFunc

    [/autoit]


    Meiner Meinung nach mein bisheriger sinnvollster Versuch zur Problemlösung ohne Erfolg

    [autoit]

    ;~ -------ListView Übersicht Komplett füllen Func----------------------------------
    ;~ ElseIf $Tag < $Tag2 Then
    ;~ $Kom = IniRead($Pfad_Auftragserfassung_ArchiviertA&$Monat2A&""&$h&".ini", $Spool ,"Kom","")
    ;~ $Bemerkung = IniRead($Pfad_Auftragserfassung_ArchiviertA&$Monat2A&""&$h&".ini", $Spool ,"Bemerkung","Fehler")
    ;~ $Express = IniRead($Pfad_Auftragserfassung_ArchiviertA&$Monat2A&""&$h&".ini", $Spool ,"Express","Fehler")
    ;~ $EndGe = "-"

    [/autoit]