Daten auf ein FTP Server schiken

    Also ich habe mir mal so ein paar fragen genommen die ich in einem forum fragen will und in eine au3 gestopft
    jetz will ich wen man das hinschreibt was man will an ein ftp server verschikt wird aber ich weis nicht wie


    wen das verboten ist zu fragen dan pls closen

    ps: es solte hir hingeschikt werden http://waswer.wa.funpic.de/

    Mein vorlage ^^
    [autoit]

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Paul\Desktop\Koda 1.7\Forms\test.kxf
    $Form1 = GUICreate("Test", 174, 403, 193, 125)
    $Input1 = GUICtrlCreateInput("", 8, 32, 145, 21)
    $Label1 = GUICtrlCreateLabel("Wie heist du ?", 8, 8, 72, 17)
    $Label2 = GUICtrlCreateLabel("Wie alt bist du ?", 8, 56, 80, 17)
    $Input2 = GUICtrlCreateInput("", 9, 80, 143, 21)
    $Label3 = GUICtrlCreateLabel("Woher kommst du ?", 8, 104, 99, 17)
    $Input3 = GUICtrlCreateInput("", 8, 128, 145, 21)
    $Label4 = GUICtrlCreateLabel("Was ist dein lieblings Essen ?", 8, 152, 143, 17)
    $Input4 = GUICtrlCreateInput("", 8, 176, 145, 21)
    $Label5 = GUICtrlCreateLabel("Was ist deine lieblings Musik ?", 8, 200, 148, 17)
    $Input5 = GUICtrlCreateInput("", 8, 224, 145, 21)
    $Label6 = GUICtrlCreateLabel("F", 160, 32, 10, 17)
    $Label7 = GUICtrlCreateLabel("F", 160, 80, 10, 17)
    $Label8 = GUICtrlCreateLabel("F", 160, 128, 10, 17)
    $Label9 = GUICtrlCreateLabel("P", 160, 176, 11, 17)
    $Label10 = GUICtrlCreateLabel("P", 160, 224, 11, 17)
    $Label11 = GUICtrlCreateLabel("F = Freiwilig", 8, 256, 59, 17)
    $Label12 = GUICtrlCreateLabel("P = Pflicht", 8, 280, 52, 17)
    $Button1 = GUICtrlCreateButton("Fertig", 8, 376, 155, 25, 0)
    $Checkbox1 = GUICtrlCreateCheckbox("Ich bin einferstanden das ", 8, 304, 153, 17)
    $Label13 = GUICtrlCreateLabel("diese Daten ins Internet verschikt", 8, 328, 165, 17)
    $Label14 = GUICtrlCreateLabel("werden dürfen", 8, 352, 72, 17)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    $in1 = GUICtrlRead ($Input1)
    $in2 = GUICtrlRead ($Input2)
    $in3 = GUICtrlRead ($Input3)
    $in4 = GUICtrlRead ($Input4)
    $in5 = GUICtrlRead ($Input5)
    $Check = GUICtrlRead ($Checkbox1)
    If $Check = 1 Then
    MsgBox (0,"","Danke")
    EndIf
    EndSwitch
    WEnd

    [/autoit]

    Ich würd einfach mal sagen du könntest hierbei die ftp.au3 nehmen und damit die datei hochladen.

    Edit: zu spät :D

    könte jemand mal die ftp.au3 hochladen ?

    Spoiler anzeigen
    [autoit]

    #include<ftp.au3>
    $server = 'ftp.waswer.wa.funpic.de'
    $username = 'xxx'
    $pass = 'xxx'

    $dll = DllOpen("wininet.dll")

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

    $Open = _FTPOpen("MyFTP Control")
    If @error Then MsgBox(64,"Verbindung", "ftpopen fehlgeschlagen")
    $Conn = _FTPConnect($Open, $server ,$username ,$pass )
    If @error Then MsgBox(64,"Verbindung", "ftpConnect fehlgeschlagen")
    _FtpSetCurrentDir($Conn, "/pub/irgendwas/") ;Verzeichnis auf dem Server wechseln
    If @error Then MsgBox(64,"Verbindung", "ftpSetCurrentDir fehlgeschlagen")
    $Ftpp = _FtpPutFile($Conn,'C:\hallo.txt')
    If @error Then MsgBox(64,"Verbindung", "ftpPutFile fehlgeschlagen")
    $Ftpc = _FTPClose($Open)
    If @error Then MsgBox(64,"Verbindung", "ftpclose fehlgeschlagen")

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

    DllClose($dll)

    [/autoit]

    ein error kommt immer linea 12

    manche menschen tuns sich echt schwer...
    wenn du auf meinen link klickst findest du ein beispiel + ftp.au3 im anhang