Page 1 sur 1

Connexion FTP impossible....

Publié : jeu. 27/août/2020 17:04
par Philippe_GEORGES
Bonjour

Dans le code suivant :

Code : Tout sélectionner

 InitNetwork()
  
  If OpenFTP(0, "ftp://www.monsite.com", "user", "pw")
    If ExamineFTPDirectory(0)
      While NextFTPDirectoryEntry(0)
        Debug FTPDirectoryEntryName(0)
      Wend
      FinishFTPDirectory(0)
    EndIf
  Else
    Debug "Connexion  impossible"
  EndIf
Impossible de me connecter, quelqu'un a t il une idée ? Nom de serveur et identifiants mot de passe fonctionnent par ailleurs...

Merci d'avance,

Phil

Re: Connexion FTP impossible....

Publié : jeu. 27/août/2020 17:30
par Naheulf
J'ai pas testé mais dans l'exemple de 'aide il n'y a pas de "ftp://" au début de l'adresse du serveur...

Re: Connexion FTP impossible....

Publié : ven. 28/août/2020 5:58
par kernadec
bonjour Guy
peut être une réponse avec le travail de "RSBasic" sur ce sujet.. (perso pas testé)
Important avec cette traduction pour copier les codes mettre le Bouton en haut à droite sur [ Original ]
sinon ils fonctionnerons pas :wink:
https://translate.google.fr/translate?h ... &sandbox=1

si cela fonctionne pas pour vous, alors lui remonter problème à cette adresse sur forum anglais, il en sera heureux..
https://www.purebasic.fr/english/viewto ... 628ba46d19

Cordialement

Re: Connexion FTP impossible....

Publié : ven. 28/août/2020 7:21
par Marc56
Comme l'a indiqué Naheulf (et l'aide aussi), il ne faut pas mettre ftp://

Exemple

Code : Tout sélectionner

InitNetwork()

Procedure Test_FTP(URL$)
    Debug "Test: " + URL$
    If OpenFTP(0, URL$, "anonymous", "anonymous")
        If ExamineFTPDirectory(0)
            While NextFTPDirectoryEntry(0)
                Debug FTPDirectoryEntryName(0)
            Wend
            FinishFTPDirectory(0)
        EndIf
    Else
        Debug "Connexion  impossible"
    EndIf
    Debug ""
EndProcedure

Test_FTP("ftp://ftp.free.fr")
Test_FTP("ftp.free.fr")
PS. On utilise le préfixe ftp:// dans les navigateurs ou certains programmes comme CURL pour déclencher le FTP dans les programmes qui savent utiliser plusieurs protocoles. OpenFTP quant à lui ne fait que du FTP.

:wink:

Re: Connexion FTP impossible....

Publié : jeu. 17/déc./2020 20:18
par omega
Bonsoir,

Je crois que c'est un problème de syntaxe:
OpenFTP(#ftp,serveur$,Username$,Pw$)

If OpenFTP(0, "ftp.purebasic.com", "anonymous", "")
Debug "Connecté avec succès
endif

Bonne continuation

Re: Connexion FTP impossible....

Publié : jeu. 17/déc./2020 21:42
par Ar-S
Exemple avec mon FTP chez 1&1 (ionos)

Code : Tout sélectionner

If OpenFTP(1, "XXXXXXXX.1and1-data.host", "uxxxxxxxx-XX", "motdepasse")
ça fonctionne bien.

Comme l'a dit marc56, ftp:// n'est pas ton adresse ftp. C'est pour l'indiquer au navigateur.