OCX - CLIENT FTP . AJOUTER DU FTP DANS VOS APPLI

Information sur la source

Catégorie :Réseau & Internet Niveau : Débutant Date de création : 26/11/2004 Date de mise à jour : 26/11/2004 14:03:36 Vu / téléchargé: 5 887 / 1 677

Auteur : Renfield

Ecrire un message privé

Ce membre participe au partage de revenus publicitaires

Note :

8,67 / 10

Commentaire sur cette source (39)

Ajouter un commentaire et/ou une note

Description

Salut, à tous

un code que j'ai sous le coude depuis quelques moments,

c'est un controle qui permet de faire du FTP....
rien de bien extraordinaire, mais c'est une base qui peut être complétée.

pas de projet rattaché, ni de documentation (et encore moins de commentaires), désolé...

Conclusion

J'ai choisi de ne pas utiliser les API de WinInet, car elles ont des soucis dans la récupération de la date des fichiers sur des serveurs FTP francais...

je n'utilise pas non plus le controle WinSock, mais la classe cSocket trouvée sur www.vbip.com
elle est ultra rapide comparée à Winsock...

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Class_FSElement.cls 3 994 octets
Class_FSElements.cls 2 775 octets
CSocket.cls 66 873 octets
Module1.bas 248 octets
MSocketSupport.bas 50 170 octets
Rey_FTP.ocx135 168 octets
Rey_FTP.vbp 916 octets
ReyFTP.ctl 23 792 octets
ReyFTP.ctx3 924 octets

Télécharger le zip

Historique

26 novembre 2004 14:03:37 :: Precision dans le titre

Sources du même auteur

Toutes les sources de Renfield

Sources de la même categorie

Toutes les sources de la catégorie Réseau & Internet

Commentaires

Commentaire de thierrydelepine le 26/11/2004 13:56:54

petite question est ce que ton OCX fonctionne avec Unix car il y a quelques différences avec windows ?
Commentaire de Renfield le 26/11/2004 13:59:47 administrateur CS

Oui, je m'en sers au boulot avec des serveurs sous Unix....
Commentaire de thierrydelepine le 26/11/2004 17:40:19

merci Renfield je le testerai cela m'interresse beaucoup surtout avec UNIX
Commentaire de Urgo le 26/11/2004 18:45:24

vbip.com pour ne pas changer :)
C'est vrai qu'elle est merveilleuse cette classe...

Je vois que tu as utilisé un Timer pour la commande "NOOP", on peut guère faire mieux. Bel exemple que tu postes là ;)
10/10
Commentaire de Renfield le 26/11/2004 18:55:12 administrateur CS

on pourrais utiliser l'API SetTimer, mais le controle Timer fais ca bien...

Merci ;-)
Commentaire de olivierXIII le 26/11/2004 20:34:28

J'avais déjà vu passer la classe cSocket sur un projet.
En quoi est-elle plus rapide?
Temps de réponse? Débit?
Sur vbip.com, l'auteur ne mentionne pas la rapidité, mais je veux bien croire qu'elle soit effectivement plus rapide.

PS: Désolé pour le moitié-hors sujet ;D
Commentaire de AbriBus le 27/11/2004 02:07:27

Renfield, tu peux pas t'empecher de faire des trucs de fous toi !!
encore un code mortel... 20/10...

Que le cSocket soit avec toi...

BriBus...
Commentaire de Scalpweb le 27/11/2004 11:32:26

Oui, c'est vraiment simpa comme source. Bravo à toi. Je ne connaissais pas cette classe, mais je crois que je ne vais plus la lâcher.
Commentaire de Achoum le 27/11/2004 14:59:23

10/10
Un code exeptionnel.
Rien a dire ........ si ce n'est Bravo.

Achoum
Commentaire de zniavre le 30/11/2004 11:30:09

