Discussion :

[JohnVist]

Bonjour,

Je travaille actuellement sur une application FTP. Ma fenêtre principale contient des déclarations globales suivantes:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
PROCEDURE FEN_FENETRE_PRINCIPAL( AdresseFTP = "http://serveur.ftp.fr",
NomUtilisateur="user",
MotDePasse="password",
NumPort=21,
ConnexionPassive=Faux,DelaiConnexion=10,
LOCAL RepertoireFTP="/dossierFTP",
LOCAL RepertoireLocal="C:\DossierLocal")
 
UnFichier, ResListeFichier sont des chaînes

Le problème se trouve au niveau de AdresseFTP car tout ce qui est après les "Slash (//)" n'est pas interprété.
C'est considéré comme un commentaire ???
J’obtiens donc en exécution ceci:



Merci de votre aide,

Cordialement.

[hpascal]

Bonjour

En copiant ton code je n'ai pas ce problème

Essaye de le supprimer complètement et de le coller à nouveau

[JohnVist]

Bonjour hpascal,

j'ai essayé de supprimer et coller le code, mais le problème persiste.

Merci.

[Ry_Yo]

Bonjour,

le problème que je vois c'est que le message d'erreur n'a rien à voir avec le code que vous nous avez fourni.

Le message d'erreur concerne FTPConnecte() (je suppose) et le code nous montre le prototypage de votre fenêtre FEN_FENETRE_PRINCIPAL

Pouvez-vous nous montrer donc :
- comment vous faites l'appel à cette fenêtre
- le code nécessaire et suffisant qui fait apparaitre le message d'erreur.


Mais je parierais sur un mauvais appel à la fonction FTPConnecte() ou à la fenêtre FEN_FENETRE_PRINCIPAL.


Cordialement.

[JohnVist]

Bonjour,

Ok voici le code de la fonction FTPconnecte sous la fenêtre EN_FENETRE_PRINCIPAL :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
// Tentative de connexion
PGlobales.gnIDConnexionFTP = FTPConnecte(AdresseFTP, NomUtilisateur, MotDePasse, Numport,ConnexionPassive,DelaiConnexion)

// A-t-on réussi à se connecter ?
SI PGlobales.gnIDConnexionFTP = -1 ALORS
	Erreur("Impossible de se connecter au serveur FTP","Détails : ", ErreurInfo())
	AfficheConnexionOK(Faux)
	AfficheConnexionEncours(Faux)
	AfficheClicConnexion(Vrai)
	RETOUR
FIN

Voici l'appel de la fenêtre FEN_FENETRE_PRINCIPAL depuis une autre fenêtre, mais cet appel n'est pas fait au début mais après la modification des paramètres de saisie.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
//Si pas d'adresse FTP on ne continue pas
SI gpsAdresseFTP ~= "" ALORS 
	Info("Une adresse FTP est nécessaire pour l'enregistrement.")
	RETOUR
FIN

Ouvre(FEN_FENETRE_PRINCIPAL,gpsAdresseFTP,gpsNomUtilisateur,gpsMotDePasse,gpeNumPort,gpbConnexionPassive,gpeDelaiConnexion,SAI_RépertoireFTP,SAI_RépertoireLocal)

Cela m'étonne car le message d'erreur ( copie écran ci-haut) montre bien que tout ce qui est après "//" n'est pas affiché, pourtant le nom d'utilisateur s'affiche.
En plus quand j'enlève les "//" de mon code, le message m'affiche bien serveur FTP "http:serveur.ftp.fr"

Merci.

[Ry_Yo]

hmm...

vous utilisez le protocole HTTP pour une fonction FTP

l'adresse d'un serveur FTP doit commencer par FTP, je n'ai pas testé mais ça doit être ça à mon avis

il faut mettre "serveur.ftp.fr" à la place de "http://serveur.ftp.fr"

Et faire confiance à la fonction WLangage de formater correctement l'adresse du serveur

[Narwe]

Bonjour,

- N'y a-t-il pas un champ sur la fenêtre ayant pour nom "AdresseFTP" ?
- En remplaçant le nom de la variable par, par exemple, "gf_s_AdresseFTP" (oui, j'aime mes règles de nommage de variable).