"Else" statement with no matching "If" statement

  • :rolleyes: Hallo Leute, kann mir mal jemand bitte sagen,
    wo hier der Fehler liegen könnte?



    Call ("VPN_Start")


    Func VPN_Start() ;VPN-Prog wird gestartet.
    ShellExecute ("C:\Program Files (x86)\Cisco Systems\VPN Client\vpngui.exe")
    WinWaitActive ("VPN Client") call ("VPN_Connect")
    EndFunc


    Func VPN_Connect() ;Prüfen ob VPN Client gestartet ist
    If WinExists("VPN Client") then call("VPN_estab")
    Else MsgBox (262208,"VPN-Connection","VPN could not be established",10)
    EndIf
    EndFunc



    Func VPN_estab() ;Starten der Login_Section
    Send ("^o")
    EndFunc



    Danke

  • Der Fehler liegt in Zeile 9.
    Schreib das Call in die Zeile darunter, dann gehts.
    Es gibt nur Einzeilige If's und mindestens Dreizeilige, da die If's so aufgebaut sind:
    Einzeilig:

    Code
    If <Bedingung> Then <Befehl>


    Mehrzeilig:

    Code
    If <Bedingung> Then
    <Befehle>
    Else
    <Befehle>
    EndIf


    (Wobei Zeile 3 & 4 optional sind)


    Weiterhin musst du eine UDF nicht mit Call aufrufen!
    Anstatt Call("VPN_Start") geht auch VPN_Start(). ;)


    lg chess

  • und in zeile solltest du nur eine anweisung pro zeile verwenden, statt zwei hintereinander

    MFG inventor


    wenn's weitere Fragen gibt -> PN
    wenn da keine Antwort kommt, überdenk deine Frage noch mal