uso questo codice per caricare in ftp un file

codice:
 While Inet.StillExecuting: DoEvents: Wend
 Inet.Execute "", "CD primadir.it"
 While Inet.StillExecuting: DoEvents: Wend
 Inet.Execute "", "CD DB"
 While Inet.StillExecuting: DoEvents: Wend
 ist = "PUT " & Chr(34) & App.Path & "\lloyd.mdb" & Chr(34) & " lloyd.mdb"
 Inet.Execute "", ist
 While Inet.StillExecuting: DoEvents: Wend
in questo modo non funziona. non carica niente. se invece cabio cartella sostituendo

Inet.Execute "", "CD DB"

con, ad esempio,

Inet.Execute "", "CD include"

funziona perfettamente.

nzomma mi carica il file correttamente in tutte le cartelle del sito tranne in quella dove mi serve.
che posso fare?