Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - problemi con l'invio ftp
Forum - Visual Basic 6 - problemi con l'invio ftp

Pagine: [ 1 2 ] Precedente | Prossimo
Avatar
kiasmo72 (Normal User)
Rookie


Messaggi: 44
Iscritto: 23/09/2007

Segnala al moderatore
Postato alle 0:08
Lunedì, 01/10/2007
ciao, ho fatto una semplice applicazione per inviare, via ftp, un file dal mio pc al mio spazio web.La connessione funziona ma il file non mi arriva, dov'è l'errore? (il codice è consigliato sul sito microsoft).

Private Sub Command1_Click()
nomeDir = "c:\miofile"
nomeFile = Dir(nomeDir, vbNormal)

While nomeFile <> ""
Inet1.URL = "FTP://ftp.webalice.it"
Inet1.UserName = "miouser"
Inet1.Password = "miapass"

Inet1.Execute Inet1.URL, "PUT " & " " & nomeDir & "\" & _
nomeFile & " " & nomeFile

Do Until Inet1.StillExecuting = False
DoEvents
Loop
nomeFile = Dir
Wend

End Sub

Grazie a tutti per l'aiuto:-|

PM Quote
Avatar
gantonio (Normal User)
Guru^2


Messaggi: 1532
Iscritto: 09/09/2007

Segnala al moderatore
Postato alle 7:25
Lunedì, 01/10/2007
Ma se NomeDir deve contenere la cartella locale in cui si trova il file, perche' ci scrivi

"C:\nomefile"

come se tu pensassi che ci deve stare il nome del file (che invece deve stare in NomeFile)?

PM Quote
Avatar
kiasmo72 (Normal User)
Rookie


Messaggi: 44
Iscritto: 23/09/2007

Segnala al moderatore
Postato alle 8:23
Lunedì, 01/10/2007
Testo quotato

Postato originariamente da gantonio:

Ma se NomeDir deve contenere la cartella locale in cui si trova il file, perche' ci scrivi

"C:\nomefile"

come se tu pensassi che ci deve stare il nome del file (che invece deve stare in NomeFile)?



Grazie intanto della risposta (sempre presente):)
Forse è proprio questo l'errore quindi? Ora provo a modificare il codice mettendo la cartella in nomedir.
Grazie nuovamente del consiglio. Scusa gli errori ma sono autodidatta al 100%..:k:

PM Quote
Avatar
kiasmo72 (Normal User)
Rookie


Messaggi: 44
Iscritto: 23/09/2007

Segnala al moderatore
Postato alle 19:36
Lunedì, 01/10/2007
Ciao Gantonio, ho provato a modificare ma mi da nuovamente errore, sicuramente sbaglio di nuovo.
Se non è di troppo disturbo riposto il codice modificato.

Private Sub Command1_Click()
nomeDir = "c:\miacartella"
nomeFile = Dir(nomeDir, vbNormal)

While nomeFile <> ""
Inet1.URL = "FTP://ftp.webalice.it"
Inet1.UserName = "miouser"
Inet1.Password = "miapass"

Inet1.Execute Inet1.URL, "PUT " & " " & nomeDir & "\" & _
nomeFile & " " & nomeFile

Do Until Inet1.StillExecuting = False
DoEvents
Loop
nomeFile = Dir
Wend

End Sub

Non ho capito se devo sostituire "dir" con il nome del file presente nella directory "nomedir".
Grazie 1000

PM Quote
Avatar
gantonio (Normal User)
Guru^2


Messaggi: 1532
Iscritto: 09/09/2007

Segnala al moderatore
Postato alle 21:25
Lunedì, 01/10/2007
Ma tu quali file vuoi inviare?

Tutti quelli contenuti nella cartella ? Alcuni ?


Ultima modifica effettuata da gantonio il 01/10/2007 alle 21:28
PM Quote
Avatar
kiasmo72 (Normal User)
Rookie


Messaggi: 44
Iscritto: 23/09/2007

Segnala al moderatore
Postato alle 21:38
Lunedì, 01/10/2007
Io dovrei inviare tutto il contenuto della cartella..
Grazie:)

PM Quote
Avatar
gantonio (Normal User)
Guru^2


Messaggi: 1532
Iscritto: 09/09/2007

Segnala al moderatore
Postato alle 21:54
Lunedì, 01/10/2007
E allora devi scrivere

nomeFile = Dir(nomeDir & "\*.*", vbNormal)

PM Quote
Avatar
kiasmo72 (Normal User)
Rookie


Messaggi: 44
Iscritto: 23/09/2007

Segnala al moderatore
Postato alle 22:15
Lunedì, 01/10/2007
Testo quotato

Postato originariamente da gantonio:

E allora devi scrivere

nomeFile = Dir(nomeDir & "\*.*", vbNormal)



Grazie ancora, funziona perfettamente.Ho capito la sintassi ora.Quindi se io volessi spedire solo qualche file sarebbe:nomeFile = Dir(nomeDir & "\miofile" & "\altromiofile", vbNormal).
Di nuovo 1000 grazie Gantonio:k:

Ultima modifica effettuata da kiasmo72 il 01/10/2007 alle 22:15
PM Quote
Avatar
kiasmo72 (Normal User)
Rookie


Messaggi: 44
Iscritto: 23/09/2007

Segnala al moderatore
Postato alle 19:38
Martedì, 02/10/2007
Gantonio scusa, un'ultima domanda a proposito del codice sopra.Se io volessi che dopo tot minuti di inattività ( quindi pulsante non premuto) tutto il contenuto della cartella partisse in automatico, sarebbe possibile? Il tutto risulterebbe troppo complesso?
Grazie ancora:)

PM Quote
Pagine: [ 1 2 ] Precedente | Prossimo