Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

ENVOIE LES ADRESSES IP VERS UN SERVEUR FTP EN FICHIER TEXTE(MODIFIÉ)


Information sur la source

Catégorie :Réseau & Internet Niveau : Débutant Date de création : 01/11/2003 Date de mise à jour : 02/11/2003 14:46:44 Vu / téléchargé: 2 228 / 379

Note :
Aucune note

Commentaire sur cette source (12)
Ajouter un commentaire et/ou une note

Description

c' est mon premier prog en vb donc c'est assez simple: ca créer un fichier texte(IPpc.txt) avec les IP de la machine puis ca envoie le fichier sur un serveur ftp.
j' ai  résupérer des codes sur ce site que j' ai assemblé.(il y a pas grand chose de moi)
g modifier le zip il y a deux version:
premiere version :
le module + la frame  (avec ftp.exe) ca marche inconvéniant 2 fichier texte restant  et le processus qui reste ouvert
deusieme version: avec inet + le module  c' est plus simple pas de fichier texte ni de processus ouvert
pour configurer le controle inet clique droit>propriété>entrer le serveur lenon d' utilisateur et le mot de passe (ca s' implifie les ligne de code pour le configurer)



 

Source

  • 'tout dans le zip: le module(pas de moi) et deux versions del a frame(commenté)
  • ' il faut en utiliser une seule
'tout dans le zip: le module(pas de moi) et deux versions del a frame(commenté) 
' il faut en utiliser une seule

Conclusion

Je suis débutant donc j' ai besion de vos commentaires.
je m' éscuse pourceux a qui g piqué les scripts et pour les fautes .
Au début je voulais le faire par envoie de mail mais j' ai rien trouvé de simple et qui marche (besion d' aide pour ca ).
il y a une erreur au chargement de la frame avec inet car le controle inet n' est pas configuré
Merci de commenté.
 

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 !

Télécharger le zip

Commentaires et avis

signaler à un administrateur
Commentaire de Kazuya le 01/11/2003 22:46:41

Tu a oublié de mettre le fichier .vbp et il y a un gros problem aussi, quand tu ferme ton appli, le process ftp.exe reste en cours d'execution, apart ça, sa semble fonctionner.
apart sa, je pense que tu aurai du utiliser winsock avec le protocole FTP pour le transfert de données.
bon, cela-dit, pour un premier prog, c pas mal, continue comme sa

signaler à un administrateur
Commentaire de x28x le 02/11/2003 00:30:21

ou est ceque l on mais  l adresse du serveur ftp sur le kel le fichier est envoyé ? je voit pas :'( sinon bravo super prog

signaler à un administrateur
Commentaire de legion91 le 02/11/2003 02:35:41

Meme principe que FTP2DNS de ZedmatriX.
Deplus utilisez shell ftp sa fait tres bricolage, meme si c du deja vu, je preferai voir le composant Inet ou une bonne API.
Sur ceux bonne prog.

signaler à un administrateur
Commentaire de lataupeben le 02/11/2003 10:28:04

pour Kazuya le process ftp.exe ce ferme aprés normalement (.writeline "quit") Ca dépant du temp qu' il met a se connecter au serveur.
x28x on le met a coté de open (je sais c' est pas claire)
legion91:je sais que ca existe déja met j' en ai essayer plein qui marché pas alors j' ai abandonné
De plus je débute et connais rien à inet ,API , winsock.
Merci pour vos conseil.

signaler à un administrateur
Commentaire de legion91 le 02/11/2003 12:08:48

Ben c simple la ou ya les composant (textbox, listbox...), tu fai un clic droit, la tu clic sur composant, puis dans le fenetre qui s'ouvre du coche "Microsoft Internet Transfert Control 6.0" et tu fai appliker.
A partir de la tu peut voir un nouvelle icone, c celui de Inet.

Maintenant dans ta feuille tu met(pour le transfert)
'transfert

With Inet1
        .URL = "serveur_ftp_" & ":" & "port_du_serveur"'part defaut 21
        .UserName = "login"
        .Password = "pass"
        .Execute , "PUT " & path_local_du_fichier & (" " & path_distant_du fichier )
End With

'remarque pour simplifie l'url: URL = "ftp://login:pass@serveur:port", sa evite de specifie username et passeword.


'inect actif(transfert en cour...)
Do Until Inet1.StillExecuting = False 'boucle pendant inet actif
' " Wait please.."
DoEvents
Loop

Inet1.Execute , "close"'on ferme la connexion

Msgbox "Transfert terminé"

Pour les API si tu debute vraiment attend un peu mais jte conseil de visiter http://docvb.free.fr/api.php ya une liste API, c vraiment bien expliker et en pluc c en francais.

Voila j'espere que sa peut aider sur ceux @+

signaler à un administrateur
Commentaire de lataupeben le 02/11/2003 12:21:28

grand merci je savais pas on doit pouvoir ajouter les controle winsock et tous le reste je pense?

signaler à un administrateur
Commentaire de lataupeben le 02/11/2003 12:36:49

esc ce que tu peut expliquer cette ligne stp legion91

.Execute , "PUT " & path_local_du_fichier & (" " & path_distant_du fichier )

signaler à un administrateur
Commentaire de legion91 le 02/11/2003 14:40:12

PUT est la commande ftp pour initialiser un transfert.
path_local_du_fichier c le nom du fichier sur ton disque (ex: "c:fichier.txt)
path_distant_du fichier c le path avec le nom du fichier souhaiter sur le ftp (ex: "IP.txt", ou  signifie racine.)

signaler à un administrateur
Commentaire de legion91 le 02/11/2003 14:44:39

oublie pas de mettre un slash(car vbfrance les effaces dans les commentaires) devant IP.text, c slash signifie racine.

signaler à un administrateur
Commentaire de lataupeben le 02/11/2003 18:41:51

.Execute , "put " & "C:ippc.txt" & " /" & "ippc.txt"
moi ca donne ca et ca marche pas aide svp

signaler à un administrateur
Commentaire de legion91 le 03/11/2003 17:38:50

c anti-slash sorry "" :-(

signaler à un administrateur
Commentaire de sitemo le 01/07/2005 16:59:18

il ya des erreur il manque projet.vbp
voilà
MK

Ajouter un commentaire



Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,234 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.