Ftp non interactif sous vb6 [Résolu]

Signaler
Messages postés
4
Date d'inscription
jeudi 13 mai 2010
Statut
Membre
Dernière intervention
14 juin 2010
-
Messages postés
4
Date d'inscription
jeudi 13 mai 2010
Statut
Membre
Dernière intervention
14 juin 2010
-
Bonjour ,
je suis un débutant en développement et j'effectue un stage ou je viens de concevoir une application sous vb6 qui me permet d'analyser et traiter des fichiers sous format txt. Pour le moment, il n'y a aucun souci car les fichiers que je traite sont en locales.
Le bémol est que mon application doit être capable de traiter les fichiers venant des postes distants. Ftp répond à la question, mais mon encadrant me demande de développé un ftp non interactif pour éviter le problème de pswrd.
je suis un peu perdu sur cette question , et j'aimerais avoir des éclaircissement.
Merci d'avance, et bonne journée à vous!

6 réponses

Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
62
tentes ce genre de syntaxe :

ftp://login:password@host:port/folder/file

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
62
Une simple fonction suffit...

voir les APIs suivantes :

InternetOpen
InternetConnect
FtpOpenFile
InternetReadFile
CloseHandle
InternetCloseHandle

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
62
j'ai un problème au moment de récupérer les fichiers


un message d'erreur quelconque ?

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
4
Date d'inscription
jeudi 13 mai 2010
Statut
Membre
Dernière intervention
14 juin 2010

Merci pour votre feedback Renfield. Mais je dois intégrer cette syntaxe dans quelle partie de mon code.
Dois je le mettre dans la partie du code correspondant à l'ouverture du fichier
Cordialement!
Messages postés
4
Date d'inscription
jeudi 13 mai 2010
Statut
Membre
Dernière intervention
14 juin 2010

Merci,
je viens de faire aujourd'hui une autre méthode en faisant appel à l'activex chilkatftp2.
j'arrive à me connecter au serveur, mais j'ai un problème au moment de récupérer les fichiers. A mon avis , je pense que je peche avec la localisation du fichier.
je vous mets le code que j'utilise et en gras l'endroit ou je pense qu'il y a un souci .
cordialement


Dim success As Boolean

ftp.HostName = "10.128.14.20"
ftp.Username = "stage"
ftp.Password = "stage11"

' Connect and login to the FTP server.
success = ftp.Connect()
If (success <> True) Then
MsgBox ("La connexion au serveur FTP a échouée")
Exit Function
End If
' Download a file.
[b]Dim localFilename As String
localFilename = "C:\Fichiers\MMIS"
Dim remoteFilename As String
remoteFilename = "export/local/home/stage/exemple"

success = ftp.GetFile(remoteFilename, localFilename)/b
If (success <> True) Then
MsgBox ("Transfert a échoué")
Exit Function
End If
ftp.Disconnect
MsgBox ("File Downloaded!")
Messages postés
4
Date d'inscription
jeudi 13 mai 2010
Statut
Membre
Dernière intervention
14 juin 2010

J'ai pas de message d'erreur quelconque , mais il exécute pas la ligne : [b]success = ftp.GetFile(remoteFilename, localFilename)
/b
Car le message qui me donne est "Transfert a échoué".
cordialement