je ne peut pas vraiment emetre une critique constructive sur cette source, etant moi meme bien inferieur a ce niveau...
par contre, j'ai un petit soucis pour avoir le le niveau de progression de l'upload. j'utilise cette fonction :
Private Sub ReyFTP1_TransferProgress(Direction As Rey_FTP.FTPTranferDirection, FileName As String, Percent As Long, ByteSent As Double, FileSize As Double, Speed As Long)
Debug.Print "Percent:" & Percent
End Sub
et ca me sort toujours 100 des le debut de l'upload.
si quelqu'un a la reponse a ce surement TRES simple probleme..... MERCI!!!
Commentaire de Apachefr le 20/12/2004 09:34:16

Félicitations pour cet ocx Renfield, mais une petite documentation ou un projet exemple serait bienvenue.

J'ai cependant une question :
Comment fait on pour utiliser la fonction reyftp.download stp ? merci...

Et vire les REYCOMPONENTS V2 !!!
Commentaire de Apachefr le 20/12/2004 09:35:07

Désolé, VIVE les REYCOMPONENTS V2 !!!
Commentaire de Renfield le 20/12/2004 13:24:59 administrateur CS

sacré labsus ;-)

Download prend plusieurs parametres...

Element... dans lequel tu indiques quel fichier telecharger
TargetPath, qui precise le fichier de destination
et RestSize, qui permet de restaurer un transfert (voir RFC concernant le FTP)

pour l'element, on pourra par exemple mettre :

FTP.Files.Item("ITK30BB0A43RR9P335P01C23368M")

a noter que la méthode Download se trouve également là :

FTP.Files.Item("ITK30BB0A43RR9P335P01C23368M").Download "C:\a.afp"
Commentaire de Yoyo2B le 28/01/2005 12:55:10

salut reinfield,

comme d'hab, tu poste des sources propres, mais là, g un souci !! connection , dwld, etc ... tout est bon, mais dès que je lance un deconnect ==> boucle infinie car aucune réponse du serveur ftp ... pourtant, en analysant ta source, g pas vu de pb, la commande est bonne et tout et tout ...
J'utilise ton contrôle pr me connecter à une dizaine de serveurs ftp, et aucun de ces serveurs ne renvoie de réponse. Grrrr ... c assez gênant ds le principe, car je suis obligé de killer VB6.exe pr m'en sortir. Pr le moment, g palié au pb en mettant un timer, mais la déconnection ne se fait tjrs pas ... aurais-tu une vague idée ???

Merci d'avance pour ta réponse (et ta source ki est qd même plus ke bien pratique !!)
Commentaire de Renfield le 28/01/2005 14:29:39 administrateur CS

j'ai cru remarquer le probleme egalement....

J'ai, je crois fermé les Sockets a la barbare....

Je bosse sur d'autres choses, et je m'apercois que certains serveurs envoient les infos de manière differentes des autres.... je vais devoir retoucher mon code, pour m'adapter (heure envoyée au lieu de l'année)
Commentaire de nihilis le 07/06/2005 15:42:27

Bonjour à tous,

Voila j'utilise cet OCX via Visual FoxPro 9 et j'ai un petit problème.
Après l'appel de Rey_FTP.Connect(...) la propriété Rey_FTP.IsConnected reste à "Faux" et par conséquent bloque tous les autres appels de méthodes.
Est ce que c 'est déjà arrivé à quelqu'un, et si oui qui a une solution ?

Merci d'avance à tous
Commentaire de hex_man le 18/07/2005 01:42:21

