Fehler :-(

  • Hallo,

    ich teste gerade dieses Script:

    [autoit]

    #include <GUIConstantsEx.au3>
    #include <File.au3>
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=..\..\..\..\Windows\System32\PerfCenterCpl.ico
    #AutoIt3Wrapper_Res_Fileversion=2.0.0.0
    #AutoIt3Wrapper_Res_Language=1031
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <GuiStatusBar.au3>
    #include <WindowsConstants.au3>
    #include <Date.au3>
    #include <file.au3>
    #include <GuiListView.au3>
    #include <ListViewConstants.au3>
    #include <GuiDateTimePicker.au3>
    #include 'rmchart_smart.au3'
    #Include <String.au3>

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

    Global $sIniFile

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

    $idGUI = GUICreate("Ini-Verwaltung", 300, 160)
    $idList = GUICtrlCreateList("", 10, 10, 180, 80)
    $aInis = _FileListToArray(@ScriptDir, "*.ini", 1)
    If IsArray($aInis) Then
    For $i = 1 To $aInis[0]
    GUICtrlSetData($idList, $aInis[$i])
    Next
    EndIf
    $idLabel = GUICtrlCreateLabel("", 10, 100, 290, 22)
    $ssttaa = GUICtrlCreateButton("Stats", 110, 130, 110, 20, $WS_GROUP)
    $idBtnMsgBox = GUICtrlCreateButton("MsgBox", 10, 130, 100, 22)
    GUICtrlSetState($idBtnMsgBox,$GUI_DISABLE)

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

    GUISetState()

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $idList
    $sIniFile = @ScriptDir & "\Daten\" & GUICtrlRead($idList)
    GUICtrlSetData($idLabel, $sIniFile)
    GUICtrlSetState($idBtnMsgBox,$GUI_ENABLE)
    Case $idBtnMsgBox
    MsgBox(0,"ausgewählt:",$sIniFile)

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

    case $ssttaa
    local $dateiname = $sIniFile
    $stat = GUICreate("Statistik", 550, 350, 500 , 300, BitOR($WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_POPUP,$WS_GROUP,$WS_CLIPSIBLINGS))

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

    $list = GUICtrlCreateListView("", 10, 10, 520, 300);,$LVS_SORTDESCENDING)
    _GUICtrlListView_InsertColumn($list, 0, "test", 90)
    _GUICtrlListView_InsertColumn($list, 1, "test1", 60)
    _GUICtrlListView_InsertColumn($list, 2, "test2", 60)
    _GUICtrlListView_InsertColumn($list, 3, "test3", 60)
    _GUICtrlListView_InsertColumn($list, 4, "test4", 60)
    _GUICtrlListView_InsertColumn($list, 5, "test5", 60)
    _GUICtrlListView_InsertColumn($list, 6, "test6", 60)
    _GUICtrlListView_InsertColumn($list, 7, "test7", 60)
    $Button = GUICtrlCreateButton("zurück", 10, 320, 110, 20, $WS_GROUP)
    GUISetState(@SW_SHOW, $stat)

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

    $ivar = IniReadSection($dateiname, "test1")
    $lineIndex1 = 0
    for $ia = 1 to $ivar [0] [0]
    _GUICtrlListView_AddItem($list, $ivar[$ia] [0])
    _GUICtrlListView_AddSubItem($list, $lineIndex1 ,$ivar[$ia] [1],1)
    $lineIndex1 += 1
    next
    $ivarb8 = IniReadSection($dateiname, "test2")
    $lineIndex1 = 0
    for $iab8 = 1 to $ivarb8 [0] [0]
    _GUICtrlListView_AddSubItem($list, $lineIndex1 ,$ivarb8[$iab8] [1],2)
    $lineIndex1 += 1
    next
    $ivarb7 = IniReadSection($dateiname, "test3")
    $lineIndex1 = 0
    for $iab7 = 1 to $ivarb7 [0] [0]
    _GUICtrlListView_AddSubItem($list, $lineIndex1 ,$ivarb7[$iab7] [1],3)
    $lineIndex1 += 1
    next
    $ivarb6 = IniReadSection($dateiname, "test4")
    $lineIndex1 = 0
    for $iab6 = 1 to $ivarb6 [0] [0]
    _GUICtrlListView_AddSubItem($list, $lineIndex1 ,$ivarb6[$iab6] [1],5)
    $lineIndex1 += 1
    next
    $ivarb5 = IniReadSection($dateiname, "test5")
    $lineIndex1 = 0
    for $iab5 = 1 to $ivarb5 [0] [0]
    _GUICtrlListView_AddSubItem($list, $lineIndex1 ,$ivarb5[$iab5] [1],6)
    $lineIndex1 += 1
    next
    $ivarb4 = IniReadSection($dateiname, "test6")
    $lineIndex1 = 0
    for $iab4 = 1 to $ivarb4 [0] [0]
    _GUICtrlListView_AddSubItem($list, $lineIndex1 ,$ivarb4[$iab4] [1],4)
    $lineIndex1 += 1
    next
    $ivarb3 = IniReadSection($dateiname, "test7t")
    $lineIndex1 = 0
    for $iab3 = 1 to $ivarb3 [0] [0]
    _GUICtrlListView_AddSubItem($list, $lineIndex1 ,$ivarb3[$iab3] [1],7)
    $lineIndex1 += 1
    next
    EndSwitch
    WEnd

    [/autoit]

    Leider bekomme ich den fehler_: ==> Subscript used with non-Array variable.:
    for $ia = 1 to $ivar [0] [0]
    for $ia = 1 to $ivar ^ ERROR

    Und finde aber die lösung nicht, ev hat jemand nen tip für mich

    In der Ini steht in jeder section das selbe

    03.06.2011=1

    HABE fehler gefunden wahr in der übergabe des dateinamens

    Einmal editiert, zuletzt von JaySini (3. Juni 2011 um 10:48)

  • #include 'rmchart_smart.au3'

    hab i net

    Achtung Anfänger! :whistling:

    Betrachten des Quellcodes auf eigene Gefahr, bei Übelkeit,Erbrechen,Kopfschmerzen übernehme ich keine Haftung. 8o