Grafik Hochladen mit Inet (VB.6)

  • VB6

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Mad Andy.

    Grafik Hochladen mit Inet (VB.6)

    Moin meine Freunde, ich bin neu hier und hoffe, das ich hier richtig bin.

    Also. ICh möchte eigentlich nur eine grafik auf meine FTP bei funpic hochladen, aber es soll halt über mein eigenes Programm passieren. Ich wollte es eigentlich mit der Komponennte Inet machen, weil es mit Textdokumenten ohne probleme funktioniert. Hier ist mal mein code mit dem ich es versuche und mit dem nix ankommt.

    Visual Basic-Quellcode

    1. Private Sub Command1_Click()
    2. With Inet1
    3. .Cancel
    4. .Protocol = icFTP
    5. .URL = "http://++++++.++.funpic.de"
    6. .UserName = "++++++"
    7. .Password = "++++++"
    8. End With
    9. Do While Inet1.StillExecuting: DoEvents: Loop
    10. Inet1.Execute , "PUT C:\Test.gif Test.gif"
    11. Do While Inet1.StillExecuting: DoEvents: Loop
    12. DoEvents:
    13. Inet1.Execute , "quit"
    14. Do While Inet1.StillExecuting: DoEvents: Loop
    15. MsgBox "UPLOAD ist beendet"
    16. End Sub


    Mhh ich weis allerdings nc iht, ob es an funpic.de liegt, vielleicht sperren sie externe Uploads, oder ob es am code liegt.
    Es kommt sogar meine Msgbox das der upload fertig is...... mhh ich hoffe ihr könnt mir schnell helfen. ich würde es selbstverständlich auch mit anderen komptonennten versuchen als Inet.....

    mfg sVa, schonmal danke ?( :cursing: ?(