Syntax Fehler

  • Wo habe ich den mache ich den Syntax fehler ?

    Vielleicht wenn mir jemand erklärt was ich falsch mache?

    Spoiler anzeigen

    [autoit#cs ----------------------------------------------------------------------------
    AutoIt Version: 3.3.0.0
    Author: myName
    Script Function:
    Template AutoIt script.
    #ce ----------------------------------------------------------------------------
    ; Script Start - Add your code below here
    #include <GUIConstantsEx.au3>
    #Include <GuiListView.au3>
    #include <ListViewConstants.au3>
    GUICreate('*************AD Groups Export*************', 714, 669)
    $hListView = GUICtrlCreateListView('Gruppe', 10, 10, 220, 580)
    GUICtrlSendMsg($hListView, $LVM_SETCOLUMNWIDTH, 0, 560) ; setzt die erste Spalte des Listviews auf 560 Pixel Breite
    $hButton = GUICtrlCreateButton('AD Auslesen', 10, 630, 80, 20)
    GUISetState()
    $hButton1 = GUICtrlCreateButton('Gruppe Auslesen', 10, 590, 90, 20)
    GUISetState()
    $hListView2 = GUICtrlCreateListView('User', 240, 10, 220, 580)
    GUICtrlSendMsg($hListView, $LVM_SETCOLUMNWIDTH, 0, 560) ; setzt die erste Spalte des Listviews auf 560 Pixel Breite
    $hButton2 = GUICtrlCreateButton('Member of', 240, 593, 80, 20)
    GUISetState()
    $hButton3 = GUICtrlCreateButton('Export2', 380, 593, 80, 20)
    GUISetState()
    $hButton4 = GUICtrlCreateButton('Export1', 150, 593, 80, 20)
    GUISetState()
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    case $hButton
    RunWait(@ComSpec & " /c " & 'F:\autoit\entwicklung\admin_tool\tools\gruppen.cmd', "", @SW_HIDE)
    ;exportier die AD gruüüen in eine TXT über dsquery
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;,,
    Case $hButton1
    NewItems()
    EndSwitch
    WEnd
    Func NewItems()
    $string = FileRead(@ScriptDir & '\logs\gruppen.txt')
    $array = StringRegExp($string, 'CN=(.+?),.*', 3)
    For $i = 0 To UBound($array) - 1
    GUICtrlCreateListViewItem($array[$i], $hListView)
    ;liest die gruppen.txt ein und stellt sie in der $listview dar schneidet nach cn= und nach dem ersten ,
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    Next
    EndFunc
    Case $hButton2
    $ListViewText = _GUICtrlListView_GetItemTextArray($hlistview)
    consolewrite($ListViewText[1]&@CRLF)
    RunWait(@ComSpec & " /c " & 'F:\autoit\entwicklung\admin_tool\tools\gruppen.cmd', "", @SW_HIDE);list die gruppen user aus und exportiert sie in member.txt
    NewItems()
    EndSwitch
    WEnd
    Func NewItems()
    ;$string = FileRead(@ScriptDir & '\logs\gruppen.txt')
    $string = FileRead(@ScriptDir & '\logs\members.txt')
    $array = StringRegExp($string, ' (?:CN=)(\w+)(?:\\,\s*)(\w+)', 1)
    For $i = 0 To UBound($array) - 1
    GUICtrlCreateListViewItem($array[$i], $hListView2)
    ;liest die members.txt ein und stellt sie in der $listview2 dar schneidet nach cn= und nach dem ersten ,
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    Next
    EndFunc[/autoit]

    lg SubZero ;)
    ==========================================================================

    "Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral."

    Einmal editiert, zuletzt von subzero007 (19. Mai 2009 um 15:06)

  • Der Fehler lag in der While Schleife..
    außerdem brauchstu nur 1 GuiSetState pro Gui und es würde helfen Ordnung zu halten ^^

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #Include <GuiListView.au3>
    #include <ListViewConstants.au3>
    GUICreate('*************AD Groups Export*************', 714, 669)
    $hListView = GUICtrlCreateListView('Gruppe', 10, 10, 220, 580)
    GUICtrlSendMsg($hListView, $LVM_SETCOLUMNWIDTH, 0, 560)
    $hButton = GUICtrlCreateButton('AD Auslesen', 10, 630, 80, 20)
    $hButton1 = GUICtrlCreateButton('Gruppe Auslesen', 10, 590, 90, 20)
    $hListView2 = GUICtrlCreateListView('User', 240, 10, 220, 580)
    GUICtrlSendMsg($hListView, $LVM_SETCOLUMNWIDTH, 0, 560)
    $hButton2 = GUICtrlCreateButton('Member of', 240, 593, 80, 20)
    $hButton3 = GUICtrlCreateButton('Export2', 380, 593, 80, 20)
    $hButton4 = GUICtrlCreateButton('Export1', 150, 593, 80, 20)
    GUISetState()

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    case $hButton
    RunWait(@ComSpec & " /c " & 'F:\autoit\entwicklung\admin_tool\tools\gruppen.cmd', "", @SW_HIDE)
    Case $hButton1
    NewItems1()
    Case $hButton2
    RunWait(@ComSpec & " /c " & 'F:\autoit\entwicklung\admin_tool\tools\gruppen.cmd', "", @SW_HIDE)
    NewItems2()
    EndSwitch
    WEnd

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

    Func NewItems1()
    $string = FileRead(@ScriptDir & '\logs\gruppen.txt')
    $array = StringRegExp($string, 'CN=(.+?),.*', 3)
    For $i = 0 To UBound($array) - 1
    GUICtrlCreateListViewItem($array[$i], $hListView)
    Next
    EndFunc

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

    Func NewItems2()
    $string = FileRead(@ScriptDir & '\logs\members.txt')
    $array = StringRegExp($string, ' (?:CN=)(\w+)(?:\\,\s*)(\w+)', 1)
    For $i = 0 To UBound($array) - 1
    GUICtrlCreateListViewItem($array[$i], $hListView2)
    Next
    EndFunc

    [/autoit]
  • wo genau war der fehler damit ich es verstehe???

    folgender fehler tritt auf

    F:\autoit\entwicklung\admin_tool\gui_01.au3(55,2) : ERROR: syntax error
    Case
    ^

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------
    AutoIt Version: 3.3.0.0
    Author: myName
    Script Function:
    Template AutoIt script.
    #ce ----------------------------------------------------------------------------
    ; Script Start - Add your code below here
    #include <GUIConstantsEx.au3>
    #Include <GuiListView.au3>
    #include <ListViewConstants.au3>
    GUICreate('*************AD Groups Export*************', 714, 669)
    $hListView = GUICtrlCreateListView('Gruppe', 10, 10, 220, 580)
    GUICtrlSendMsg($hListView, $LVM_SETCOLUMNWIDTH, 0, 560) ; setzt die erste Spalte des Listviews auf 560 Pixel Breite
    $hButton = GUICtrlCreateButton('AD Auslesen', 10, 630, 80, 20)
    GUISetState()
    $hButton1 = GUICtrlCreateButton('Gruppe Auslesen', 10, 590, 90, 20)
    GUISetState()
    $hListView2 = GUICtrlCreateListView('User', 240, 10, 220, 580)
    GUICtrlSendMsg($hListView, $LVM_SETCOLUMNWIDTH, 0, 560) ; setzt die erste Spalte des Listviews auf 560 Pixel Breite
    $hButton2 = GUICtrlCreateButton('Member of', 240, 593, 80, 20)
    GUISetState()
    $hButton3 = GUICtrlCreateButton('Export2', 380, 593, 80, 20)
    GUISetState()
    $hButton4 = GUICtrlCreateButton('Export1', 150, 593, 80, 20)
    GUISetState()
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    case $hButton
    RunWait(@ComSpec & " /c " & 'F:\autoit\entwicklung\admin_tool\tools\gruppen.cmd', "", @SW_HIDE)
    ;exportier die AD gruüüen in eine TXT über dsquery
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;,,
    Case $hButton1
    NewItems()
    EndSwitch
    WEnd
    Func NewItems()
    $string = FileRead(@ScriptDir & '\logs\gruppen.txt')
    $array = StringRegExp($string, 'CN=(.+?),.*', 3)
    For $i = 0 To UBound($array) - 1
    GUICtrlCreateListViewItem($array[$i], $hListView)
    ;liest die gruppen.txt ein und stellt sie in der $listview dar schneidet nach cn= und nach dem ersten ,
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    Next
    EndFunc
    Case $hButton2
    $ListViewText = _GUICtrlListView_GetItemTextArray($hlistview)
    consolewrite($ListViewText[1]&@CRLF)
    RunWait(@ComSpec & " /c " & 'F:\autoit\entwicklung\admin_tool\tools\gruppen.cmd', "", @SW_HIDE);list die gruppen user aus und exportiert sie in member.txt
    NewItems()
    EndSwitch
    WEnd
    Func NewItems()
    ;$string = FileRead(@ScriptDir & '\logs\gruppen.txt')
    $string = FileRead(@ScriptDir & '\logs\members.txt')
    $array = StringRegExp($string, ' (?:CN=)(\w+)(?:\\,\s*)(\w+)', 1)
    For $i = 0 To UBound($array) - 1
    GUICtrlCreateListViewItem($array[$i], $hListView2)
    ;liest die members.txt ein und stellt sie in der $listview2 dar schneidet nach cn= und nach dem ersten ,
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    Next
    EndFunc

    [/autoit]

    lg SubZero ;)
    ==========================================================================

    "Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral."

  • Spoiler anzeigen
    [autoit]

    While 1 ;Anfang der Endlosschleife
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    case $hButton
    RunWait(@ComSpec & " /c " & 'F:\autoit\entwicklung\admin_tool\tools\gruppen.cmd', "", @SW_HIDE)
    Case $hButton1
    NewItems()
    EndSwitch
    WEnd ;ENDE der Schleife

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

    Func NewItems() ;Funktion
    $string = FileRead(@ScriptDir & '\logs\gruppen.txt')
    $array = StringRegExp($string, 'CN=(.+?),.*', 3)
    For $i = 0 To UBound($array) - 1
    GUICtrlCreateListViewItem($array[$i], $hListView)
    Next
    EndFunc

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

    ;DER TEIL GEHÖRT NOCH IN DIE WHILE-SCHLEIFE!(zeile 1 bis 11)
    Case $hButton2 ; Fehler 1: Case ohne Switch oder Select
    $ListViewText = _GUICtrlListView_GetItemTextArray($hlistview)
    consolewrite($ListViewText[1]&@CRLF)
    RunWait(@ComSpec & " /c " & 'F:\autoit\entwicklung\admin_tool\tools\gruppen.cmd', "", @SW_HIDE)
    NewItems()
    EndSwitch ;Fehler 2: EndSwitch ohne Switch
    WEnd ;Fehler 3: Wend ohne While
    ;===========================================

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

    Func NewItems() ; Fehler 4: 2 Funktionen mit dem gleichen Namen
    .
    .
    .

    [/autoit]
  • danke

    lg SubZero ;)
    ==========================================================================

    "Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral."