[..] Utilisation de wininet.dll

[minoui]

Bonjour
Je cherche comment envoyer un fichier vers un ftp en passant par wininet.dll
Je n'ai pas trouver du tuto en francais.
Merci.

[jbnh]

Avec la fonction recherche tu serais tombé sur ceci: http://www.autoitscript.fr/forum/viewto ... &hilit=ftp

[minoui]

LE pire ... c'est que j'ai chercher
Merci ^^

[minoui]

Hum j'ai un petit prob :
Resultat :
box1: 1
box2: 0
box3: 0
box4: 0
Le port est bien sur 21 et le serveur est bon ...
Help svp

► Afficher le texte

Code : Tout sélectionner

#include <file.au3>
#include <FTP.au3>

$dllopen = DllOpen('wininet.dll')

;//////////////////////////////////////////////////////////////////////////////////
;'LE_NOM_DU_FICHIER_SUR_PC' = le fichier sur ton pc que tu veux envoyer           /
;'LE_NOM_DU_FICHIER_SUR_FTP' = le nom que le fichier après être up sur le ftp     /
; exemple: $fileToUp = 'test.au3' ; C'est dit                                     /
; $NameOnFTP = 'test.txt' ; Pareil                                                /
;//////////////////////////////////////////////////////////////////////////////////

$fileToUp = 'test.gaga' ; C'est dit
$NameOnFTP = 'test.txt' ; Pareil
$server = 'X.X'; Le serveur
$username = 'USrname' ; Login ;)
$pass = 'pswd' ; Ben mot de passe ;)

$Open = _FTPOpen('MyFTP Control') ; Fo bien un nom
$Conn = _FTPConnect($Open, $server, $username, $pass)
$Ftpp = _FtpPutFile($Conn, $fileToUp, $NameOnFTP ) 

$Ftpc = _FTPClose($Open)

MsgBox(0, "Error", $dllopen) ; 1 = OK , 0 = Error
MsgBox(0, "Error", $Open) ; 1 = OK , 0 = Error
MsgBox(0, "Error", $Conn) ; 1 = OK , 0 = Error
MsgBox(0, "Error", $Ftpp) ; 1 = OK , 0 = Error

[sylvanie]

Bonsoir,
j'avais déjà eu ce pb jadis, je l'ai réglé en ouvrant une instance de wininet.dll avant _FTPOpen :

Code : Tout sélectionner

...
$dllhandle = DllOpen('wininet.dll')
$Open = _FTPOpen('MyFTP Control') ; Fo bien un nom
$Conn = _FTPConnect($Open, $server, $username, $pass)
$Ftpp = _FtpPutFile($Conn, $fileToUp, $NameOnFTP )

$Ftpc = _FTPClose($Open)
DllClose($dllhandle)
....
 

[minoui]

J'ai changer sa ne marche toujours pas !

► Afficher le texte

Code : Tout sélectionner

#include <file.au3>
#include <FTP.au3>

$dllopen = DllOpen('wininet.dll')

;//////////////////////////////////////////////////////////////////////////////////
;'LE_NOM_DU_FICHIER_SUR_PC' = le fichier sur ton pc que tu veux envoyer           /
;'LE_NOM_DU_FICHIER_SUR_FTP' = le nom que le fichier après être up sur le ftp     /
; exemple: $fileToUp = 'test.au3' ; C'est dit                                     /
; $NameOnFTP = 'test.txt' ; Pareil                                                /
;//////////////////////////////////////////////////////////////////////////////////

$fileToUp = 'test.gaga' ; C'est dit
$NameOnFTP = 'test.txt' ; Pareil
$server = 'X.X'; Le serveur
$username = 'USrname' ; Login ;)
$pass = 'pswd' ; Ben mot de passe ;)

$dllhandle = DllOpen('wininet.dll')
$Open = _FTPOpen('MyFTP Control') ; Fo bien un nom
$Conn = _FTPConnect($Open, $server, $username, $pass)
$Ftpp = _FtpPutFile($Conn, $fileToUp, $NameOnFTP ) 

$Ftpc = _FTPClose($Open)
DllClose($dllhandle)

