Discussion :

[Corben]

Bonjour j'essaye de transferer un fichier via FTP et Inet mais sans succès la connexion se passe bien mais pas de transfert pourquoi cela ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Private Sub Command1_Click()
nomfichiersource = "c:test.txt"
nomfichierserveur = "test.txt"
 
 
With Inet1
.URL = "ftp://serv5"
.UserName = "ggg"
.Password = "ggg"
.Execute , "PUT ", "nomfichiersource", "nomfichierserveur"
Do While .StillExecuting = True
DoEvents
Loop
End With
End Sub

Cordialement,
Corben

[Delbeke]

Heu, bêtement, quelque chose comme çà ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Execute , "PUT ", nomfichiersource, nomfichierserveur

[Corben]

Merci pour ton aide

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Private Sub Command1_Click()
nomfichiersource = "c:\test.txt"
nomfichierserveur = "test.txt"
 
 
With Inet1
.URL = "ftp://serv5"
.UserName = "ggg"
.Password = "ggg"
.Execute , "PUT ", nomfichiersource, nomfichierserveur
'Do While .StillExecuting = True
'DoEvents
'Loop
End With
End Sub

Cela me donne comme erreur Impossible de forcer le type ...

[Delbeke]

Après vérification de l'aide en ligne de vb

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Inet1.Execute , "PUT " & nomfichiersource & " " & nomfichierserveur

[Corben]

Merci bcp je laisse mon code en entier.
Pour la commande "QUIT " est ce que la liason est bien interrompu en faisant ca ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Command1_Click()
nomfichiersource = "c:\test.txt"
nomfichierserveur = "test.txt"
 
 
With Inet1
.URL = "ftp://serv5"
.UserName = "ged"
.Password = "sculfortged"
.Execute , "PUT " & nomfichiersource & " " & nomfichierserveur
Do While .StillExecuting = True
DoEvents
Loop
.Execute , "QUIT "
 
End With
End Sub

Cordialement,
Corben

[Delbeke]

Je sais pas, je n'utilise jamais INET, regarde l'aide en ligne