Problem mit Array dimension

    Hi,

    ich habe mir eine Funktion geschrieb die eien variabel unbekannte Anzahl an Werten aus einer sqlite abruft und diese unter anderem in einen Array speichern soll. Ich bekomme aber immer den Fehler:

    Code
    Array variable has incorrect number of subscripts or subscript dimension range exceeded.:
$rkategorie[$count] = $poolelement
^ ERROR

    Hier die Funktion:

    Spoiler anzeigen
    [autoit]

    Func _Rechnertreeviewupdate()
    Dim $count = 2
    Dim $rkategorie[1]

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

    _GUICtrlTreeView_BeginUpdate($RechnerTreeView)
    _GUICtrlTreeView_DeleteAll($RechnerTreeView)
    Dim $poolQuery = "", $poolZeile = ""
    _SQLite_Query(-1,"SELECT kategorie FROM Rechner WHERE id > 0 GROUP BY kategorie" ,$poolQuery)
    While _SQLite_FetchData($poolQuery, $poolZeile) = $SqlITE_OK

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

    For $poolelement In $poolZeile
    ReDim $rkategorie[$count]
    $rkategorie[$count] = $poolelement
    _GUICtrlComboBox_AddString($Gruppe, $poolelement)
    $topitem = _GUICtrlTreeView_Add($RechnerTreeView, 0, $poolelement)

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

    Dim $rechnerQuery = "", $rechnerZeile = ""
    _SQLite_Query(-1,"SELECT name FROM Rechner WHERE kategorie = '" & $poolelement & "'" ,$rechnerQuery)
    While _SQLite_FetchData($rechnerQuery, $rechnerZeile) = $SqlITE_OK

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

    For $rechnerelement In $rechnerZeile

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

    _GUICtrlTreeView_AddChild($RechnerTreeView, $topitem, $rechnerelement)
    Next
    WEnd
    $count = $count + 1
    Next
    WEnd
    _GUICtrlTreeView_EndUpdate($RechnerTreeView)
    return $rkategorie
    EndFunc

    [/autoit]

    Andy hat mir ein Schnitzel gebacken aber da war ein Raupi drauf und bevor Oscar das Bugfixen konnte kam Alina und gab mir ein AspirinJunkie.