MsgBox(0, "Error", $dllopen) ; 1 = OK , 0 = Error
MsgBox(0, "Error", $Open) ; 1 = OK , 0 = Error
MsgBox(0, "Error", $Conn) ; 1 = OK , 0 = Error
MsgBox(0, "Error", $Ftpp) ; 1 = OK , 0 = Error

[sylvanie]

je n'ai pas mieux pour le moment. Cependant, je n'avais pas fait attention que le script de départ avait déjà ouvert une instance de la dll, donc d'emblé on peut enlever celle que j'ai suggéré. A suivre ...

[edit] : ah si , si tu sniff la communication vers le serveur, est qu'on moins les première trames de connexion passent ?

[minoui]

Heuu avec quel prog et comment tu la "sniff" ta connetion stp

[jbnh]

Tu es derrière un routeur?

[minoui]

Oui haaa le port est peut-être bloqué !!
[edit]Mais non, mon client ftp se connecte par le port 21 ![/edit]

[minoui]

Une idée ??
Oui je suis derrière un routeur.

[scorp84]

Bonjour,

Je débute avec AutoIt et je cherche moi aussi à faire du FTP via un script.

J'ai parcouru google et votre forum et effectivement des topics en parlent mais avec je retombe toujours sur le même exemple (avec quelques variantes):

Code : Tout sélectionner

#include <file.au3>
#include <FTP.au3>

DllOpen('wininet.dll')

$server = 'ftp://xxx'
$username = 'xxx'
$pass = 'xxx'

$Open = _FTPOpen('MyFTP Control')
$Conn = _FTPConnect($Open, $server, $username, $pass)
$Ftpp = _FtpPutFile($Conn, 'readme.txt', 'readme.txt')
$Ftpc = _FTPClose($Open)

MsgBox(0, "Error", $Ftpp) ; 1 = OK , 2 = Error

Et j'obtiens toujours 0 comme erreur.

Mes questions :
1. A quoi correspond ce code erreur 0 ?
2. Comment préciser le répertoire de destination ?
3. Comment lui dire que le nom du fichier distant et le même que le local ?
4. Comment faire du récursif avec des fichiers dans des sous répertoires ?

Merci d'avoir pris le temps de me lire et merci d'avance pour votre aide précieuse.

Amicalement.

[jbnh]

1. A quoi correspond ce code erreur 0 ?
2. Comment préciser le répertoire de destination ?
3. Comment lui dire que le nom du fichier distant et le même que le local ?
4. Comment faire du récursif avec des fichiers dans des sous répertoires ?

1) c'est echec de l'envoi, verifies si les infos sont bonnes, si le ftp est ok, si tu es derriere un routeur as-tu ouvert les ports? (en effet, j'ai mis erreur = 2 mais c'est erreur = 0)
2) la variable $server (ftp://ftp.com/folder)
3) comme ton exemple c'est très bien
4) que veux tu dire par la?

[scorp84]

Bonjour et merci pour ta réponse rapide

1. Pour les ports, j'ai essayé avec la fonction ftp.exe de windows et cela fonctionne mais peut être n'utilise t elle pas le même port. J'utilise une box. Je vais voir si cela change quelque chose en ouvrant le port 21.

2. OK pour le répertoire

3. Si je ne précise pas le nom du fichier distant, prend il le même que le local ou suis je obligé de lui indiquer un nom ?

4. Pour le récursif, en fait, j'aimerai mettre au point un script qui me permette de chez moi et du boulot de me faire un répertoire "synchronisé" via un ftp et une tâche planifiée des 2 côtés.
Et ce répertoire comprend des sous répertoires et il faudrait que tous les répertoires et les fichiers soient envoyés en FTP mais peut être un tel script existe déjà.

En tout cas, merci pour ton aide car ce logiciel est vraiment super puissant.

Amicalement.

[jbnh]

Si je ne précise pas le nom du fichier distant, prend il le même que le local ou suis je obligé de lui indiquer un nom

Je pense que ca ne marchera pas mais je n'ai jamais essayé de ne rien mettre, essaye....

Pour ton point 4 je t'invite à jeter un oeil ici:
http://www.autoitscript.fr/forum/viewto ... f=21&t=479

[scorp84]

Bonjour,

Merci pour ton aide

C'est en fait de son script que j'étais parti pour faire le mien.

Je cherche encore... Si je trouve je mettrai la solution en ligne pour en faire profiter les autres.

Encore merci pour l'aide.

BM