Salut j'ai bcp aimé ton ocx, j'ai un peu bataillé pour choppé comment tt ça fonctionnait, mais j'ai toujour sun problème non résolut: le Download marche cependant quand on veut Dl des images ou autres fichiers un peut concéquent fianalement le source reçoit des paramètres incorrectes qui sotn écris dans le fichier de destination. Le problème ne vient pas de l'upload car le fichier sur le serveur est nikel. mais kan on passe au Download la c problématique parcequ'on reçoit une version "corrompue du fichier". j'ai parcuru ton source et j'ai remarqué ke pour tt ce qui est réception de donné tu utilisé winsock et winsock génère le m^me type de problème en P2p lorsqu'on s'ammuse à envoyer un fichier d'un poste à l'autre, j'avais aussi remarqué le m^me type de problème. Mais j'ai jamais réussi a le régler. si tu as une idée je susi totalement preneur (c peut être moi qui utilie mal l'ocx aussi ...) merci d'avance.
Commentaire de Renfield le 18/10/2005 21:10:52 administrateur CS

un admin a semble-t'il supprimé le dernier message qui était en doublon, en même temps que moi.
ce qui fait que celui-ci n'est plus présent...

il concernait la donnée Time qui renvoie 00:00 systématiquement

en fait, chaque serveur, sous chauqe IS implémente les données comme il le souhaite.

Ca m'a donné pas mal de fil a retordre pour que l'on puisse récupérer les infos, la plupart du temps.

Je ne me souviens pas en détails de la structure de mon composant, mais il est possible de pouvoir récupérer directement les données brutes, renvoyées par le serveur.

libre à toi de les découper, dans ton programme, ou de modifier le composatn pour pouvoir récupérer une heure correcte.
Commentaire de calsn le 20/10/2005 14:27:12

Effectivement, c'est moi qui avait posté (j'ai un peu la tremblotte et du coup... Je poste en double lol)

c'est effectivement la fonction time qui ne fonctionne plus sous VB lorsque ton composant est présent.

Rien d'étonnant à cela lorsque l'on éppluche ton code puisque tu en a fait une variable pour ton OCX (pardonnez mon language approximatif mais je me suis mis au code très vieux et je manque un peu de vocabulaire)

Comme solution, au lieu de retoucher ton code (il est tellement parfait que je n'oserai le défigurer !) j'ai simplement créé mon OXC qui renvoit l'heure. Ainsi, le problère est résolu.

Au lieu, dans mon code de tapper 'Time' pour récupérer l'heure système, je tappe 'cheure.heure' cheure étant le nom de mon OCX et heure la variable qui renvoie l'heure...

C'est du bidouillage fait en 3 minutes, mais ça résoud le soucis sans retoucher à ton code.

Voila monsieur.
Commentaire de Renfield le 20/10/2005 16:27:11 administrateur CS

content de voir que tu as mis les mains dans le code, avec brio
Commentaire de calsn le 20/10/2005 17:45:03

J'ai en fait développé, entre autres, un logiciel de diffusion Musicale / Publicité / Animation pré-enregistrée contrôlé par un serveur distant, le tout en Direct X.

Il me manquait un OCX performant pour le transfert de fichiers, ce que j'avais fait étant trop lent et assez peu complet.

C'était la seule pièce qui manquait à mon puzzle. Maintenant c'est fait ; et ça marche.

Merci pour ton aide précieuse.

... Je t'ai noté 9/10 eu égard à ce soucis de 'time' (je sais, un vieux c'est vache, ça ne laisse rien passer !)
Commentaire de fiko81 le 08/01/2007 20:29:12

Moi je dis... En fait rien à dire c'est parfait.
Sans vouloir négliger les autres sources qui sont censées faire la même chose, c'est la seule qui m'a permis de réaliser ce que je veux sans problème...
Merci pour ta source.
10/10
Commentaire de Renfield le 09/01/2007 06:48:12 administrateur CS

content que ca te serve ^^
Commentaire de Ulthar le 31/05/2007 16:43:24

