Linksklick Ö_Ö

#Region ### START Koda GUI section ### Form=
$FORM1=GUICREATE("Form1",520,394,193,115)
$INPUT1=GUICTRLCREATEINPUT("",24,88,129,21)
$INPUT2=GUICTRLCREATEINPUT("",184,88,129,21)
$INPUT3=GUICTRLCREATEINPUT("",336,88,129,21,33)
$BUTTON1=GUICTRLCREATEBUTTON("Button1",184,320,89, 25,0)
$BUTTON2=GUICTRLCREATEBUTTON("Button1",64,320,89,2 5,0)
$BUTTON3=GUICTRLCREATEBUTTON("Button3",304,320,89, 25,0)
$VERBINDEN=GUICTRLCREATEBUTTON("Verbinden",110,130 ,89,25,0)
$LABEL1=GUICTRLCREATELABEL("Servername",24,64,60,1 7)
$LABEL2=GUICTRLCREATELABEL("Benutzername",192,64,7 0,17)
$LABEL2=GUICTRLCREATELABEL("Passwort",336,64,70,17 )
GUISETSTATE(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
WHILE 1
$IMSG=GUIGETMSG()
$NMSG=GUIGETMSG()
SWITCH $NMSG
CASE $GUI_EVENT_CLOSE
EXIT
CASE $HFILESEL
CASE $BUTTON1
CASE $BUTTON2
CASE $BUTTON3
CASE $VERBINDEN
$GSERVER=GUICTRLREAD($INPUT1)
$GID=GUICTRLREAD($INPUT2)
$GPW=GUICTRLREAD($INPUT3)
$OPEN=_FTPOPEN("Was hier steht ist egal")
$CONN=_FTPCONNECT($OPEN,$GSERVER,$GID,$GPW)
IF @ERROR THEN
TRAYTIP("Error","Es konnte kein Verbindung hergestellt werden",5,7)
FILEOPENDIALOG("Select file:","::{20D04FE0-3AEA-1069-A2D8-08002B30309D}","All (*.*)")
ELSE
TRAYTIP("Verbingung","Verbindung erfolgreich hergestellt mit "&$GSERVER,5,1)
$HFILESEL=GUICTRLCREATEBUTTON("...",350,230,50,30)
$TRENNEN=GUICTRLCREATEBUTTON("Trennen",260,130,89, 25,0)
GUICTRLCREATELABEL("Dateu uploaden")
GUISETSTATE()
ENDIF
ENDSWITCH
WEND