help me pls ...

#include 
#include 
#include 
#include 
#include 
#include 
#include 



$Form1 = GUICreate("FileZilla by C0dex", 643, 631, 192, 124)
$Nick = GUICtrlCreateInput("Nick", 8, 8, 169, 25)
GUICtrlSetFont(-1, 9, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$password = GUICtrlCreateInput("Password", 192, 8, 169, 25, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
GUICtrlSetFont(-1, 9, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$Server = GUICtrlCreateInput("Server", 384, 8, 169, 25)
GUICtrlSetFont(-1, 9, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$connect = GUICtrlCreateButton("Connect", 560, 8, 75, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
$Group1 = GUICtrlCreateGroup("Update File :", 8, 48, 625, 57)
GUICtrlSetFont(-1, 9, 800, 0, "Palatino Linotype")
$up = GUICtrlCreateInput("Upload", 16, 72, 169, 25)
$Filedirectory= GUICtrlCreateInput("File Directory Server", 200, 72, 201, 25)
$upload = GUICtrlCreateButton("Upload", 416, 72, 83, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
$dir = GUICtrlCreateButton("Chosen Dir", 528, 72, 91, 25)
GUICtrlSetFont(-1, 9, 800, 0, "Palatino Linotype")
$Group2 = GUICtrlCreateGroup("Delete a File", 8, 112, 345, 65)
GUICtrlSetFont(-1, 9, 800, 0, "Palatino Linotype")
$del = GUICtrlCreateInput("Delete Directory Server", 24, 136, 233, 25)
$delete = GUICtrlCreateButton("Delete", 264, 136, 75, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
$Group3 = GUICtrlCreateGroup("Server File Status", 360, 120, 273, 57)
GUICtrlSetFont(-1, 9, 800, 0, "Palatino Linotype")
$Input4 = GUICtrlCreateInput("Path of server", 368, 144, 185, 25)
$Button5 = GUICtrlCreateButton("Refresh", 560, 144, 67, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
$TreeView1 = GUICtrlCreateTreeView(8, 184, 625, 441)
GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $connect
$nick=GUICtrlRead($Nick)
$password=GUICtrlRead($password)
$server=GUICtrlRead($server)
$oFTP=_FTP_Open ("oFTP")
$cFTP=_FTP_Connect ($oFTP,$server,$nick,$password)

Case $dir
Local $message = "Press Ctrl or Shift to choose multiple files."
Local $var = FileOpenDialog($message, @DocumentsCommonDir & "\", "*.*")
If @error Then
MsgBox(4096, "", "No File chosen")
Else
Global $DirForUpdate = StringReplace($var, "|", @CRLF)
MsgBox(4096, "", "You chose " & $var)
EndIf
GUICtrlSetData($Up,$DirForUpdate)
Case $upload
$Fdir=GUICtrlRead($Filedirectory)
$pFTP=_FTP_FilePut($cFTP,GUICtrlRead($Up),$Fdir)

Case $delete
$s_RemoteFile=GUICtrlRead($Del)
_FTP_FileDelete($cFTP, $Filedirectory)




EndSwitch
WEnd