piter123 (Normal User)
Pro
Messaggi: 145
Iscritto: 21/05/2008
|
Salve, ho trasformato un vecchio pc in un server ftp utilizzando typsoft.
Ho creato un utente esempio piter con password 123, ho creato la cartella pricipale e ho settato il flag sull'autorizzazione download. Ftp è settato in ascolto sulla porta 1800
ora da vb6 gli impartisco i seguenti comandi che mi collegano al server e mi autenticano ma non mi scaricano il file richiesto, dove sbaglio ?
Dim res As Long
Dim URL As String
Dim LocalFilename As String
LocalFilename = App.Path & "\prova.txt"
URL = "FTP://piter:123@xxx.xx.xxx.xxx:1800\prova.txt"
res = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
Se però questo codice lo lancio dal pc dove è installato typsoft, ovviamante inserendo come indirizzo ip 127.0.0.1, il tutto funziona
|