Ftp avec shell

Contenu du snippet

En fait ce code appel le prog FTP.exe que tt le monde a sur son ordinateur, et lui dit de faire ce qu'il ya marqué dans un fichier indiqué !

le seul incvénient qui n'est pas tres emebettant c'est qu'il faut connaitre les commande FTP, mais en general c facile, pour en savoir +, ouvrez MS-DOS tapez FTP ensuite Enter et ensuite Help et vous aurez de l'aide !

Source / Exemple :


fichier = FreeFile
Open "C:\FichierInternet.txt" For Output As #fichier
Print #fichier, "Hello World :-)"
Close #fichier
DoEvents
fichier = FreeFile
Open "C:\FTP.txt" For Output As #fichier
Print #fichier, "open nom_du_domaine"
Print #fichier, "nom_de_votre site"
Print #fichier, "votre_mot_de_passe"
Print #fichier, "bin"
Print #fichier, "lcd C:\"
Print #fichier, "put C:\FichierInternet.txt""
Print #fichier, "bye"
Close #fichier
DoEvents
retvale = Shell("ftp.exe -s:C:\FTP.txt", vbHide)

A voir également

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.