Bei deiner for..do Schleife fehlt die Verbundanweisung (begin..end).
Ohne diese wird nur die erste Zeile nach dem do ausgeführt und es kommt somit zu einem Fehler.

Zudem musst du die FTP-Verbindung nicht bei jeder Datei wieder neu herstellen. Es reicht, wenn du das FTP-Objekt einmal erstellt und dann alle Dateien mit dieser hochlädst.