Discussion :

[jj del amorozo]

bonjours tout le monde

j'ai fait une gestion d'erreur avec try catch

Code :

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

1
2
3
4
    Try
                My.Computer.Network.UploadFile(cheminficsource(i), "ftp://127.0.0.1/mag3/" & nomFichier, "polo", "polo", True, 500)
            Catch ex As Exception
            End Try

mais j'aimerai rajouterun catch pour un numero d'erreur bien precis(550)

explication pourquoi :
j'ai fait un service windows qui envoie des fichiers sur un FTP.
Mais dans certains cas les fichier envoyé doivent etre mis dans un repertoire, mais ce repertoire n'existe pas forcement sur lez serveur FTP.

Quand je faity le FTP et que le repertoire n'existe pas j'ai un message d'erreur

Code :

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

Le serveur distant a retourné une erreur : (550) Fichier non disponible (par exemple, fichier introuvable, accès impossible).

j'aimerai recuperer son num d'erreur et dans un catch créer ce repertoire.

En esperant avoir ete assez claire

JJ

[Bal1n]

Hop

Moi je ferais un truc du style :

Code :

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

1
2
3
4
5
6
7
8
 
Try
                My.Computer.Network.UploadFile(cheminficsource(i), "ftp://127.0.0.1/mag3/" & nomFichier, "polo", "polo", True, 500)
            Catch ex As Exception
                  if err.number = 550 then 
                        msgbox "PAS BIEN !!!"
                  end if
            End Try

Par contre je ne crois pas que le numéro d'erreur soit 550 dans ton cas. Vérifie avec un Msgbox(err.number) pour connaitre le vrai.

++

[jj del amorozo]

ok merci
je test de suite et je vous tiens au courant

JJ

[jj del amorozo]

ok c'est bon merci

j'ai plus qu'un pb avec la creation d'un repertoire sur le ftp

JJ