Beiträge von GtaSpider

  • FTP Upload geht nur sporadisch

    Hallo,

    ich meinte es eher so:

    Spoiler anzeigen
    [autoit]

    Local $i_Passive = 0
    Local $l_InternetSession, $l_FTPSession, $errOpen, $errFTP

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

    $aFilelist = _FileListToArray("C:\uninst")
    $l_InternetSession = _FTP_Open('AuoItZilla') ;Öffnet eine FTP Sitzung
    $errOpen = @error
    $l_FTPSession = _FTP_Connect($l_InternetSession, $s_ServerName, $s_Username, $s_Password, $i_Passive) ;Verbindet zu einem FTP Server
    If @error Then Exit MsgBox(16,"","ERROR beim connecten "&@error)

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

    ;Datei suche
    For $i = 1 To $aFilelist[0]
    $ext = StringRight($aFilelist[$i], 4)

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

    If $ext == ".jpg" Then
    If _FTP_FilePut($l_FTPSession, $aFilelist[$i], '/' & $aFilelist[$i]) Then
    ConsoleWrite("Upload: erfolgreich" & @CRLF)
    Else
    ConsoleWrite("Upload: fehlgeschlagen " & " " & @error & @CRLF)
    EndIf
    EndIf
    Next

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

    _FTP_Close($l_InternetSession) ;schliesst die FTP-Sitzung

    [/autoit]

    Gruß
    Spider

  • FTP Upload geht nur sporadisch

    Heyho,

    Ein Mögliches Problem könnte sein, dass du immer wieder eine neue Verbindung öffnest und wieder schließt, wieso? ;) Ich würde am Anfang eine FTP Session öffnen und dann zum Server connecten und dann in der For schleife die Dateien übertragen und ganz zum schluss wieder die Verbindung beenden. Ich schätze mal, dass Funpic nur ne gewisse Anzahl von connects pro Minute zulässt.

    Zu deiner zweiten Frage: Du könntest mit _FTP_ListToArray dir eine Liste ausgeben von den Dateien die schon auf dem FTP Server sind und dann gucken, ob der Dateiname schon existiert ;)

    Gruß
    Spider

  • GUICtrlRichEdit Hilfe

    Hallo Gem,

    Schau dir mal _GUICtrlRichEdit_SetCharColor an. Dann musst du halt immer noch mit einem OnEvent gucken, ob ein neuer Text im RichEdit steht und wenn dann das Wort "hallo" existiert, guckst du mit _GuiCtrlRichEdit_FindText wo sich das Wort befindet und färbst es dann ein ;)

    Gruß
    Spider

  • [Frage] verdient ihr nebenbei geld??

    Heyho,

    Bin noch Schüler (13.) und Programmiere neben bei in AutoIt für paar Firmen und mache Video's (After Effects --> https://autoit.de/www.maxreble.de). Wie viel genau ich da verdiene will ich hier nicht preis geben, aber es ist auf jeden Fall genug :P
    Den ersten Auftrag habe ich hier im AutoIt Forum bekommen, dort hat jemand was in der Jobbörse geschrieben. Die anderen durch z.B. Kontakte durch meinem Vater oder diversen Internetforen. Einfach mal ein wenig googln, gibt genug Leute die verhältnismäßig günstige Programmierer suchen ;)

    Gruß
    Spider

  • Euer erstes Script

    10.07.2004 :P

    Spoiler anzeigen
    [autoit]

    #include <GuiConstants.au3>
    #include <Process.au3>
    #include <Array.au3>
    If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000

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

    GuiCreate("Datei Öffnen", 392, 316,(@DesktopWidth-392)/2, (@DesktopHeight-316)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
    $Button = GuiCtrlCreateButton("..", 300, 130, 20, 20)
    $Button2 = GuiCtrlCreateButton("Starten", 120, 170, 170, 60)
    $Input = GuiCtrlCreateInput("", 100, 130, 190, 20)

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

    $Label = GuiCtrlCreateLabel("Datei Öffnen", 120, 40, 170, 60)
    GUICtrlSetFont(-1,20)

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

    GuiSetState()
    While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    ExitLoop
    Case $msg = $Button
    $append = GuiCtrlRead($Input);
    $data_apnd = FileOpenDialog( "Datei hinzufügen..", "", "All (*.*)", 1)
    If $data_apnd = 1 Then $data_apnd = ""
    $append = $append & $data_apnd
    GUICtrlSetData ($Input, $append);

    Case $msg = $Button2

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

    _RunDOS($append)
    _ArrayDelete( $Input,1)
    EndSelect
    WEnd
    Exit

    [/autoit]

    Außerdem habe ich den Thread mal in >Talk< verschoben ;)

    Gruß
    Spider

  • UDF - AutoIt Scripte miteinander kommunizieren lassen

    Heyho,

    Auch eine nette Idee ;) Ich mache es meistens immer so: Wenn ich Script A habe, das Script B startet lasse ich Script A immer den stdout-stream von Script B auslesen. Script B kann dann via ConsoleWrite daten an Script A übergeben. Ne andere Möglichkeit ist auch die Funktion EnvSet und EnvGet die globale System Variablen setzt.

    Nett wäre eventuell noch, wenn du ein OnEvent hinbekommen würdest. Also wenn Script A etwas zu Script B sendet bemerkt Script B das sofort (egal was Script B grade macht). Da du ja sowieso mit GUIs arbeit könntest du dir mal GuiRegisterMsg für Script B und _SendMessage für Script A angucken ;)

    Gruß
    Spider

  • [win7] Vorschaufenster Animationen sind weg

    Heyho,

    Es ist zwar nur ein kleines Problem, und die meisten werden sagen: "Pff, soll der sich mal nicht so anstellen" - aber es ist doch irgendwie ein Dorn im Auge ;)
    Also: Wenn man mit der Maus in der Taskleiste über ein Fenster geht, erscheint nach ein paar ms ein Vorschaufenster. Soweit so gut. Bei euch wird es sicherlich so sein, dass das Vorschaufenster eingeblendet wird, bei mir wirds einfach brutal angezeigt (ohne Einblendung o.ä.). Wenn ich jetzt in der Taskleiste auf das nächste Fenster gehe (meine Maus einfach aufs nächste Fenster verschiebe), sollte eigentlich eine schöne Flüssige Animation zum nächsten Fenster führen - tut es auch nicht, wieder ein brutales Ausblenden des ersten und brutales Einblenden des zweiten Fensters.

    Hat jemand ne Idee woran das liegen kann?
    Ich schätze es ist ein REgistrywert entweder hier:

    Code
    HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced


    oder hier

    Code
    HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\VisualEffects

    Google konnte mir aber leider auch nicht weiterhelfen :( Über ne Antwort würde ich mich sehr freuen :)

    Gruß
    Spider

  • Welchen Internet Browser für Windows nutzt ihr - Umfrage ?

    Früher FF jetzt Chrome. Bei mir hats aber schon mit der 3.0 Version von FF angefangen. Er ist einfach so irre Langsam geworden, alleine das starten hat eine halbe Ewigkeit gebraucht.
    Warum ich dann schließlich zu Chrome gewechselt bin?

    • Schnell (sowohl im Inet als auch das starten (dauert < 1 sec))
    • Schlicht
    • Alle wichtigen AddOns
    • HTML 5

    Sehe keinen Grund mehr an den FF festzuhalten ;)

    Gruß
    Spider

  • Neue Google Seite - bin ich der einzige?!

    Heyho,

    Ich habe seit gestern Nacht eine leicht überarbeitete Google Seite und ich weiß nicht wieso, weil ich bisher alle die ich gefragt habe, immer noch die Standard Seite haben. Viel geändert hat sich nicht, es sieht aber alles ein wenig schlichter und eleganter aus. Ich benutze Google Chrome, aber ein Kumpel von mir auch, der hat dieses Phänomen aber nicht. Im Internet find ich auch nichts über eine neue Seite. Nun stellt sich für mich die Frage: Bin ich der einzige Mensch auf der Welt, der eine überarbeitete Google Seite hat? :P Oder gibt es hier noch andere? Hier mal ein Bild:
    http://y07.img-up.net/?up=Unbenanntq6sj9.JPG

    Gruß
    Spider