L'objet est bien mais j'ai un problème à l'utiliser.
J'arrive à me connecter et à changer de répertoire mais il m'est impossible de télécharger (download) ou d'envoyer (uplod) avec. Il ne se passe rien (juste un petit bloquage de quelques secondes).
J'affiche le Log et je remarque qu'il ne se passe réellement rien avec ces deux commandes et aucun des évènement 'Transfert' ne réagit.
Pour uploader, je fais par exemple:
.connect "serveur","login","password"
.path = "\pub"
.dataconnect
.upload "C:\image.jpeg","image.jpeg"
.disconnect
Tout fonctionne sauf l'upload, aurais-je oublier quelque chose?
Commentaire de Ulthar le 31/05/2007 16:46:45

J'ai oublier d'indiquer que j'ai essayer sur plusieurs serveur et cela marche avec d'autres clients FTP.

Merci
Commentaire de simonth58 le 31/05/2007 22:01:08

A l'aide j'essaie par tous les moyens de faire marcher la commande download mais sérieusement je ne réussis pas a la faire fonctionner, et est-ce que quelqu'un pourrait me l'expliquer s'il vous plait?
Commentaire de Renfield le 31/05/2007 23:44:52 administrateur CS

pas ca en tete...
mais pas besoin d'appeler .DataConnect, me semble

a voir également si tu dois etre en mode passive ou non...
Commentaire de Ulthar le 04/06/2007 10:02:54

J'ai essayé avec les deux modes PASV ou non et dans les deux cas tout fonctionne sauf les transferts de fichiers.
J'ai essayé sans la commande .dataconnect sans meilleur resultat.
Merci pour vos réponse rapide.
Commentaire de Renfield le 04/06/2007 12:08:13 administrateur CS

qu'entends tu exactement par "ne fonctionne" pas ?

un message d'erreur ?
rien en sortie ?
...
Commentaire de kgdecaen le 19/01/2008 19:54:05

j'ai pas pu essayer ce code car dans mon programme dès que je charge l'ocx ftp dans les references bah ca me créer un erreur sur ma variable time$ ... dommage surtout que plein de monde le trouve cool mais moi j'ai pas pu l'ajouter dans ma source mais bon sinon ca marche bien avec ta source 10/10 bon code dommage que ca me bloque ma variable time$ ++ mon msn est kgdecaen@hotmail.com si tu veux qu'on se contact ;) @++
Commentaire de Renfield le 19/01/2008 23:29:52 administrateur CS

quoi cette histoire de time$ ?
Commentaire de kgdecaen le 22/01/2008 21:19:56

dès que je charge le plugin bah la variable time$ est dead car dans mon prog je mets un text1.text = time$ et ca marche pas mais bon j'ai pris la vielle technique du shell (ftp )
Commentaire de Renfield le 22/01/2008 21:44:31 administrateur CS

suffisait pourtant d'écrire :

Text1.Text = DateTime.Time$
Commentaire de kgdecaen le 22/01/2008 21:46:56

bah normalement text1.text = time$ devrait fonctionner logiquement mais l'ocx doit avoir ouvert une variable time$ aussi je crois
Commentaire de Renfield le 22/01/2008 22:31:57 administrateur CS

précisément.
on retrouve ce soucis frequemment, il suffit d'utiliser la fonction avec le nom de la lib...

on a souvent ca avec les fonctions de Texte
Commentaire de drakkard le 07/04/2008 17:45:35

Bonjour,

vraiment très intéressante cette source...
Une aide ( quelques exemples upload / download ) aurait été un plus, car pas évident pour les non initiés...
Commentaire de drakkard le 07/04/2008 18:29:28

Arghhh....

lorsque je tente de faire reyftp.files.count
j'ai un message d'erreur sur le serveur FTP 425 can't open data connection
si je fais reyftp.sendcommand("LIST")
je n'ai pas de problème à ouvrir le data connection...

Une idée ?
Commentaire de Renfield le 07/04/2008 19:23:43 administrateur CS

faut que je repasses dessus competement, la source est hors d'age et mal concue, surement a l'epoque
Commentaire de drakkard le 08/04/2008 09:28:28

Merci à toi,

HO GRAND RENFIELD ;-)

Dans l'attente de voir ton code de ouf comme d'hab...