elitepvpers - StringSplit Problem

danke, leider gibt es nun eine weitere Fehlermeldung, könnte mir eben jemand helfen? Diesmal zwischen Zeile 28 - 30 liegt der Fehler :

Code:

#region ;**** Directives created by AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6

#endregion ;**** Directives created by AutoIt3Wrapper_GUI ****

#include <FTPEx.au3>

#include <File.au3>

#include <Array.au3>



Opt('MustDeclareVars', 1)



_example1()





Func _example1()

    ;lädt eine Datei hoch

    Local $s_ServerName = 'shizodbach.***********' ;dieser Server existiert nicht

    Local $s_Username = "shizosabach"

    Local $s_Password = "ttest"



    Local $s_LocalFile = $CmdLine[1]

        $Split = StringSplit($CmdLine[1],"\")

    Local $s_RemoteFile = "/Pics/" & $Split[$Split[0]]

    Local $i_Passive = 0

    Local $l_InternetSession, $l_FTPSession, $errOpen, $errFTP



    $l_InternetSession = _FTP_Open('AuoItZilla') ;Öffnet eine FTP Sitzung

    $errOpen = @error

    If Not @error Then

        $l_FTPSession = _FTP_Connect($l_InternetSession, $s_ServerName, $s_Username, $s_Password, $i_Passive) ;Verbindet zu einem FTP Server

        $errFTP = @error

        If Not @error Then

            If  _FTP_ProgressUpload($l_FTPSession, $s_LocalFile, $s_RemoteFile) Then

                ConsoleWrite("Upload: erfolgreich" & @CRLF)

                         EndIf

                  EndIf

                  EndIf

EndFunc   ;==>_example1