Dein Fehler liegt hier:
$Heimatsystem = _IETableWriteToArray ($oTable, True)
[/autoit]
Entweder existiert die Tabelle nicht, oder aber die Zeile existiert nicht und $lastnumber liegt ausserhalb des Arrays
Wenn es immer die letzte Zeile des Array sein soll würde ich anstatt $lastnumber
Ubound($heimatsystem)-1
[/autoit]
benutzen 
//Edit: grml warst du schon wieder schneller 
öhhm genau so mache ich das ja 
auch wenn das jetzt vllt nicht hier rein passt... aber wie habt ihr das mit dem updaten gelöst?
Ich hab das mit ner Ini gemacht... d.h. mein "altes" programm schreibt eine .ini mit allen wichtigen settings. Mein "altes" Programm hat dann quasi eine updatefunktion (udf von mir):
1. Lade ini runter und schaue nach ob Version bla > bla
2. wenn ja mache unter @tempdir eine ini datei mit allen settings
3. lade die update.exe runter (300kb oder so^^)
4. Führe die update.exe aus & Exit
Update.exe:
Liest die ini aus @tempdir
Z.b. gibt es in ini eine section copy wenn das prg z.B. mehrere Dateien benötigt als nur die exe selbst
[settings]
[infos]
Hier stehen informationen die während des Updatevorgangs angezeigt werden
Wenn es die ini datei abgehandelt hat startet es die neue version meines programmes 
Mich würde jetzt mal interessieren wie ihr des so gemacht habt... Vorteil von meinem: zumindest meine Programme haben nur EINE Updatefunktion und benötigen nur diese EINE update.exe
und wenn du keine UDF nehmen willst schreibst du entweder mi FileWriteLine eine Batchdatei die du dann ausführst oder du machst alle befehle mit Run(/C & @COMSPEC &"blabla")
DOS/CMD kann man nämlich auch als FTP-Transfer console benutzen
kann man auch direkt dieses beispiel benutzen:
Ich möchte jetzt das GUICtrlUpDown so benutzen das es nicht + oder - 1 dazu oder abzieht sondern z.B. +20 oder -20
Mit
GUICtrlSetOnEvent($updown, "updown")
Func updown()
GUICtrlSetData($input, GUICtrlRead($input)+20)
EndFunc
Macht er dann wenn man auf den oberen Pfeil klickt +21 und wenn man auf den unteren klickt +19... ich weiß also nicht wie ich hier noch die Pfeile selbst definieren kann...
Hey ho,
wie kann ich definieren wie hoch das GUICtrlCreateUpDown countet? ich hätte gerne +20 bzw. -20...
mit GUICtrlSetOnEvent macht er halt immer +20 egal auf welchen pfeil man drückt... Kann man da was mit der @GUI_CtrlID machen?
ich habs mit 0 - 5 ausprobiert da isses nix... mit AutoItWindowInfo komm ich aunet weiter und googlen irgendwie aunet
THX 4 all help
bisher einfach nur so gemacht ohne msg loop:
While 1
If GUICtrlRead($combo) <> "" Then
mache irgendwas damit
EndIF
WEnd
blub,
habs schon selbst rausgefunden, mal wieder zu kompliziert gedenkt :D, man kann ja einfach:
$combo = GUICtrlCreateCombo(usw. usw.)
GUICtrlSetOnEvent($combo, "funktion")
das is eig. genau das was ich gesucht habe, dachte nur nicht das es so funktioniert
MFG FireFlyer
Hiho,
sagt mal gibt es eine Funktion bzw. einen State womit ich abfragen kann ob die ComboBox offen oder geschlossen ist? Es geht darum, ich lese die ComboBox per schleife aus und sobald da natürlich irgendwas ausgewählt wurde (nur markiert noch nicht angeklickt) wird der befehl schon ausgeführt... da ich relativ langsame user habe geht das nicht also meine idee: Die ComboBox nur auslesen wenn der State=geschlossen ist... oder so
THX 4 ALL HELP
MFG FireFlyer
nix sonst würd ich das ja sagen
es geht einfach
ich hab aber 3.2.10.0 ätsch und bei mir gehts trotzdem xD
hä ging aber auch ohne combobox.... hat sich nix geändert... in der Hilfe steht auch nix davon aber wurscht, mich störts net
DANKE XENO, ICH LIEBE DICH 
xD cool die Funktion hab ich jetzt noch nie gesehn wiso hast du des im yahtzee script net auso gemacht?
und für was #include<ComboConstants.au3> ???
Aber Danke schonmal
wahhh krass
aber warum geht das mit den Inputs nicht? also jetzt bei meinem script?
Hallo ich hab mal ne Frage die wohl an XenoBiologist (Mega) geht ich wollte einfach mal seine geile DLLCall Funktion von seinem Yahtzee-Spiel in mein Script einbauen was auch Funktioniert, nur net komplett
Und zwar wird die GUI-Beim einblenden zwar eingeblendet aber 2 Inputs nicht... bzw. erst wenn der einblendevorgang schon abgeschlossen ist...
Woran liegt denn das?
Hier mal mein Script Das ausblenden Funktioniert perfekt
Hier mal noch die Kompelierte version (damit ihr auch die schönen Bildchen habt :D) http://fire.public-enemy-clan.de/awfl_demos2.exe
#include <GUIConstants.au3>
#include <Process.au3>
AutoItSetOption("GUIOnEventMode", 1)
AutoItSetOption("TrayIconHide", 1)
$options = 1231234123
$input1 = 123149
$input2 = 12314123
FileDelete(@TempDir & "\liste.lst")
$regread = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Applications\WinRAR.exe\shell\open\command", "")
FileInstall( "C:\Hilfe.txt", @TempDir&"\Hilfe.txt")
FileInstall( "C:\awfl.jpg", @TempDir&"\awfl.jpg")
SplashImageOn("Splash Screen", @TempDir&"\awfl.jpg",644,173, Default, Default, 3)
Sleep(2000)
SplashOff()
$gui = GUICreate("AWFL Screenshot/Demo Uploader", 300, 230, Default, Default, Default, $WS_EX_ACCEPTFILES)
$edit = GUICtrlCreateList("", 10, 70, 280, 130)
$button = GUICtrlCreateButton("Demos hochladen", 10, 200, 100, 20)
$clear = GUICtrlCreateButton("Clear Edit", 120, 40, 60, 20)
$datei = GUICtrlCreateButton("Datei öffnen", 10, 40, 80, 20)
$input2 = GUICtrlCreateInput("Name", 210, 40, 80, 20)
$matchlink_input = GUICtrlCreateInput("Matchlink", 10, 10, 280, 20)
GUICtrlSetState($edit, $GUI_DROPACCEPTED)
GUISetOnEvent($GUI_EVENT_CLOSE, "GUI_exit")
GUICtrlSetOnEvent($button, "read")
GUICtrlSetOnEvent($clear, "clear")
GUICtrlSetOnEvent($datei, "gui_create")
sleep(200)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $gui, "int", 1000, "long", 0x00080000)
GUISetState(@SW_SHOW)
$gui_anzeigen = 22394219387412934
$file = 1231023012730
$combo = 1332141234
$b1 = 123123213
$b2 = 2307123891
$gui_2 = 123123123
$rarfile = 2139109238
GUISetHelp("notepad "&@TempDir&"\Hilfe.txt")
Func gui_create()
Global $file = FileOpenDialog("Screenshot / Demo auswählen", "", "Screenshots (*.bmp)|CS-Demos (*.dem)")
If $file = "" Then
Return(0)
EndIf
Global $gui_2 = GUICreate("Demo/Screenshot hinzufügen", 300, 100)
Global $combo = GUICtrlCreateCombo("Map wählen", 10, 5, Default, Default, $CBS_DROPDOWNLIST)
GUICtrlSetData($combo, "de_airstrip|de_aztec|de_cbble|de_chateau|de_dust|de_dust2|de_inferno|de_nuke|de_piranesi|de_prodigy|de_storm|de_survivor|de_torn|de_train|de_tuscan|de_vertigo")
GUICtrlCreateLabel("Team:", 10, 33)
Global $b1 = GUICtrlCreateRadio("Counter-Terrorist", 50, 30, 100)
Global $b2 = GUICtrlCreateRadio("Terrorist", 150, 30, 100)
Global $ok = GUICtrlCreateButton( "OK", 10, 70)
Global $not = GUICtrlCreateButton( "Abbrechen", 40, 70)
GUICtrlSetOnEvent($ok, "ok")
GUICtrlSetOnEvent($not, "gui_close")
GUISetOnEvent($GUI_EVENT_CLOSE, "gui_close")
If StringRight($file, 3) = "bmp" Then
$anzeigen = GUICtrlCreateButton("Screenshot anzeigen", 190, 70)
EndIf
If StringRight($file, 3) = "bmp" Then
GUICtrlSetOnEvent($anzeigen, "screenshot_anzeigen")
EndIf
GUISetHelp("notepad "&@TempDir&"\Hilfe.txt")
GUISetState(@SW_SHOW)
EndFunc
Func gui_close()
GUISetState(@SW_HIDE, $gui_2)
EndFunc
Func ok()
Global $map = StringMid(GUICtrlRead($combo), 4)
Global $b11 = GUICtrlRead($b1)
Global $b21 = GUICtrlRead($b2)
If $map = " wählen" Then
MsgBox(0, "Error", "Bitte zuerst Map auswählen")
Return(0)
EndIf
If $b11 = $GUI_UNCHECKED And $b21 = $GUI_UNCHECKED Then
MsgBox(0, "Error", "Bitte zuerst Team wählen")
Return(0)
EndIf
If $b11 = $GUI_CHECKED Then
$seite = "ct"
Else
$seite = "t"
EndIf
$filename = $map&"_"&$seite&StringRight($file, 4) ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>FILENAME!!!!
For $t = 2 To 20
If FileExists("C:\"&$filename) <> 0 Then
$filename = $map&"_"&$seite&"_"&$t&StringRight($file, 4) ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>FILENAME!!!!
Else
ExitLoop
EndIf
Next
GUICtrlSetData($edit, $filename)
FileCopy($file, "C:\"&$filename)
FileWriteLine(@TempDir & "\liste.lst", "C:\"&$filename)
GUISetState(@SW_HIDE, $gui_2)
EndFunc
Func screenshot_anzeigen()
$gui_anzeigen = GUICreate( $file, 700, 560)
GUICtrlCreatePic( $file, 0, 0, 700, 525)
$exit = GUICtrlCreateButton( "EXIT", 10, 530, 680, 25)
GUICtrlSetOnEvent($exit, "schliessen")
GUISetOnEvent($GUI_EVENT_CLOSE, "schliessen")
GUISetHelp("notepad "&@TempDir&"\Hilfe.txt")
GUISetState(@SW_SHOW)
EndFunc
Func schliessen()
GUISetState(@SW_HIDE, $gui_anzeigen)
EndFunc
Func clear()
For $r = 1 To 100
$read3 = FileReadLine(@TempDir & "\liste.lst", $r)
If $read3 = "" Then
ExitLoop
EndIf
FileDelete($read3)
Next
FileDelete(@TempDir & "\liste.lst")
GUICtrlSetData($edit, "")
EndFunc ;==>clear
Func cancel()
GUISetState(@SW_HIDE, $options)
EndFunc ;==>cancel
Func read()
$matchlink = GUICtrlRead($matchlink_input)
If StringMid($matchlink,29, 4) <> "liga" Then
MsgBox(0, "Error", "Matchlink Falsch!")
Return(0)
EndIf
$matchsplit = StringSplit($matchlink, "/")
$length = StringLen($matchsplit[4])
Select
Case $length = 17
$liga = "oldskill"
Case $length = 18
$liga = "liga2on2"
Case Else
$liga = StringMid($matchsplit[4],10, 5) ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>LIGA!!!!
EndSelect
If GUICtrlRead($input2) = "" Or GUICtrlRead($input2) = "Name" Then
MsgBox(0, "Error", "Bitte zuerst Namen eingeben")
return(0)
EndIf
$name = GUICtrlRead($input2)
$string1 = StringInStr(GUICtrlRead($input2), "\")
$string2 = StringInStr(GUICtrlRead($input2), "/")
$string3 = StringInStr(GUICtrlRead($input2), ":")
$string4 = StringInStr(GUICtrlRead($input2), "*")
$string5 = StringInStr(GUICtrlRead($input2), "?")
$string6 = StringInStr(GUICtrlRead($input2), '"')
$string7 = StringInStr(GUICtrlRead($input2), "<")
$string8 = StringInStr(GUICtrlRead($input2), ">")
$string9 = StringInStr(GUICtrlRead($input2), "|")
If $string1 <> 0 Or $string2 <> 0 Or $string3 <> 0 Or $string4 <> 0 Or $string5 <> 0 Or $string6 <> 0 Or $string7 <> 0 Or $string8 <> 0 Or $string9 <> 0 Then
MsgBox(0, "Error", 'Folgende Sonderzeichen sind nicht erlaubt:'&@CRLF&'\ / : * ? " < > |')
Return(0)
EndIf
IF FileExists(@TempDir & "\liste.lst") = 0 Then
MsgBox(0, "Error", "Bitte erst Dateien hinzufügen")
Return(0)
EndIf
For $i = 1 To 30
$read = FileReadLine(@TempDir & "\liste.lst", $i)
If $read = "" Then
$read = FileReadLine(@TempDir & "\liste.lst", $i-1)
ExitLoop
EndIf
If StringRight($read, 4) <> ".dem" And StringRight($read, 4) <> ".bmp" Then
MsgBox(0, "Error", "Falsches Format, entweder bmp oder dem benutzen")
return(0)
EndIf
If $i > 1 Then
$read2 = FileReadLine(@TempDir & "\liste.lst", $i-1)
If StringRight($read, 4) <> StringRight($read2, 4) Then
MsgBox(0, "Error", "Bitte nur ein Format benutzen, entweder .dem oder .bmp")
return(0)
EndIf
EndIf
Next
Select
Case StringRight($read, 4) = ".bmp"
$gr = "sc"
Case StringRight($read, 4) = ".dem"
$gr = "pl"
Case Else
$gr = "ka"
EndSelect
If FileExists(StringMid(StringLeft($regread, StringLen($regread)-6), 2)) Then
FileDelete("C:\ftpupload.ftp")
FileWriteLine("C:\ftpupload.ftp", "open fire.public-enemy-clan.de")
FileWriteLine("C:\ftpupload.ftp", "********")
FileWriteLine("C:\ftpupload.ftp", "********")
FileWriteLine("C:\ftpupload.ftp", "cd httpdocs")
FileWriteLine("C:\ftpupload.ftp", "cd AWFL")
FileWriteLine("C:\ftpupload.ftp", "cd "&$liga)
FileWriteLine("C:\ftpupload.ftp", "BINARY")
$rarfile = StringMid($matchsplit[5], 22)&"_"&$gr&"_"&StringLower($name)&".rar" ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>RARFILENAME!!!!
FileWriteLine("C:\ftpupload.ftp", "put C:\Spiel"&$rarfile)
FileWriteLine("C:\ftpupload.ftp", "bye")
RunWait(StringMid(StringLeft($regread, StringLen($regread)-6), 2)&" A -ep1 -s -m5 C:\Spiel"&$rarfile&" @" & @TempDir & "\liste.lst")
sleep(1000)
$gui_progress = GUICreate("Uploading", 240, 30, Default, Default, $WS_CAPTION)
$progress = GUICtrlCreateProgress(5, 5, 200, 20)
$progress2 = GUICtrlCreateLabel( "", 210, 7, 50, 15)
GUISetState(@SW_SHOW)
Run(@ComSpec & " /c " & 'ftp -s:C:\ftpupload.ftp', "", @SW_HIDE)
$file = FileGetSize("C:\Spiel"&$rarfile)
$fertig = False
While $fertig = False
$size2 = InetGetSize("http://fire.public-enemy-clan.de/AWFL/"&$liga&"/Spiel"&$rarfile) / $file
$size = $size2 * 100
$split = StringSplit($size, ".")
GUICtrlSetData($progress, $size)
GUICtrlSetData($progress2, $split[1]&" %")
If $size > 99.99 Then
sleep(500)
$fertig = True
GUISetState(@SW_HIDE, $gui_progress)
ExitLoop
EndIf
WEnd
FileDelete(@TempDir&"\Hilfe.txt")
FileDelete("C:\ftpupload.ftp")
FileDelete("C:\Spiel"&$rarfile)
For $r = 1 To 100
$read3 = FileReadLine(@TempDir & "\liste.lst", $r)
If $read3 = "" Then
ExitLoop
EndIf
FileDelete($read3)
Next
FileDelete(@TempDir & "\liste.lst")
GUICtrlSetData($matchlink_input, "http://fire.public-enemy-clan.de/AWFL/"&$liga&"/Spiel"&$rarfile)
GUICtrlSetData($edit, "")
MsgBox(0, "Success", "Datei wurde erfolgreich hochgeladen")
Else
MsgBox(0, "Error", "WinRAR wurde nicht gefunden")
EndIf
EndFunc ;==>read
Func GUI_exit()
FileDelete(@TempDir&"\Hilfe.txt")
FileDelete("C:\ftpupload.ftp")
FileDelete("C:\Spiel"&$rarfile)
For $r = 1 To 100
$read3 = FileReadLine(@TempDir & "\liste.lst", $r)
If $read3 = "" Then
ExitLoop
EndIf
FileDelete($read3)
Next
FileDelete(@TempDir & "\liste.lst")
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $gui, "int", 1500, "long", 0x00090000)
Exit
EndFunc ;==>GUI_exit
While 1
WEnd
Danke für eure Hilfe
@xeno woher weisst du wie solche dllcall funktionen aussehen müssen damit die sachen passieren?
genau die von oben nach unten ;D
nur ohne den [ ]
FTP automatisieren:
Befehle:open ... Öffnet die FTP-Verbindung; benötigt: Server, Benutzername und Paßwort
put ... sendet eine Datei
get ... lädt eine Datei herunter
lcd ... Verzeichnis am Rechner wechseln
cd ... Verzeichis am Server wechseln
bye ... beendet die FTP-VerbindungFür Bild- und Programmdateien musst du den Binär-Modus verwenden, für Text-Dateien den ASCII-Modus.
Beispiel:
OPEN https://autoit.de/www.ftpserver.at
benutzername
passwortCD html
ASCII
PUT C:\eigene~1\homepage\index.htm
CD ..CD bilder
BINARY
put C:\eigene~1\homepage\bilder\bild.gif bild.gif
byeErläuterung: die Datei öffnet die FTP-Verbindung, wechselt in den ASCII- Modus (für Text-Dateien);
kopiert alle Datei index.htm auf den Server;
wechselt dann am Rechner in das Bildverzeichnis, schaltet in den BINARY - Modus und sendet die bild.gif- Datei!das ganze speicherst du am besten in einer .ftp- datei, diese wird dann mit einer Batchdatei folgendermassen aufgerufen:
Batchdateiaufruf:
ftp -s:dieftpdatei.ftp
naja erst
open [server]
[username]
[password]
cd [dir] auf dem FTP changen
put [file] datei hochladen
bye
fertig^^
so für alle dies interessiert mein fertiges Programm
es wird zwar winrar benötigt aber dann ;D
#include <GUIConstants.au3>
#include <Process.au3>
AutoItSetOption("GUIOnEventMode", 1)
AutoItSetOption("TrayIconHide", 1)
$options = 1231234123
$input1 = 123149
$input2 = 12314123
If FileExists(@ScriptDir & "\options.opt") Then
$pathwinrar = FileReadLine(@ScriptDir & "\options.opt", 1)
$name = FileReadLine(@ScriptDir & "\options.opt", 2)
Else
FileWriteLine(@ScriptDir & "\options.opt", "C:\Programme\WinRar\")
FileWriteLine(@ScriptDir & "\options.opt", "Name")
$pathwinrar = FileReadLine(@ScriptDir & "\options.opt", 1)
$name = FileReadLine(@ScriptDir & "\options.opt", 2)
EndIf
GUICreate("Demos Packen", 300, 200, Default, Default, Default, $WS_EX_ACCEPTFILES)
$edit = GUICtrlCreateEdit("", 10, 50, 280, 100, $ES_READONLY)
GUICtrlSetBkColor($edit, 0xFFFFFF)
$button = GUICtrlCreateButton("...", 10, 170, 30, 20)
$optionen = GUICtrlCreateButton("Optionen", 220, 10, 70, 20)
GUICtrlCreateLabel("Spieltag:", 10, 12)
$spieltag = GUICtrlCreateInput("", 60, 10, 40, 20)
$updown = GUICtrlCreateUpdown($spieltag)
$clear = GUICtrlCreateButton("Clear Edit", 120, 10, 60, 20)
GUICtrlSetState($edit, $GUI_DROPACCEPTED)
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "GUI_exit")
GUICtrlSetOnEvent($button, "read")
GUICtrlSetOnEvent($optionen, "options")
GUICtrlSetOnEvent($clear, "clear")
Func clear()
GUICtrlSetData($edit, "")
EndFunc ;==>clear
Func options()
If FileExists(@ScriptDir & "\options.opt") Then
$pathwinrar = FileReadLine(@ScriptDir & "\options.opt", 1)
$name = FileReadLine(@ScriptDir & "\options.opt", 2)
Else
FileWriteLine(@ScriptDir & "\options.opt", "C:\Programme\WinRar\")
FileWriteLine(@ScriptDir & "\options.opt", "Name")
$pathwinrar = FileReadLine(@ScriptDir & "\options.opt", 1)
$name = FileReadLine(@ScriptDir & "\options.opt", 2)
EndIf
$options = GUICreate("Optionen", 220, 100)
$input1 = GUICtrlCreateInput($pathwinrar, 10, 10, 150, 20)
$input2 = GUICtrlCreateInput($name, 10, 40, 150, 20)
$button2 = GUICtrlCreateButton("...", 180, 10, 20, 20)
$button3 = GUICtrlCreateButton("Save", 10, 70, 50, 20)
$button4 = GUICtrlCreateButton("Cancel", 150, 70, 50, 20)
GUICtrlSetOnEvent($button2, "dialog")
GUICtrlSetOnEvent($button3, "save")
GUICtrlSetOnEvent($button4, "cancel")
GUISetState(@SW_SHOW, $options)
EndFunc ;==>options
Func save()
FileDelete(@ScriptDir & "\options.opt")
FileWriteLine(@ScriptDir & "\options.opt", GUICtrlRead($input1))
FileWriteLine(@ScriptDir & "\options.opt", GUICtrlRead($input2))
GUISetState(@SW_HIDE, $options)
EndFunc ;==>save
Func dialog()
$dialog = FileSelectFolder("Choose your WinRAR folder", "")
GUICtrlSetData($input1, $dialog)
EndFunc ;==>dialog
Func cancel()
GUISetState(@SW_HIDE, $options)
EndFunc ;==>cancel
Func read()
$pathwinrar = FileReadLine(@ScriptDir & "\options.opt", 1)
$name = FileReadLine(@ScriptDir & "\options.opt", 2)
FileDelete(@TempDir & "\liste.lst")
FileWrite(@TempDir & "\liste.lst", GUICtrlRead($edit))
If FileExists($pathwinrar & "\WinRAR.exe") Then
FileDelete("C:\ftpupload.ftp")
FileWriteLine("C:\ftpupload.ftp", "open fire.public-enemy-clan.de")
FileWriteLine("C:\ftpupload.ftp", "**************")
FileWriteLine("C:\ftpupload.ftp", "**************")
FileWriteLine("C:\ftpupload.ftp", "cd httpdocs")
FileWriteLine("C:\ftpupload.ftp", "cd Demos")
FileWriteLine("C:\ftpupload.ftp", "cd awfl"&GUICtrlRead($spieltag))
FileWriteLine("C:\ftpupload.ftp", "BINARY")
FileWriteLine("C:\ftpupload.ftp", "put C:\awfl"&GUICtrlRead($spieltag)&"_pl_"&StringLower($name)&".rar")
FileWriteLine("C:\ftpupload.ftp", "bye")
RunWait($pathwinrar & "\WinRAR.exe A -ep1 -s -m5 C:\awfl" & GUICtrlRead($spieltag) & "_pl_" & StringLower($name) & ".rar @" & @TempDir & "\liste.lst")
sleep(1000)
RunWait(@ComSpec & " /c " & 'ftp -s:C:\ftpupload.ftp')
FileDelete("C:\ftpupload.ftp")
FileDelete("C:\awfl"&GUICtrlRead($spieltag)&"_pl_"&StringLower($name)&".rar")
MsgBox(0, "Success", "Datei wurde erfolgreich hochgeladen")
Else
MsgBox(0, "Error", "WinRAR wurde nicht gefunden")
EndIf
EndFunc ;==>read
Func GUI_exit()
Exit
EndFunc ;==>GUI_exit
While 1
WEnd
lol,
hab was gefunden man kann das ja per CMD machen^^
allerdings habe ich (manuell) probleme das kennwort einzugeben 
1. ich gebe ftp ein
2. ich gebe open fire.public-enemy-clan.de ein
3. er fragt nach Benutzername: ftpfire eingeben
4. er fragt nach einem Kennwort, ich kann nix mehr eingeben?... Fehler oder sowas?
entweder mit GUIGetMsg oder mit GUICtrlSetOnEvent... Hilfe nachlesen bzw. die Tutorials machen
