Beiträge von autoBert

**autoBert**

Hallo basementmedia,

da die meisten Porogramme ja die geöffnete Datei mit im Titel haben kannst du bei diesen

[autoit]

#Include <String.au3>
$aVars= WinList("[ACTIVE]")
$aPath = _StringBetween($aVars[1][0],""," -")
ConsoleWrite($aPath[0]&@CRLF)

[/autoit]

die geöffnete Datei heruasfinden. Ist die Angabe wie bei Scite ein kompletter Pfad bist du schon fertig, ansonsten musst du mit einer rekursiven Suche die Datei auf deiner Festplatte suchen (hoffentlich gibt es sie nur einmal). Es gibt sicher auch noch andere Wege z.B über den gefunden Fenstertitel den Prozess bestimmen und dann mit _WinApi-Funktionen versuchen die Datei herauszufinden,

mfg autoBert

**autoBert**

Hallo Chrys,

durch benutzen anderer STile beim erstellen des Childs:

Spoiler anzeigen

[autoit]

#include <WindowsConstants.au3>
#include <GuiConstantsEx.au3>

[/autoit] [autoit][/autoit] [autoit]

$parent = GUICreate("Form1", 688, 466, 192, 124)
GUICtrlCreateLabel("Parent", 176, 10, 35, 17)
GUICtrlCreateButton("Test",10,10)

[/autoit] [autoit][/autoit] [autoit]

$child = GUICreate("", 668, 406, 10, 50, $WS_CHILD, Default, $parent)
GUISetBkColor(0xc0d8f1)
GUICtrlCreateLabel("Child", 176, 64, 35, 17)
GUICtrlCreateButton("Test2",10,10)

[/autoit] [autoit][/autoit] [autoit]

GUISetState(@SW_SHOW, $parent)
GUISetState(@SW_SHOW, $child)

[/autoit] [autoit][/autoit] [autoit]

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

[/autoit] [autoit][/autoit] [autoit]

EndSwitch
WEnd

[/autoit]

klappt es zumindest unter Win XP3,

mfg autoBert

**autoBert**

Hallo Entsel,

schau dir mal meinen Muni-URL-Manager (Link in Signatur) an, da kannst du sehen wie Comboboxen befüllt werden und man auch neue Einträge hinzufügen kann,

mfg autoBert

**autoBert**

Bist du dir denn sicher, dass die Verbindung vom Server getrennt wird und es nicht durch die fehlerhafte Version von _FTP_FileList_Rekursiv kommt. Nimm die überarbeitete Version FTP_FileList_RecursivWA.au3 aus dem Anhang von [Beispiel] FTP-Downloader (rekursiv mit allen Unterverzeichnissen) Schau dir auch noch einmal das Beispiel DEMO_FTP_FileList_RecursivWA.au3 ich habe dort die Fehlermeldung für den speziellen Fall, dass es sich um einen MountPoint handelt ergänzt,

mfg autoBert

**autoBert**

Zitat von Zattoo

...hätte er herunterladen müssen... <- dh da ist etwas falsch?

ich weis nicht wie dein Root-Verzeichnis ausschaut, wenn sich darin nur Ordner befinden ist dies fürdas Rootverzeichnis in Ordnung. Aber noch einmal:

Zitat von autoBert

du hast vergessen die Routine _createLocalDirIfNecessary zu verwenden, aber zumindest die Dateien im FTP-Rootverzeichnis hätte er herunterladen müssen.

d.h. für die Dateien die sich in Ordnern (oder deren Unterordner) des Roots befinden ist es ein Fehler, der verursacht wird durch Fehlen und verwenden von _createLocalDirIfNecessary. Wie man an der Funktionsbeschreibung:

Zitat

