Ftp non interactif sous vb6 [Résolu]

madjeku 4 Messages postés jeudi 13 mai 2010Date d'inscription 14 juin 2010 Dernière intervention - 3 juin 2010 à 10:28 - Dernière réponse : madjeku 4 Messages postés jeudi 13 mai 2010Date d'inscription 14 juin 2010 Dernière intervention
- 14 juin 2010 à 17:20
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!
Afficher la suite 

Votre réponse

6 réponses

Meilleure réponse
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 3 juin 2010 à 10:55
3
Merci
tentes ce genre de syntaxe :

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

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 69 internautes ce mois-ci

Commenter la réponse de Renfield
Meilleure réponse
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 3 juin 2010 à 16:04
3
Merci
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

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 69 internautes ce mois-ci

Commenter la réponse de Renfield
Meilleure réponse
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 14 juin 2010 à 16:13
3
Merci
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

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 69 internautes ce mois-ci

Commenter la réponse de Renfield
madjeku 4 Messages postés jeudi 13 mai 2010Date d'inscription 14 juin 2010 Dernière intervention - 3 juin 2010 à 16:00
0
Merci
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!
Commenter la réponse de madjeku
madjeku 4 Messages postés jeudi 13 mai 2010Date d'inscription 14 juin 2010 Dernière intervention - 14 juin 2010 à 16:06
0
Merci
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!")
Commenter la réponse de madjeku
madjeku 4 Messages postés jeudi 13 mai 2010Date d'inscription 14 juin 2010 Dernière intervention - 14 juin 2010 à 17:20
0
Merci
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
Commenter la réponse de madjeku

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.