;===============================================================================
; Function Name: _createLocalDirIfNecessary($s_LocalFile)
; Description:: prüft ob für eine Datei die Verzeichnisstruktur besteht, falls nötig wird diese angelegt
; Parameter(s): $s_LocalFile Dateiname für den die Verzeichnisstruktur geprüft werden soll
; Autor(s): AutoBert (https://autoit.de/www.autoit.de)
; zur freien Benutzung in eigenen Skripten und auch zur freien Weitergabe unter der Vorgabe,
; dass diese Funktionsbeschreibumg inkl. Autor nicht enfernt wird
;===============================================================================

Alles anzeigen

erkennen kann ist diese Func dafür zuständig vor dem Download zu prüfem ob die (lokale) Verzeichnisstruktur besteht denn ohne ein existierendes Zielverzeichnis muss _FTP_FileGet scheitern. In [Beispiel] FTP-Downloader (rekursiv mit allen Unterverzeichnissen) habe ich auch Dateien angehängt, die auch unter 3.3.8.1 (welches du anscheindend benutzt) laufen. Du benötigst die beiden Dateien mit WA am Ende. Starte die Demo im Originalzustand und du siehst dass es funktioniert, plane etwas Zeit ein denn es sind afair > 1 GB die heruntergeladen werden . Sollte wieder Erwarten ein Fehler kommen, poste bitte dort die Ausgabe deiner Scitekonsole, Danach trägst du die Zugangsdaten zu deinem Server und deine Pfade ein und testet es mit deinem Webspace, auch hier gilt Fehlermeldungen einstellen si denn welche kommen,

mfg autoBert

**autoBert**

Hallo Com.

da es immer wieder Fragen zum FTP-Download eines ganzen Ordner gubt habe ich ein Beispielskript dafür erstellt.

Achtung: läuft unter 3.3.6.1 Benutzer von 3.3.8.1 können anhand von Bekannte Bugs in 3.3.8.1? erkennen was sie ändern müssen damit es auch darunter läuft. Bzw. sie nutzen den WorkArround aus dem Anhang, mehr Komfort bietet aber die Originalversion.

die nötigen Funktionen habe ich in FTP_FileList_Recursiv.au3 ausgelagert. Diese UDF beinhaltet:

_getAllFTPFilesRekursiv: lädt einen bestimmten Ordner inkl. aller Unterverzeichnisse herunter
_createLocalDirIfNecessary prüft ob für eine Datei die lokale Verzeichnisstruktur besteht, falls nötig wird diese angelegt
_FTP_FileList_Rekursiv2D füllt ein Array mit Dateien (und Verzeichnissen wenn $bFolders true) des FTP-Pfades inkl. aller Unterverzeichnisse auch die Dateigrösse wird eingetragen
_FTP_FileList_Rekursiv füllt ein Array mit Dateien (und Verzeichnissen wenn $bFolders true) des FTP-Pfades inkl. aller Unterverzeichnisse. Diese Funktion sammelt die Daten und wird von _FTP_FileList_Rekursiv2D aufgerufen, welche dann die Daten in Pfad und Grösse splittet. Sie kann aber auch einzeln aufgerufen werden. Die darin verwendetete Func [autoit]_Ftp_ListToArray2D[/autoit] ist daran Schuld dass die UDF nicht unter 3.3.8.1 verwendet werden kann. Eine abgewandelte Version _FTP_FileList_RekursivWA welche auch unter 3.3.8.1 läuft findet man im ANhang, allerdings sind damit die Zusatzfeatures wie Fortschrittsanzeige nach Dateigrösse nicht realisierbar.

Sie befindet sich im Anhang. Hier das Skript:

benötigt FTP_FileList_Recursiv.au3<br>

[autoit]

#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include "FTP_FileList_Recursiv.au3"

[/autoit] [autoit][/autoit] [autoit]

;veröffentlicht unter http://www.autoit.de/index.php?page…1617#post251617

[/autoit] [autoit][/autoit] [autoit]

Opt('MustDeclareVars', 1)

[/autoit] [autoit][/autoit] [autoit]

_CreateGui()

[/autoit] [autoit][/autoit] [autoit]

Func _CreateGui()
Local $l_InternetSession = -99, $l_FTPSession
Local $errOpen, $errFTP
Local $nMsg
Global $GUI = GUICreate("FTP-Downloader", 623, 450, 271, 235)
Local $idLblLog = GUICtrlCreateEdit("", 8, 5, 467, 315, $ES_READONLY)
Local $idPrgFile = GUICtrlCreateProgress(8, 344, 598, 25)
Local $hGuiChild1 = GUICreate("Child1", 594, 21, 10, 346, $WS_POPUP, $WS_EX_MDICHILD, $GUI)
Local $idLblFilePer = GUICtrlCreateLabel("", 2, 2, 590, 17, $SS_CENTER)
GUICtrlSetFont(-1, 11, 2800)
WinSetTrans($hGuiChild1, "", 180)
GUISwitch($GUI)
Local $idLblFile = GUICtrlCreateLabel("", 8, 322, 594, 17)
Local $idPrgKB = GUICtrlCreateProgress(8, 392, 598, 25)
Local $hGuiChild2 = GUICreate("Child2", 595, 23, 10, 394, $WS_POPUP, $WS_EX_MDICHILD, $GUI)
Local $idLblKBPer = GUICtrlCreateLabel("", 2, 1, 590, 19, $SS_CENTER)
GUICtrlSetFont(-1, 11, 2800)
WinSetTrans($hGuiChild2, "", 180)
GUISwitch($GUI)
Local $idLblKB = GUICtrlCreateLabel("", 8, 372, 594, 17)
Local $idBtnConnect = GUICtrlCreateButton("&Verbinden", 483, 40) ;verbinden mit FTP-Server
Local $idBtnDisconnect = GUICtrlCreateButton("&Trennen", 483, 80) ;vom Server trennen
Local $idBtnDL = GUICtrlCreateButton("&Download", 483, 120) ;Download starten
Local $idBtnExit = GUICtrlCreateButton("Be&enden", 483, 160) ;Exit
GUICtrlSetState($idBtnDL, $GUI_DISABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_DISABLE)

[/autoit] [autoit][/autoit] [autoit]

#Region;falls aktiviert Positionen noch anpasser und Labeltext entfernen
Local $idLblColapsedTime = GUICtrlCreateLabel("", 8, 420, 400, 17)

[/autoit] [autoit][/autoit] [autoit]

Local $idLblKBperSec = GUICtrlCreateLabel("", 450, 420, 500, 17)
#EndRegion
GUISetState(@SW_SHOW, $hGuiChild1)
GUISetState(@SW_SHOW, $hGuiChild2)
GUISetState(@SW_SHOW, $GUI)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE, $idBtnExit
If $l_InternetSession <> -99 Then _FTP_Close($l_InternetSession)
Exit
Case $idBtnConnect
$l_InternetSession = _FTP_Open('AutoItZilla') ;Öffnet eine FTP Sitzung
$errOpen = @error
If Not @error Then
$l_FTPSession = _FTP_Connect($l_InternetSession, 'ftp.csx.cam.ac.uk', '', '', 0) ;Verbindet zu einem FTP Server
$errFTP = @error
If Not @error Then
GUICtrlSetState($idBtnDL, $GUI_ENABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_ENABLE)
GUICtrlSetState($idBtnConnect, $GUI_DISABLE)
Else
;MsgBox(0, "Connect", "fehlgeschlagen")
ConsoleWrite("Connect: " & " " & $errFTP & @CRLF)
EndIf
Else
;MsgBox(0, "Open", "fehlgeschlagen")
ConsoleWrite("Open " & " " & $errOpen & @CRLF)
EndIf
Case $idBtnDisconnect
_FTP_Close($l_InternetSession)
$l_InternetSession = -99
GUICtrlSetState($idBtnDL, $GUI_DISABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_DISABLE)
GUICtrlSetState($idBtnConnect, $GUI_ENABLE)
Case $idBtnDL
GUICtrlSetState($idBtnDL, $GUI_DISABLE)
GUICtrlSetState($idBtnExit, $GUI_DISABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_DISABLE)
_getAllFTPFilesRekursiv($l_FTPSession, '/', @ScriptDir & "\Temp", 1, $idPrgKB, $idLblKB, $idLblKBPer, $idPrgFile, $idLblFile, $idLblFilePer, $idLblColapsedTime, $idLblKBperSec, $idLblLog) ;<======= anpassen Remotepfad der inkl. aller Unerordner heruntergeladen werden soll
GUICtrlSetState($idBtnDL, $GUI_ENABLE)
GUICtrlSetState($idBtnExit, $GUI_ENABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_ENABLE)
EndSwitch
WEnd
EndFunc ;==>_CreateGui

[/autoit]

Und hier noch ein ScreenShot des Beispielprogrammes:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Edit4: Update auf FTP_FileList_Recursiv3.au3:

Spoiler anzeigen

[autoit]

#include-once
#include <FTPEx.au3>
#include <Array.au3>

[/autoit] [autoit][/autoit] [autoit]

;===============================================================================
; Function Name: _getAllFTPFilesRekursiv($l_FTPSession, $sRemote = "", $sLocal = @TempDir, $iMaxDepth, $iDebug = 0, $idPrgKB = 0, $idLblKB = 0, $idLblKBPer = 0, $idPrgFile = 0, $idLblFile = 0, $idLblFilePer = 0, $idLblColapsed = 0, $idLblKBperSec = 0, $idLblLog = 0)
; Description:: lädt einen bestimmten Ordner inkl. aller Unterverzeichnisse herunter
; Parameter(s): $l_FTPSession das von _FTP_Connect zurückgegebene Handle Angabe ist Pflicht
; $sRemote der FTP-Ordner der heruntergeladen werden soll optionale Angabe Leer=Rootverzeichnis
; $sLocal der loakle Ordner in dem die Dateien optionale Angabe Leer=@TempDir
; gespeichert werden sollen, die Unter-
; verzeichnisse werden angelegt
; siehe dazu _createLocalDirIfNecessary
; $iMaxDepth maximale Rekursionstiefe
; <1 = unendlich als Degault eingestellt optionale Angabe
; $iDebug sollen Debuginfos in der Scitekosole angezeigt werden? optionale Angabe
; Default = 0 = keine DebugInfos,
; 1 = Debubinfos anzeigen
; 2 = DebugInfos und ArrayDisplays
; *** folgende opt. Parameter erleichtern die Sarstellung in einer GUI ***
; *** sie sind alle mit 0 vorbelegt, d.h. kein GUI-Control wird upgedatet ***
; $idPrgKB ControldID der Progressbar (Dateigrösse) optionale Angabe
; $idLblKB " des Labels (anhand der Dateigrösse) optionale Angabe
; $idLblKBPer " des Labels für Prozent (Dateigrösse) optionale Angabe
; $idPrgFile ControldID der Progressbar (Dateianzahl) optionale Angabe
; $idLblFile " des Labels (anhand der Dateianzahl) optionale Angabe
; $idLblFilePer " des Labels für Prozent (Dateianzahl) optionale Angabe
; $idLblColapsed " des Labes für benötigte Zeit optionale Angabe
; $idLblKBperSec " des Labels für erreichte KB/sec optionale Angabe
; $idLblLog " des Edits Logübersicht optionale Angabe
; Autor(s): AutoBert (http://www.autoit.de)
; zur freien Benutzung in eigenen Skripten und auch zur freien Weitergabe unter der Vorgabe,
; dass diese Funktionsbeschreibumg inkl. Autor nicht enfernt wird
;===============================================================================
Func _getAllFTPFilesRekursiv($l_FTPSession, $sRemote = "", $sLocal = @TempDir, $iMaxDepth=-1, $iDebug = 0, $idPrgKB = 0, $idLblKB = 0, $idLblKBPer = 0, $idPrgFile = 0, $idLblFile = 0, $idLblFilePer = 0, $idLblColapsed = 0, $idLblKBperSec = 0, $idLblLog = 0)
Local $aResult[1][2]
Local $errGet
Local $s_LocalFile
Local $iKBPer, $iFilePer, $iKB_Already, $iStart, $iSec, $sMsg, $sLog
ToolTip('Searching for files to download, please wait...') ;kann auskommentiert werden

[/autoit] [autoit][/autoit] [autoit]

If $idLblColapsed <> 0 Or $idLblKBperSec <> 0 Then $iStart = TimerInit()
_FTP_FileList_Rekursiv2D($l_FTPSession, $aResult, $sRemote, False, $iMaxDepth, $iDebug)
ToolTip('Downloading, please wait...') ;kann auskommentiert werden
For $i = 1 To $aResult[0][0]
$s_LocalFile = $sLocal & "\" & StringTrimLeft($aResult[$i][0], 1)
$s_LocalFile = StringReplace($s_LocalFile, "/", "\")
_createLocalDirIfNecessary($s_LocalFile)
If $iDebug Then ConsoleWrite("Download: " & $i & "/" & $aResult[0][0] & " :" & $aResult[$i][0] & @TAB)
If $idLblLog <> 0 Then $sLog = "Download: " & $i & "/" & $aResult[0][0] & " :" & $aResult[$i][0] & @TAB
If $idLblFile <> 0 Then GUICtrlSetData($idLblFile, $aResult[$i][0] & @TAB & $i & "/" & $aResult[0][0])
If _FTP_FileGet($l_FTPSession, $aResult[$i][0], $s_LocalFile) Then;,"_UpdateProgress") Then
$errGet = @error
If $iDebug Then ConsoleWrite("erfolgreich ")
If $idLblLog <> 0 Then $sLog &= "erfolgreich "
$iKB_Already += $aResult[$i][1]
Else
If $iDebug Then ConsoleWrite("fehlgeschlagen ")
If $idLblLog <> 0 Then $sLog &= "fehlgeschlagen "
If _FTP_DirSetCurrent($l_FTPSession, $aResult[$i][0]) Then
If $iDebug Then ConsoleWrite(" da ein Mountpoint ")
If $idLblLog <> 0 Then $sLog &= " da ein Mountpoint "
$aResult[0][1] -= $aResult[$i][1] ;kein Fehler daher von Gesamtsumme abziehen
EndIf
EndIf
If $iDebug Then ConsoleWrite($errGet & @CRLF)
If $idLblLog <> 0 Then
$sLog &= @CRLF
GUICtrlSetData($idLblLog, GUICtrlRead($idLblLog) & $sLog)
EndIf
If $idPrgFile <> 0 Or $idLblFilePer <> 0 Then ;Prozente anhand Dateianzahl errechnen und anzeigen
$iFilePer = Int($i / $aResult[0][0] * 100)
If $idPrgFile <> 0 Then GUICtrlSetData($idPrgFile, $iFilePer)
If $idLblFilePer <> 0 Then GUICtrlSetData($idLblFilePer, $iFilePer & "%")
EndIf
If $idPrgKB <> 0 Or $idLblKBPer <> 0 Then ;Prozente anhand Grösse errechnen und anzeigen
$iKBPer = Int($iKB_Already / $aResult[0][1] * 100)
If $idPrgKB <> 0 Then GUICtrlSetData($idPrgKB, $iKBPer)
If $idLblKBPer <> 0 Then GUICtrlSetData($idLblKBPer, $iKBPer & "%")
EndIf
If $idLblKB <> 0 Then GUICtrlSetData($idLblKB, $iKB_Already & @TAB & "/" & $aResult[0][1])
;If $iDebug Then ConsoleWrite(@CRLF)
Next
If $idLblColapsed <> 0 Or $idLblKBperSec <> 0 Then
$iSec = TimerDiff($iStart) / 1000
If $idLblKBperSec <> 0 Then GUICtrlSetData($idLblKBperSec, Round($iKB_Already / 1024 / $iSec, 2) & "KB/sec")
If $idLblColapsed <> 0 Then
Local $iMin = Int($iSec / 60), $iHour
If $iMin > 0 Then
$iSec -= $iMin * 60
$iHour = Int($iMin / 60)
If $iHour > 0 Then
$iMin -= $iHour * 60
$sMsg = StringFormat("%02d:%02d Stunden", $iHour, $iMin, $iSec)
Else
$sMsg = StringFormat("%02d:%02d Minuten", $iMin, $iSec)
EndIf
Else
If $iSec > 0 Then $sMsg = StringFormat("%02d Sekunden", $iSec)
EndIf
GUICtrlSetData($idLblColapsed, "benötigt: " & $sMsg)
EndIf
EndIf
ToolTip('') ;kann auskommentiert werden
EndFunc ;==>_getAllFTPFilesRekursiv

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;===============================================================================
; Function Name: _createLocalDirIfNecessary($s_LocalFile)
; Description:: prüft ob für eine Datei die lokale Verzeichnisstruktur besteht, falls nötig wird diese angelegt
; Parameter(s): $s_LocalFile Dateuname für den die Verzeichnisstruktur geprüft werden soll
; Autor(s): AutoBert (http://www.autoit.de)
; zur freien Benutzung in eigenen Skripten und auch zur freien Weitergabe unter der Vorgabe,
; dass diese Funktionsbeschreibumg inkl. Autor nicht enfernt wird
;===============================================================================
Func _createLocalDirIfNecessary($s_LocalFile)
Local $aLocalPath = StringSplit($s_LocalFile, "\") ;hier lokale Pfad erstellen falls notwendig
Local $sLocalPath = ""
For $j = 1 To $aLocalPath[0] - 1
$sLocalPath &= $aLocalPath[$j] & "\"
If Not FileExists($sLocalPath) And Not StringInStr($aLocalPath[$j], ":") Then
;ConsoleWrite($sLocalPath & @CRLF)
DirCreate($sLocalPath)
EndIf
Next
EndFunc ;==>_createLocalDirIfNecessary

[/autoit] [autoit][/autoit] [autoit]

;===============================================================================
; Function Name: _FTP_FileList_Rekursiv2D($l_FTPSession, $aResult, $sPath, $bFolders=False, $iMaxDepth=-1, $iDebug=0)
; Description:: füllt ein Array mit Dateien (und Verzeichnissen wenn $bFolders true) des FTP-Pfades inkl. aller Unterverzeichnisse
; Parameter(s): $l_FTPSession das von _FTP_Connect zurückgegebene Handle
; $aResult = das Array in dem die Ergebnisse eingefügt werden
; $sPath = Verzeichnispfad, der eingefügt werden soll
; $bFolders = True = auch Verzeichnisse einfügen, False = nur Dateien, Default = nur Dateien
; $iMaxDepth maximale Rekursionstiefe
; <1 = unendlich als Degault eingestellt optionale Angabe
; $iDebug sollen Debuginfos in der Scitekosole angezeigt werden?
; Default = 0 = keine DebugInfos,
; 1 = Debubinfos anzeigen
; 2 = DebugInfos und ArrayDisplays
; Autor(s): AutoBert (http://www.autoit.de)
; zur freien Benutzung in eigenen Skripten und auch zur freien Weitergabe unter der Vorgabe,
; dass diese Funktionsbeschreibumg inkl. Autor nicht enfernt wird
;
; Achtung benötugt bugfreie Version von FTPEx.au3 (3.3.6.1)
;===============================================================================
Func _FTP_FileList_Rekursiv2D($l_FTPSession, ByRef $aResult, $sPath, $bFolders = False, $iMaxDepth=-1, $iDebug = 0)
Local $aTmp[1] ;das Array das für _FTP_FileList_Rekursiv benötigt wird
Local $aSplit
_FTP_FileList_Rekursiv($l_FTPSession, $aTmp, $sPath, $bFolders, $iMaxDepth, $iDebug, True)
If $iDebug = 2 Then _ArrayDisplay($aTmp) ;kann auskommentiert werden
If IsArray($aTmp) Then
$aTmp[0] = UBound($aTmp) - 1
ReDim $aResult[$aTmp[0] + 1][2]
$aResult[0][0] = $aTmp[0]
For $i = 1 To $aResult[0][0]
$aSplit = StringSplit($aTmp[$i], "|")
$aResult[$i][0] = $aSplit[1]
If $aSplit[0] > 1 Then
$aResult[$i][1] = $aSplit[2]
$aResult[0][1] += $aSplit[2]
EndIf
Next
EndIf
If $iDebug = 2 Then _ArrayDisplay($aResult) ;kann auskommentiert werden
EndFunc ;==>_FTP_FileList_Rekursiv2D

[/autoit] [autoit][/autoit] [autoit]

;===============================================================================
; Function Name: _FTP_FileList_Rekursiv($l_FTPSession, $aResult, $sPath, $bFolders=False,$iDebug=0,§b2D=False)
; Description:: füllt ein Array mit Dateien (und Verzeichnissen wenn $bFolders true) des FTP-Pfades inkl. aller Unterverzeichnisse
; Parameter(s): $l_FTPSession das von _FTP_Connect zurückgegebene Handle
; $aResult = das Array in dem die Ergebnisse eingefügt werden
; $sPath = Verzeichnispfad, der eingefügt werden soll
; $bFolders = True = auch Verzeichnisse einfügen, False = nur Dateien, Default = nur Dateien
; $iMaxDepth = <1 = Rekursion bis zum letzten Ästchen, jede andere Zahl stellt die max. Rekursionstiefe ein
; $iDebug sollen Debuginfos in der Scitekosole angezeigt werden? Default = 0 = keine, 1=mit, 2)mit + Arraydisplay
; $b2D als Vorbereutung für _FTP_FileList_Rekursiv2D Default=False
; wird nur benötigt wenn von _FTP_FileList_Rekursiv2D aufgerufen daher nicht selbst setzen
; $iDepth für internen Gebrauch daher nicht selbst setzen
; Autor(s): AutoBert (http://www.autoit.de)
; zur freien Benutzung in eigenen Skripten und auch zur freien Weitergabe unter der Vorgabe,
; dass diese Funktionsbeschreibumg inkl. Autor nicht enfernt wird
;
; Achtung benötugt bugfreie Version von FTPEx.au3 (3.3.6.1)
;===============================================================================
Func _FTP_FileList_Rekursiv($l_FTPSession, ByRef $aResult, $sPath, $bFolders = False, $iMaxDepth=-1, $iDebug = 0, $b2D = False, $iDepth=0)
Local $aFiles, $aFolders
If $sPath = "/" Then $sPath = ""
If $iDebug Then ConsoleWrite($sPath & @TAB & $iDepth & '/' & $iMaxDepth & @CRLF)
If $iMaxDepth > 0 Then
If $iDepth > $iMaxDepth Then Return
EndIf
$iDepth += 1
If $sPath <> "" Then
_FTP_DirSetCurrent($l_FTPSession, $sPath)
If @error Then
If $iDebug Then ConsoleWrite("Remoteverzeichnis: " & $sPath & " existiert nicht!")
Return
Else
$sPath = _FTP_DirGetCurrent($l_FTPSession)
EndIf
EndIf
$aFiles = _Ftp_ListToArray2D($l_FTPSession, 2)
If IsArray($aFiles) Then
If $iDebug = 2 Then _ArrayDisplay($aFiles)
If $aFiles[0][0] > 0 Then
For $i = 1 To $aFiles[0][0]
If $b2D Then
_ArrayAdd($aResult, $sPath & "/" & $aFiles[$i][0] & "|" & $aFiles[$i][1])
If $iDebug Then ConsoleWrite("File: " & $sPath & "/" & $aFiles[$i][0] & "|" & $aFiles[$i][1] & @CRLF)
Else
_ArrayAdd($aResult, $sPath & "/" & $aFiles[$i][0])
If $iDebug Then ConsoleWrite("File: " & $sPath & "/" & $aFiles[$i][0] & @CRLF)
EndIf
Next
EndIf
EndIf
$aFolders = _Ftp_ListToArray2D($l_FTPSession, 1)
If $iDebug = 2 Then _ArrayDisplay($aFolders)
If IsArray($aFolders) Then
If $aFolders[0][0] > 0 Then
For $i = 1 To $aFolders[0][0]
If $aFolders[$i][0] <> '.' And $aFolders[$i][0] <> '..' Then
If $iDebug Then ConsoleWrite("Folder: " & $sPath & "/" & $aFolders[$i][0] & "|" & $aFolders[$i][1] & @CRLF)
If $bFolders Then _ArrayAdd($aResult, $sPath & "/" & $aFolders[$i][0] & "|" & $aFolders[$i][1])
_FTP_FileList_Rekursiv($l_FTPSession, $aResult, $sPath & "/" & $aFolders[$i][0], $bFolders, $iMaxDepth, $iDebug, $b2D,$iDepth)
EndIf
Next
EndIf
EndIf
EndFunc ;==>_FTP_FileList_Rekursiv

[/autoit]

in dieser Version für AutoIt 3.6.6.1 ist es möglich die Rekursionstiefe zu beschränken, da ich die neu benötigten Parameter nicht einfach hinten angehängt habe ist auch eine neue Demo fällig:

Spoiler anzeigen

[autoit]

#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include "FTP_FileList_Recursiv3.au3"

[/autoit] [autoit][/autoit] [autoit]

Opt('MustDeclareVars', 1)

[/autoit] [autoit][/autoit] [autoit]

_CreateGui()

[/autoit] [autoit][/autoit] [autoit]

Func _CreateGui()
Local $l_InternetSession = -99, $l_FTPSession
Local $errOpen, $errFTP
Local $nMsg
Local $iMaxDepth=3;max 3 vereichnisebenen <1=unendliche Rekrusionstiefe
Local $GUI = GUICreate("FTP-Downloader", 623, 450, 271, 235)
Local $idLblLog = GUICtrlCreateEdit("", 8, 5, 467, 315, $ES_READONLY)
Local $idPrgFile = GUICtrlCreateProgress(8, 344, 598, 25)
Local $hGuiChild1 = GUICreate("Child1", 594, 21, 10, 346, $WS_POPUP, $WS_EX_MDICHILD, $GUI)
Local $idLblFilePer = GUICtrlCreateLabel("", 2, 2, 590, 17, $SS_CENTER)
GUICtrlSetFont(-1, 11, 2800)
WinSetTrans($hGuiChild1, "", 180)
GUISwitch($GUI)
Local $idLblFile = GUICtrlCreateLabel("", 8, 322, 594, 17)
Local $idPrgKB = GUICtrlCreateProgress(8, 392, 598, 25)
Local $hGuiChild2 = GUICreate("Child2", 595, 23, 10, 394, $WS_POPUP, $WS_EX_MDICHILD, $GUI)
Local $idLblKBPer = GUICtrlCreateLabel("", 2, 1, 590, 19, $SS_CENTER)
GUICtrlSetFont(-1, 11, 2800)
WinSetTrans($hGuiChild2, "", 180)
GUISwitch($GUI)
Local $idLblKB = GUICtrlCreateLabel("", 8, 372, 594, 17)
Local $idInpMaxDepth= GUICtrlCreateInput("",483,5,35,22,$ES_NUMBER)
GUICtrlSetTip(-1,'Maxinale Rekursionstiefe,<1=unendlich')
Local $idBtnConnect = GUICtrlCreateButton("&Verbinden", 483, 40) ;verbinden mit FTP-Server
Local $idBtnDisconnect = GUICtrlCreateButton("&Trennen", 483, 80) ;vom Server trennen
Local $idBtnDL = GUICtrlCreateButton("&Download", 483, 120) ;Download starten
Local $idBtnExit = GUICtrlCreateButton("Be&enden", 483, 160) ;Exit
GUICtrlSetState($idBtnDL, $GUI_DISABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_DISABLE)

[/autoit] [autoit][/autoit] [autoit]

#Region;falls aktiviert Positionen noch anpasser und Labeltext entfernen
Local $idLblColapsedTime = GUICtrlCreateLabel("", 8, 420, 400, 17)

[/autoit] [autoit][/autoit] [autoit]

Local $idLblKBperSec = GUICtrlCreateLabel("", 450, 420, 500, 17)
#EndRegion
GUISetState(@SW_SHOW, $hGuiChild1)
GUISetState(@SW_SHOW, $hGuiChild2)
GUISetState(@SW_SHOW, $GUI)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE, $idBtnExit
If $l_InternetSession <> -99 Then _FTP_Close($l_InternetSession)
Exit
Case $idBtnConnect
$l_InternetSession = _FTP_Open('AutoItZilla') ;Öffnet eine FTP Sitzung
$errOpen = @error
If Not @error Then
$l_FTPSession = _FTP_Connect($l_InternetSession, 'ftp.csx.cam.ac.uk', '', '', 0) ;Verbindet zu einem FTP Server
$errFTP = @error
If Not @error Then
GUICtrlSetState($idBtnDL, $GUI_ENABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_ENABLE)
GUICtrlSetState($idBtnConnect, $GUI_DISABLE)
Else
;MsgBox(0, "Connect", "fehlgeschlagen")
ConsoleWrite("Connect: " & " " & $errFTP & @CRLF)
EndIf
Else
;MsgBox(0, "Open", "fehlgeschlagen")
ConsoleWrite("Open " & " " & $errOpen & @CRLF)
EndIf
Case $idBtnDisconnect
_FTP_Close($l_InternetSession)
$l_InternetSession = -99
GUICtrlSetState($idBtnDL, $GUI_DISABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_DISABLE)
GUICtrlSetState($idBtnConnect, $GUI_ENABLE)
Case $idBtnDL
$iMaxDepth=Int(GUICtrlRead($idInpMaxDepth))
GUICtrlSetState($idBtnDL, $GUI_DISABLE)
GUICtrlSetState($idBtnExit, $GUI_DISABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_DISABLE)
_getAllFTPFilesRekursiv($l_FTPSession, '/', @ScriptDir & "\Temp", $iMaxDepth, 1, $idPrgKB, $idLblKB, $idLblKBPer, $idPrgFile, $idLblFile, $idLblFilePer, $idLblColapsedTime, $idLblKBperSec, $idLblLog) ;<======= anpassen Remotepfad der inkl. aller Unerordner heruntergeladen werden soll
;_getAllFTPFilesRekursiv($l_FTPSession, $sRemote = "", $sLocal = @TempDir, $iMaxDepth , $iDebug, $idPrgKB, $idLblKB, $idLblKBPer, $idPrgFile, $idLblFile, $idLblFilePer, $idLblColapsed = 0, $idLblKBperSec, $idLblLog)
GUICtrlSetState($idBtnDL, $GUI_ENABLE)
GUICtrlSetState($idBtnExit, $GUI_ENABLE)
GUICtrlSetState($idBtnDisconnect, $GUI_ENABLE)
EndSwitch
WEnd
EndFunc ;==>_CreateGui

[/autoit]

und da durch die Beschränkung auf 5 Dateien mussten die beiden Ursprungsdateien weichen (bisher 90 mal herunter geladen).

Edit5: auch in die Versionen für AutoIt 3.3.8.1 die Möglichkeit zur Rekursionstiefenbeschränkung eingebaut. Hier war es möglich die Parameter einfach hinten anzuhängen zur Unterscheidung aber trotzdem eine 3 als VersionsNr. angehängt (bisher 92 mal herunter geladen).

mfg autoBert

**autoBert**

Setze ein WinWaitActive vor dem Send-Befehl. Oder nimm ControlClick,

mfg autoBert

**autoBert**

Hallo Zattoo,

das Captcha ist ja von den Metin2-Seitenbetreiber eingebaut worden, damit die Seite nicht automaitisiuert werden kann Dein Automatisierungsversuch verstösst also automatisch gegen die Forenregeln:

Zitat

Folgende Inhalte sind absolut nicht erwünscht. Das Team behält es sich ausdrücklich vor, zur Durchsetzung der Regeln je nach Schweregrad Benutzer, Posts und Threads zu verwarnen, zu sperren oder sogar zu löschen.

...
- Automatisierung von Webseiten oder Tools, die das in ihren AGBs verbieten
- Umgehen von Captchas

(Diese Liste ist ausdrücklich nicht vollständig. Programme, die dem hinter diesen Regeln stehenden Geist widersprechen, sind ebenso als nicht erlaubt anzusehen)

Zitat

4.2.1. Der Nutzer ist verpflichtet, seine Log-in-Daten und alle Kennwörter und Passwörter streng geheim zu halten. Der Nutzer darf Log-In-Daten ausschließlich auf den von Gameforge betriebenen Internetseiten eingeben.
Quelle: Betreiber von metin2.de

Daher: vote for close Du kannst ja jetzt einen Jägermeister gegen deinen Ärger trinken.

Edit: ich weise dich darauf hin, dass ich es dir nicht gestatte aus von mir geschriebenen Routinen den Funktionskopf zu entfernen

mfg autoBert

**autoBert**

Hallo Zattoo,

du hast vergessen die Routine _createLocalDirIfNecessary zu verwenden, aber zumindest die Dateien im FTP-Rootverzeichnis hätte er herunterladen müssen.

Edit: ich weise dich darauf hin, dass ich es dir nicht gestatte aus von mir geschriebenen Routinen den Funktionskopf zu entfernen

mfg autoBert

**autoBert**

Hallo Vasco,

dein Beispielslript läuft nicht, Konsolenausgabe:

Spoiler anzeigen

Code

>"D:\Programme\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "D:\Programme\AutoIt3\Test\Test2.au3" /autoit3dir "D:\Programme\AutoIt3" /UserParams    
+>11:47:49 Starting AutoIt3Wrapper v.2.0.0.1    Environment(Language:0407  Keyboard:00000407  OS:WIN_XP/Service Pack 3  CPU:X86 OS:X86)
>Running AU3Check (1.54.19.0)  from:D:\Programme\AutoIt3
D:\Programme\AutoIt3\Test\Test2.au3(9,31) : ERROR: _GetClip(): undefined function.
AdlibRegister("_GetClip", 1000)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
D:\Programme\AutoIt3\Test\Test2.au3(16,12) : ERROR: create_gui(): undefined function.
create_gui()
~~~~~~~~~~~^
D:\Programme\AutoIt3\Test\Test2.au3 - 2 error(s), 0 warning(s)
!>11:47:50 AU3Check ended.rc:2
+>11:47:54 AutoIt3Wrapper Finished
>Exit code: 0    Time: 6.443

Alles anzeigen

du solltest deinen Skriptcode in AutoIt-Tags einbetten (Klick auf das AutoItzeichen im Beitrags-Editor), bei längeren SKripten diese in einen Spoiler einbetten (Zeichen SP im Beitrags-Editor)das ganze sieht dann fertig zB. so aus:

Beispiel Tray mit Adlib

[autoit]
#NoTrayIcon
#include <Constants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
[/autoit] [autoit][/autoit] [autoit]
Opt("TrayMenuMode",1) ; Standard Traymenüeinträge (Skript pausieren/beenden) werden nicht angezeigt.
Opt("TrayIconHide", 1) ;hide the Trayicon
Opt("GUIOnEventMode", 1) ;ONEvent Mode.
Opt("TrayOnEventMode",1)
[/autoit] [autoit][/autoit] [autoit]
$hGui = GUICreate('Test',575,300,100,100);,$WS_POPUP)
GUISetOnEvent($GUI_EVENT_CLOSE,"_MyExit")
GUISetOnEvent($GUI_EVENT_MINIMIZE,"_Minimize")
GUICtrlSetState(-1, $GUI_DISABLE)
$idLblAdlibInfo=GUICtrlCreateLabel("",5,5,65,260)
$hbtnExit = GUICtrlCreateButton("be&enden",500,275,60,20)
GUICtrlSetOnEvent(-1,"_MyExit")
TraySetOnEvent($TRAY_EVENT_PRIMARYDOUBLE,"_restore")
$aboutitem = TrayCreateItem("Über")
TrayItemSetOnEvent($aboutitem,"_about")
TrayCreateItem("")
$exititem = TrayCreateItem("Beenden")
TrayItemSetOnEvent($exititem,"_MyExit")
[/autoit] [autoit][/autoit] [autoit]
TraySetState(2)
GUISetState()
AdlibRegister("_TestAdlib")
[/autoit] [autoit][/autoit] [autoit]
While 1
Sleep(1000)
#cs
$TRAY_EVENT_SHOWICON -3 Das Trayicon wird gezeigt.
$TRAY_EVENT_HIDEICON -4 Das Trayicon wird versteckt.
$TRAY_EVENT_FLASHICON -5 Der Benutzer schaltet das Blinken des Trayicons ein.
$TRAY_EVENT_NOFLASHICON -6 Der Benutzer schaltet das Blinken des Trayicons aus.
$TRAY_EVENT_PRIMARYDOWN -7 Die erste Maustaste wurde über dem Trayicon gedrückt.
$TRAY_EVENT_PRIMARYUP -8 Die erste Maustaste wurde über dem Trayicon losgelassen.
$TRAY_EVENT_SECONDARYDOWN -9 Die zweite Maustaste wurde über dem Trayicon gedrückt.
$TRAY_EVENT_SECONDARYUP -10 Die zweite Maustaste wurde über dem Trayicon losgelassen.
$TRAY_EVENT_MOUSEOVER -11 Die Maus bewegt sich über das Trayicon.
$TRAY_EVENT_PRIMARYDOUBLE -13 Die erste Maustaste wurde über dem Trayicon doppelgeklickt.
$TRAY_EVENT_SECONDARYDOUBLE -14 Die zweite Maustaste wurde über dem Trayicon doppelgeklickt.
[/autoit] [autoit][/autoit] [autoit]
#ce
[/autoit] [autoit][/autoit] [autoit]
WEnd
[/autoit] [autoit][/autoit] [autoit]
Func _TestAdlib()
Static $iNo=1
Local $sText=GUICtrlRead($idLblAdlibInfo)&$iNo&". Adlibtest"
Local $aText=StringSplit($sText,@CRLF,1)
;_ArrayDisplay($aText)
$sText=""
$iStart = UBound($aText)-21
if $iStart < 1 Then $iStart = 1
Do
$sText&=$aText[$iStart] & @CRLF
$iStart+=1
Until $iStart=$aText[0]+1
GUICtrlSetData($idLblAdlibInfo,$sText)
$iNo+=1
EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func _About()
MsgBox(32,".. über","Tray...")
EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func _MyExit()
Exit
EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func _Minimize()
Opt("TrayIconHide", 0) ;shows the Trayicon
TraySetState(1)
GUISetState(@SW_HIDE)
EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func _Restore()
Opt("TrayIconHide", 1) ;hide the Trayicon
TraySetState(2)
GUISetState(@SW_SHOW)
EndFunc
[/autoit]

anhand dieses Beispiels kannst du erkennen, dass nicht alles was man im Internet liest:

Zitat

Minimize to tray versus onevent mode (ich habe gelesen als tray and SW_hide wird das script pausiert und meine schleife wuerde stehen bleiben)

auch stimmt.

mfg autoBert

**autoBert**

Zitat von Zattoo

wäre das so dann richtig?

Nein, wie du sicher bemerkt hast, denn $aResult muss bereits ein Array sein. Du musst Zeile 16 ab ändern zu:

[autoit]

Global $aResult[1}

[/autoit]

wobeu es durch die Übergabe ByRef keine Rolle spielt ob Global, Local oder Dim verendet wird,

mfg autoBert

**autoBert**

Zitat von holzfelix

dann muss man eigentlich nur noch enter drüken das klappt aber nicht
...
weiß jemand vielleicht wie ich das lösen könnte?

ja, es kann mit runwait nicht klappen da dein Skript ja paisoert bis in dem aufgerufenen Programm Enter gedrückt wird Nimm also nur run und zumindes die 2 Lösung sollte klappen,

mfg autoBert

**autoBert**

Bei der Hilfe zu [ offen ] Gesamten Ordner von FTP Server herunterladen ist Fliwatt auf das selbe Problem gestossen, ich nutze 3.3.6.1 er hat 3.3.8.1. Deshalb habe ich mit Bekannte Bugs in 3.3.8.1? nach Bugs gefragt und siehe da: _Ftp_ListToArray2D ist als buggy bestätigt worden. Du kannst jetzt entweder das Skript auf _Ftp_ListToArray anpassen oder mein Skript aus [ offen ] Gesamten Ordner von FTP Server herunterladen nehmen solltest allerdings die geänderte Version von _FTP_FileList_Rekursiv aus Post 20 verwenden,

mfg autoBert

**autoBert**

Hallo Saguhilla,

das TmpFile kannst du benutzen wie jedes andere File auch:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
ConsoleWrite(@WindowsDir & "\cursors\horse.ani")
Opt('MustDeclareVars', 1)

[/autoit] [autoit][/autoit] [autoit]

; String mit den Binärdaten von: D:\WINDOWS\cursors\horse.ani
Local $sBinHorseIcon = ""
$sBinHorseIcon &= "0x524946461A49000041434F4E4C49535446000000494E464F494E414D0C00000053656372657461726961740049415254260000004D6963726F736F667420436F72706F726174696F6E2C20436F70797269676874203139393300616E6968240000002400000018000000180000000000000000000000000000000000000001000000010000004C495354944800006672616D69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000007000000000000000000000000800000007000000000008800000000000000000070000000000000080000000000000000700000000000008000000000007000007000000000000000000000000000000880000000000000080080000000000000800000000000000811110000000000000000000000000000000100880111111100000000000000080001100011111111900000000000000000011111191111199000000000000800009999199999919911000000000000000009990000990999110000000000000000000008000880991100080800000000000000000000000991100000000000000000000000000000091111000000000000000000000000077091990000000000000000000000000000090000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDF9FFFFFDF9FFCFFEF9FFE3FF79FFF3FF39FFF8FF99FFFA7FC9FFF81E01FFFF0001FFF30000FFFB0000FFE100007FF000007FFF838063FFFFE003FFFFF807FFFFF80FFFFFFF1FFFFFFFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000800000000000000000000008800000800000000000000000000000078800008000000000000070007000000000700080000000000000008000000000000000800000000000000007070000000007801100000000000000008080000000000011000000000000000000000000080011100000000000000000000110888011111090000000000000080001111111111111980000000000000000011111111111991000000000000780009999919999999111000000000000000009999900800911110000000000000000080080000080991100000000000000000000000000008091100000000000000000000000000078091119900000000000000000000000077091910000000000000000000000000000090000000000000000000000000000000800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9FFFFF9F7FFFFF877FFC1FF37FFF0FF97FFF8FF93FFFC7FC3FFFC0E01FFFC0001FFFB0000FFF30000FFE000007FFF00007FFF83C063FFFFF007FFFFF007FFFFF80FFFFFFF1FFFFFFFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008000000000000000000000000000000800000000000000078700000000800007000000000000000000800000007008"
$sBinHorseIcon &= "0070000000000000000800000000000000800000000000000000087000000000000000000000000000000870000000000000000000000000000000000000010000008000000000000000001110000011111100000000000000700001111111111111980000000000000700011111111111191000000000000800009999919191199911800000000000708099999999999911110000000000000000070000000000991100080000000000000077700000008091100000000000000000000000000078991119900000000000000000000000000091990000000000000000000000000777090000000000000000000000000000000800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7FFFFFFEFFFE3FC6FFFF87D87FFFB7FC7FFFC7FE7FFFC7FE7FFFC0E01FFFE0001FFF30000FFF30000FFE000007FF400007FFF83E063FFC7F003FFFFF007FFFFFE0FFFFFF81FFFFFFFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000088000000000000000000000000000000000000000000000000000000000000000800000000000000000080878000000088880000000000000000080070000000800000000000000000000707000000000001000000000000000008807000000000110000000000000000088080080008001108000000000000000778811000000111090000000000000070008111110111119900000000000000070011111111111191000000000000880009111111111119191000000000000000009999919999911110000000000000000099999887009991110080800000000000088887000008091100000000000000000000000000078991111900000000000000000000000077091990000000000000000000000000077090000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9FFFFFFFBFFFFFFF9FFFF83E07FFFCBE07FFFC3FE7FFFC3FE7FFFC0701FFFC0601FFFB8000FFF10000FFE000007FFC00007FFF806063FFC1F003FFFFF007FFFFF80FFFFFFC1FFFFFFFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000800000000000000000000000000000000000000000000000000000000000000000000000000000000000008000880000800000000000000000000070000800088088800000000000000000808080000000008000000000000000007008000000008000000000000000000080001080000001100000000000000000080811800001111090000000000000077081110000111111900000000000000778011111111111190000000000000800089111111191199110000000000000000009999900999991110000000000000000009990870000911100080800000000000008887000080911100007000000000000000000000008911119800000000000000000000000007991980000000000000000000000000077098000000000000000000000000000007800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7FFFFFFF7FFFFDDF7FFFFCCF07FFFCCE07FFFC1FC7FFFC3FC7FFFC0703FFFE8601FFF10001FFF00001FFE00000FFFC00007FFFC0C063FFE1E003FFFFF807FFFFFC0FFFFFFC1FFFFFFF3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001"
$sBinHorseIcon &= "000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000088000000000000000000000088007800000000000000000000000000080008000000000000000000000000000000000000088087000000000000000000800000008180800000000000000000000800000000188000000000000000000001000000881170000000000000000008811000000011000000000000000000080110000011111900000000000000880011110111101119000000000000000080111111111111990000000000000000009999911999999110000000000000000009999900000191100007000000000000078808000080911000007000000000000000000000778911000000000000000000000000000080911998000000000000000000000000779999000000000000000000000000000080880000000000000000000000000000070000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFFFFE7FFFFE667FFFFF37BFFFFFB781FFFF0F8BFFFF5FE3FFFF0F83FFFF0301FFFF0001FFF10000FFF00000FFF800007FFF800077FFC1E063FFFFE007FFFFF807FFFFF81FFFFFFE1FFFFFFF7FFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000007870000000000000000000000000700078800000000000000000000000000807800008000000000000000000000008088000700000000000000000000000708000000707000000000000000000080000000000087000000000000000007000000000000080000000000000000000701800080011080000000000000070008110000011111000000000000008770801111111111119800000000000800080111111111111910000000000000888809991119991191187000000000000000819999199099911100000000000000000088881000080911000080000000000000000000000089911000000000000000000000000007700911190000000000000000000000000089999000000000000000000000000007709980000000000000000000000000000000000000000000000000000000000008700000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8FFFFFFB87FFFFFD39FFFFFD397FFFFAFC1FFFF0FE1FFFE0FE3FFFF8701FFFB8001FFF10000FFE00000FFF000007FFF00007FFFC1E077FFFFF007FFFFE007FFFFFC1FFFFFF81FFFFFFF7FFFFFFE7FFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008000000000000000000000000008800088880000000000000000000000008008000000070000000000000000000088700000070700000000000000000000080000000007000000000000000000700000000001000000000000000000000880000800110800000000000007070080010000111100000000000000007008011111111111198000000000000000801111111111119900000000000000000899991111119911800000000000000000899991999991110000000000000000000788080000011110008000000000000000000"
$sBinHorseIcon &= "00000779111000000000000000000000000000089111198000000000000000000000000089119000000000000000000000000000009180000000000000000000000000000880000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFFFCC0FFFFFE9E1FFFFC3E4FFFFA7E4FFFF87E1FFFFC301FFF58001FFF10000FFF00000FFFC0000FFFF80007FFFC1E06FFFFFE007FFFFF807FFFFFC1FFFFFFE1FFFFFFE7FFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000088000000000000000000000000000000070000000000000000000000000088887800000000000000000000000000000000877800000000000000000000008800000080770000000000000000008000000000000070000000000000000000000000008800070000000000000000070100000000100000000000007080000011000111111000000000000087000801111111111119800000000000800708111111111111190000000000000880009999119999999100000000000000000009999108089911000000000000000000088080000001111800000000000000000000000000809110000000000000000000000000000009111118000000000000000000000000009199000000000000000000000000008809000000000000000000000000000000800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7FFFFFFE7FFFFFE007FFFFF207FFFFC7E0FFFF97E67FFFC7E07FFFC701FFEB8001FFE30000FFE10000FFF00000FFFF80007FFFC1E07FFFFFE007FFFFF807FFFFFC1FFFFFF83FFFFFFEFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008000000000000000000000000000000080000000000000000000000000000880000000000000000000000000000000000080000000000000000000000000080000000088000000000000000000000000000008000000000000000000000007000880100800000000000000000000080800011100000000000000880800011000111111000000000000808008011111111111119800000000000000881111111111111910000000000000880099991199999991100000000000000000099999900009111000000000000000000090000000001110800000000000000000000000008889111000000000000000000000000008009110118000000000000000000000000009119000000000000000000000000008819900000000000000000000000000000800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7FFFFFFE7FFFFFF9FFFFFFFB81FFFFC3F87FFFC7F37FFFE3807FFFE2007FF28001FFC20000FFE00000FFF00000FFFF8000FFFFC3E07FFFFFC007FFFFE807FFFFFC1FFFFFF83FFFFFFEFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000"
$sBinHorseIcon &= "0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000087000000000000000000000000000000000008700000000000000000000070080000070700000000000000000000700000008000007000000000000000000000000000080077000000000000000001100000111000080000000000080000111100111111000000000000000080001111111111119000000000008000000111111111111990000000000000000009991119999999000000000000000000009999100019110800000000000000000000008008011111000000000000000000000000000099110008000000000000000000000070809111198000000000000000000000000809199000000000000000000000000077809000000000000000000000000000000880000000000000000000000000000008000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7FFFFFFEFFFFFFFDFFFFFFF8FFFFFFF1E6FFFFC3C97FFFC7D97FFFE7E33FFFC3003FF38001FFE10001FFC10000FFF80000FFFF8000FFFFC180FFFFFFE007FFFFD007FFFFF81FFFFFF03FFFFFFE7FFFFFFEFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008000000000000000000000000000000800000000000000000000000000000000808000000000000000000000000000080080000000880000000000000000000000000000080700000000000000000000000000087000800000000000000000000000000080008000000000000000001000800000088700000000008000000111000111111087000000000800800011111111111119800000000000000000111111111111900000000000088008099991119999991000000000000000008099999000999110800000000000000000000000000191110000000000000000000000000000091100000000000000000000000000007091101108000000000000000000000000091119000000000000000000000000077099980000000000000000000000000000800000000000000000000000000000008000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFFFFFFFBFFFFFFF3FFFFFFF2FFFFFFF4FE7FFFE3E17FFFE7E1BFFFC7F1BFFFC6003FEF00007FD30000FFC30000FFC10000FFFE0000FFFFC380FFFFFFE007FFFFE007FFFFF81FFFFFF01FFFFFFE7FFFFFFEFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000080000080000000000000000000000000000000700000000000000000000000000000000000000000000000000000000808000000007008000000000000000000000000000008008700000000000000000110000008000008800000000000000011100000000100008000000000800001111101111111070000000000000000011111111111119800000000000000000111111111111190000000000000000099999199911199100000000000000000099999000999911000000000000000000080080000911110000000000000000000000000077091110000000000000000000000000000091111190000000000000000000000000091119000000000000000000000000077099900000000000000000000000000007000000000000000000000000000000008000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3FFFFFFEFFFFFFFCF7FFFFFDE7FBFFFDDFF9FFF83F0DFFFC3FA1FFFC3E01FFF"
$sBinHorseIcon &= "82001FF70000FFE30000FFE10000FFC00000FFFF0000FFFFC380FFFFFF8007FFFFF007FFFFF81FFFFFF01FFFFFFD7FFFFFFEFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008700000000000000000000008000000088000000000000000000000008000080000000000000000000000000080000000000088000008000000000000000000000000000000070000000000080700000000000008008000000000000700008000000808700000000000000000111107000000000000000000007700001111101111111080000000000880000111111111111111900000000008000779111111111111190000000000000880009999199991119100000000000000000099999000999911000000000000000000088800088019110700000000000000000000000007091110000000000000000000000000770099111110000000000000000000000000809119000000000000000000000000777809900000000000000000000000000000700000000000000000000000000000008000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFFFFFFFBF3FFFFF3F3FFFFF3CFFEFFF3DF9E7FF33FEE7FF13FE6FFF03E01FFF00001FE70000FFC70000FFC00000FFF00000FFFF8000FFFFC7007FFFFFC007FFFF9007FFFFF81FFFFFE01FFFFFFE7FFFFFFEFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008000000000000000000000000000000800000078000000000000000000000080000000080000000000000000000000000000700000000000000000000000000000070000000000000008000000000070000000000000080800000000000000000000000000000008000700000000000000000000000807800000000000000000111088000000008087000000000700001111001111111107000000000008700011111111111111070000000007800008911111111111119700000000000008009999119991119907000000000000000089999000999911070000000000000000088880008801110800000000000000000000000077809110000000000000000000000000000809111100000000000000000000000000709119000000000000000000000000077709900000000000000000000000000000090000000000000000000000000000008700000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3FFFFFFF7E7FFFFEFE7FFFFEF9FFF7FEF3FFF7FE33FC67FF33FF67FF03E01FFF00001FF700007FE300007FC100007FFC00007FFF80007FFFC3807FFFFF8007FFFFF007FFFFF81FFFFFF01FFFFFFF7FFFFFFE7FFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008800000000000000000000000000000800000008070000000000000000000008000000000000000000000000000000080000080000000000000000800000000000000000000000008000000800000007007000000000000070000000000000007000000000000000000700000000000000000000000008877800000000000000001111078000000000700000000"
$sBinHorseIcon &= "00800011111100111110100080000000000087011111111111111970000000000700089911111111111119000000000000008009999919991111917000000000000000009990000199991100000000000000000077770008809111000000000000000000000000000809111880000000000000000000000077809110000000000000000000000000000089119800000000000000000000000007709900000000000000000000000000000008000000000000000000000000000000800000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7FFFFFFCFC7FFFFCFDFFFFFCF3FFF9FCF3FEF9FC33FE67FE33FF8FFF03F01FFF00001FF700001FE000007FE000007FFC00007FFFC0007FFFC3807FFFFFE007FFFFC007FFFFFC0FFFFFF81FFFFFFF3FFFFFFF7FFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000080000000000000000000000000000070000000000000000000000000000000080000000000000000000000007000808000000000000000800000000808000070000000000000080000000000000000000000000000000700000000000800000000000000078007000000000000010010070000000000070000000000000111110011111110000700000000088001111111111111119000000000000007011111111111111900000000000007009999911991111991000000000000000709999900099199110000000000000000088887000009111100000000000000000000000000709911000080000000000000000000000070911000000000000000000000000007780911110000000000000000000000000779119800000000000000000000000000009900000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFFFFFBF3FFFFFBF3FFFCF9C7FFD3F8E7FF87FC67FF8FFE27FE0FFF02006FFF00000FF100007FF200007FF800007FFE00007FFF83807FFFFFC073FFFFF003FFFFE007FFFFF80FFFFFFE1FFFFFFF7FFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008800000000000000000000000000000000000000000000000080000000000000000000000000000078000000008000000000000000000000700000000008700000000000000000887000000000700000000000000000000700000000000700000000000000008077000000000000000110008000000007008000000000008011110001111111000080000000000701111111111111119000000000000000111111111111111900000000000000780999911999911199000000000000000007899900019999110000000000000000008888700080911110000780000000000000000000001191110778000000000000000000000007091110008000000000000000000007777091111000000000000000000000000077809990000000000000000000000000000890000000000000000000000000000008000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F3FFFFF3EFFFF9FBCFFFF3FDDFFFE7FC4FFFC7FC67FF87FE27FF07FF030027FF000007F200007FF100007FFC00007FFF80007FFFC1C039FFFFE001FFFFF801FFFFE003FFFFFC07FFFFFF8FFFFFFFBFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FF"
$sBinHorseIcon &= "FFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000080000000000000000000000000800000000000000000000008700000000000008000000000000000800000000000008000000000000000000000000000000080000000000000000770000000000000000800000000000080000000000000000000800000000000000008000000000800110000000000000800000000000000011110001111111100000000000077008111111111111111900000000000708081111111111111191000000000000070099991119991119110000000000000008199999000999911100000000000000008008870000091111000008000000000000000000000009111870000000000000000000000000009110008000000000000000000000077709111900000000000000000000000007789998000000000000000000000000000780000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7E7FFF9F3CFFFF3FBCFFFE7FD9FFFEDFC9FFFCDFE47FF99FF23FF99FF038003FF800007F980001FF880001FFE00001FFF80001FFFC0E01EFFFFF800FFFFFE00FFFFF801FFFFFE03FFFFFF87FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000007700000000000000000000000700000000000000000000000000000000808000000000000000000070000000000080000000000000000000070088000000080000000000000000000000780000000000000000000000000870000000000000007000000000000000800070000000000800000000000000000000000000000007011108000111111100800000000777000111111111111111080000000007887011111111111111119000000000000780999911111111111910000000000000080999991009999991100000000000000008888870000011111000008000000000000000000000009110870000000000000000000000007709111111000000000000000000000077709111100000000000000000000000007709990000000000000000000000000000080000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9FFFE7CFBFFFDFE3BFFF9FFB3FFF99FD3FFFB9FC8FFF3BFE0FFF3BFF038007FF00000FF180001FF080001FFC00001FFF00001FFFC0E01EFFFFF800FFFFF800FFFFF801FFFFFE03FFFFFFC7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000070000000000000008000000000800000700000000000000800000000000000007000000000000000000080000000000000000000000000800008000000000000000000000000000000070000000000000000000000000000700000000000000801100000800000000000000000000007011107001111111080000000000000000111111111111111080000000000807701111111111111119800000000000780799911199991111910000000000000780099990000999991110000000000000008888700080099111170008000000000000000000000001911878800000000000000000000000700910011700000000000000000000077780911900000000000000000000000007771990000000000000000000000000000080000000000000000000000000000000000000000000000000000000000000000000"
$sBinHorseIcon &= "000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3FFF9FEF3FFFBFE73FFF7DFB3FFF7BFB3FFE77FC9FFE67FC0FFE0FFF03801FFF00003FFF80001FF000001FFC00001FFE00001FFFC1C00EFFFFF800FFFFFC00FFFFF801FFFFFE03FFFFFFC7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008800000000000000080000000000000008000000000000000800000000000800000000000000000008000088000000800000000000000000080000800000000000000000000000000800000000000000000700000000000080000000000000008008008000000000008000000000000000800100007000000000700000000000007011108001111111107000000000000000111001111111119900000000000007091111111111111190700000000000780999911999991119110000000000000000999900000999911100000000000000008888700000091111070008000000000000000000000009110878800000000000000000000000709910110700000000000000000000077700911910000000000000000000000007780998000000000000000000000000000080000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFFFEFFEEFFFEFBE6FFFEF3F37FFEE7FB3FFEEFFC8FFC9FFC07FC1FFF03001FFF00001FFF80001FF080001FFC00001FFF00001FFFC1E00EFFFFF800FFFFFC00FFFFF801FFFFFE03FFFFFFC7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000800000000000800000000000000000088000000000800000000000000000000800000000000008000000000000080080000000000000000000000000000000080000000000000000000000000080780000000000000000000000000000800080000000000000088011080000000111000000000000000000111087011111110800000000000000000111001111111190000000000000000001111111111111900000000000000000999911199999991100000000000000000999900000099111000000000000000000000800088019111000008000000000000000000078009111788800000000000000000000007709910010700000000000000000000777000911100000000000000000000000007780999000000000000000000000000000080000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBFFEF9FEBFFEF3FE5FFEF7FF4FFE67FF2FFE67FFB3FE0FFF81FE0FFFC0700FFFF00007FFF80007FFD80007FF880003FFC00003FFFC1C01EFFFFE000FFFFF800FFFFF001FFFFFE03FFFFFFC7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF69636F6EFE0200000000020001002020000010001000E80200001600000028000000200000004000000001000400000000008002000000000000000000001000000010000000000000000000BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008000000000080000000000000000000800000000000880000000000000000"
$sBinHorseIcon &= "08800000000008000000000000000000000000000000000080000000000000000000000000000070000000000000000080000000000000000000000000000007000000000000000000000800000001001100000000000000880110088011111111000000000000000000111001111111190000000000000000001111111111111900000000000000000999911199111991100000000000000000999900009999111000000000000000000000700080019111000088000000000000000000078009110888000000000000000000000000709910000000000000000000000000077000911180000000000000000000000007780990000000000000000000000000000080000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9FBFF7FFDF7FF3FFDE7FE3FFEEFFF1FFEEFFF0FFE4FFFA7FE0FFF80F007FFC00007FFF80007FFB80007FF080003FF800003FFFC1C01CFFFFE000FFFFFC01FFFFF801FFFFFE07FFFFFFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF"

[/autoit] [autoit][/autoit] [autoit]

; erstellt im TEMPDIR die Datei $sFileName mit Daten von $sBin
Local $icon, $n1, $n2, $msg

[/autoit] [autoit][/autoit] [autoit]

GUICreate("Meine GUI Icons", 250, 250)

[/autoit] [autoit][/autoit] [autoit]

$icon = GUICtrlCreateIcon("shell32.dll", 10, 20, 20)
$n1 = GUICtrlCreateIcon(_CreateTmpFile("BinHourse", $sBinHorseIcon), -1, 20, 40, 32, 32) ;<= dies ist das animierte Icon das eingebunden wird
$n2 = GUICtrlCreateIcon("shell32.dll", 7, 20, 75, 32, 32)
GUISetState()

[/autoit] [autoit][/autoit] [autoit]

; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst
While 1
$msg = GUIGetMsg()

[/autoit] [autoit][/autoit] [autoit]

If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd
GUIDelete()

[/autoit] [autoit][/autoit] [autoit]

Func _CreateTmpFile($sFileName, $sBin)
Local $sFile = @TempDir & "\" & $sFileName
Local $hFileOut = FileOpen($sFile, 18)
FileWrite($hFileOut, Binary($sBin))
FileClose($hFileOut)
Return $sFile
EndFunc ;==>_CreateTmpFile

[/autoit]

mfg autoBert

**autoBert**

Zitat von Autobodder

Es geht mir rein um den Button.
Ich will nicht irgendwas im Spiel steuern, sondern nur wissen ob es eine Möglichhkeit gibt die Control ID rauszubekommen oder eine Möglichkeit den Button anzuklicken ohne MouseClick()

Nein ohne ControlID hast du da keine Chance,

mfg autoBert

**autoBert**

Zitat von Fliwatt

Danke AutoBert,
habe den Script ein bischen meinen Bedürfnissen angepasst, er gibt zwar immer noch Error aus aber komischerweise für Dateien die gar nicht in dem Pfad auf dem Ordner existieren, aber er lädt alles runter, das ist die Hauptsache.
PROBLEM GELÖST.
Mfg Fliwatt

Für dich ist das Problem vielleicht zufällig gelöst, aber die Routine _FTP_FileList_Rekursiv ist fehlerhaft zu sein (da sie Dateien einem falschen Ordner zuordnet) deshalb rate ich von einer Verwendung ab.
Kannst du es einmal mit dieser Version von _FTP_FileList_Rekursiv:

Spoiler anzeigen

[autoit]

;===============================================================================
; Function Name: _FTP_FileList_Rekursiv($aResult, $sPath, $bFolders)
; Description:: füllt ein Array mit Dateien (und Verzeichnissen wenn $bFolders true) des FTP-Pfades inkl. aller Unterverzeichnisse
; Parameter(s): $aResult = das Array in dem die Ergebnisse eingefügt werden
; $sPath = Verzeichnispfad, der eingefügt werden soll
; $bFolders = True = auch Verzeichnisse einfügen, False = nur Dateien, Default = nur Dateien
; Author(s): AutoBert (http://www.autoit.de)
;===============================================================================
Func _FTP_FileList_Rekursiv(ByRef $aResult, $sPath, $bFolders = False)
Local $aFiles, $aFolders
If $sPath <> "" Then
_FTP_DirSetCurrent($l_FTPSession, $sPath)
$sPath = _FTP_DirGetCurrent($l_FTPSession)
EndIf
$aFiles = _Ftp_ListToArray($l_FTPSession, 2)
If IsArray($aFiles) Then
;_ArrayDisplay($aFiles)
If $aFiles[0] > 0 Then
For $i = 1 To $aFiles[0]
_ArrayAdd($aResult, $sPath & "/" & $aFiles[$i])
ConsoleWrite("File: " & $sPath & "/" & $aFiles[$i] & @CRLF)
Next
EndIf
EndIf
$aFolders = _Ftp_ListToArray($l_FTPSession, 1)
;_ArrayDisplay($aFolders)
If IsArray($aFolders) Then
If $aFolders[0] > 0 Then
For $i = 1 To $aFolders[0]
If $aFolders[$i] <> '.' And $aFolders[$i] <> '..' Then
ConsoleWrite("Folder: " & $sPath & "/" & $aFolders[$i] & @CRLF)
If $bFolders Then _ArrayAdd($aResult, $sPath & "/" & $aFolders[$i])
_FTP_FileList_Rekursiv($aResult, $sPath & "/" & $aFolders[$i], $bFolders)
EndIf
Next
EndIf
EndIf
$aResult[0] = UBound($aResult) - 1
EndFunc ;==>_FTP_FileList_Rekursiv

[/autoit]

versuchen? Bis ich mit meinem langsamen web'n'walk Zugang einen vollständigen Test hinbekomme das kann dauern,

mfg autoBert

**autoBert**

Xorianator: woher weist du was er wirklich möchte? Der Login-Button war nur ein Beispiel.

**autoBert**

Hallo Vasco,

hast du es denn selbst getestet? Ich habe auch irgendwo im Internet gelesen, dass die Erde eine Scheube sei, kann es aber nicht glauben.
Schau dir dazu [autoit]TraySetState[/autoit] an
solange es aktiv ist ist dies doch in Ordnung, hier stimmt dann deine Programmlogik nicht. Mach ein Beispielskript mit Notepad als externem Programm und ich schaue mir das Problem an.
bau dies in das Beispielskript aus 3 mit ein.

mfg autoBert

**autoBert**

i2c: hast du den Bug nach autoit.com gemeldet?

**autoBert**

Ok, die bisherigen Beiträge veranlassen mich auch weiterhin auf 3.3.6.1 zu bleiben, trotzdem würde mich interessieren warum das im Eröffnungsbeitrag verlinkte Skript nicht geht? Hat es denn schon jemand getestet? Mein 1. Schluss aus den Fehlerbeschreibungen des Benutzers war das IsArray verbugt ist, nach dem ich aber eine andere Func _Ftp_ListToArray statt _Ftp_ListToArray2D genommen habe tritt der Array-Fehler nicht mehr auf. Vielleicht schaut sich ja einer der Pros das Skript an und erkennt in welcher benutzen Func der Bug liegt, denn es kann ja nicht sein dass ein 1D-Array korekt,ein 2D-Array aber trotz Fehlerbehandlung einen Fehler auslöst.

'1D-Array

[autoit]

$aFiles = _Ftp_ListToArray($l_FTPSession, 2)
If IsArray($aFiles) Then
;_ArrayDisplay($aFiles)
If $aFiles[0] > 0 Then
For $i = 1 To $aFiles[0]
_ArrayAdd($aResult, $sPath & "/" & $aFiles[$i])
ConsoleWrite("File: " & $sPath & "/" & $aFiles[$i] & @CRLF)
Next
EndIf
EndIf

[/autoit]

2D-Array

[autoit]

$aFiles = _Ftp_ListToArray2D($l_FTPSession, 2)
If IsArray($aFiles) Then
;_ArrayDisplay($aFiles)
If $aFiles[0][0] > 0 Then ;hier tritt nach Angaben von Fliwatt unter 3.3.8.1 der Fehler auf der gar nicht vorkommen darf da ja 2 Zeilen zuvor geprüft wird ob es ein Array ist
For $i = 1 To $aFiles[0][0]
_ArrayAdd($aResult, $sPath & "/" & $aFiles[$i][0])
ConsoleWrite($sPath & "/" & $aFiles[$i][0] & @CRLF)
Next
EndIf
EndIf

[/autoit]

unter 3.3.6.1 laufen beide Versionen,

mfg autoBert

Beiträge von autoBert

Pfad zur Datei, die gerade am Bildschirm angezeigt wird auslesen

Fokus von Child-GUI an Parent binden

INI-File, Combo-Box, Liste zur Auswahl und Ergänzung

FTP Server trennt Verbindung

[FTP] ganzer ordner Download (problem mit _FTPFilesListToArray)

[Beispiel] Update 13.03.13 FTP-Downloader (rekursiv mit allen Unterverzeichnissen)

VPN verbindung Starten

Captcha in GUI anzeigen

[FTP] ganzer ordner Download (problem mit _FTPFilesListToArray)

GUI zeigen in onevent-mode, sonst unsichtbar

[FTP] ganzer ordner Download (problem mit _FTPFilesListToArray)

VPN verbindung Starten

[FTP] ganzer ordner Download (problem mit _FTPFilesListToArray)

Fremddateien "includen" (ohne FileInstall)

Control ID eines Buttons auslesen [Minecraft]

Gesamten Ordner von FTP Server herunterladen

Control ID eines Buttons auslesen [Minecraft]

GUI zeigen in onevent-mode, sonst unsichtbar

Bekannte Bugs in 3.3.8.1?

Bekannte Bugs in 3.3.8.1?