OVH Cloud OVH Cloud

serveur FTP est actif ou non

7 réponses
Avatar
lou
bonjour
je cherche un bout de code qui me permet de verifier
si un serveur FTP est actif ou non
merci de votre aide

7 réponses

Avatar
Jean-Marc
"lou" a écrit dans le message de
news:430cc122$0$29443$
bonjour
je cherche un bout de code qui me permet de verifier
si un serveur FTP est actif ou non
merci de votre aide



Hello,

tu peux mettre un controle winsock sur ta forme et
vérifier si tu peux faire un connect sur le port 21.
Il y a d'auters méthodes (API, etc) mais celle ci est
simple.

Private Sub Command2_Click()
Dim t As Double
Dim fini As Boolean

Winsock1.Close
Winsock1.RemoteHost = "ftp.membres.lycos.fr"
Winsock1.RemotePort = 21

Winsock1.Connect
t = Timer
Do While (Timer - t) < 5 ' 5 est le timeout en secondes
DoEvents
If Winsock1.State = sckConnected Then
Exit Do
End If
Loop
If Winsock1.State = sckConnected Then
MsgBox "Serveur FTP actif"
Else
MsgBox "Serveur FTP NON actif"
End If
End Sub

--
Jean-marc
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;
Avatar
lou
merci

mais il me dit toujours que c'est actif
qu il soit activé ou pas ???????
MERCI

"Jean-Marc" a écrit dans le message de news:
430cc4a3$0$328$
"lou" a écrit dans le message de
news:430cc122$0$29443$
> bonjour
> je cherche un bout de code qui me permet de verifier
> si un serveur FTP est actif ou non
> merci de votre aide

Hello,

tu peux mettre un controle winsock sur ta forme et
vérifier si tu peux faire un connect sur le port 21.
Il y a d'auters méthodes (API, etc) mais celle ci est
simple.

Private Sub Command2_Click()
Dim t As Double
Dim fini As Boolean

Winsock1.Close
Winsock1.RemoteHost = "ftp.membres.lycos.fr"
Winsock1.RemotePort = 21

Winsock1.Connect
t = Timer
Do While (Timer - t) < 5 ' 5 est le timeout en secondes
DoEvents
If Winsock1.State = sckConnected Then
Exit Do
End If
Loop
If Winsock1.State = sckConnected Then
MsgBox "Serveur FTP actif"
Else
MsgBox "Serveur FTP NON actif"
End If
End Sub

--
Jean-marc
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;



Avatar
Jean-Marc
Quelle est ta définition de activé?

Un serveur, c'est soit
- En marche
Il y a alors un socket qui écoute et qui accepte tes connections
- Eteint
Il n'y a rien qui écoute sur le port de l'hote spécifié.

Si tu fais:
telnet users.skynet.be 21
=> En général, ça répond

Si tu fais
telnet ftp.jean-marc.invalid.be 21
=> je serais étonné que ça réponde ....

Que souhaites tu savoir au juste?

--
Jean-marc
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;

"lou" a écrit dans le message de
news:430ccc7e$0$12635$
merci

mais il me dit toujours que c'est actif
qu il soit activé ou pas ???????
MERCI

"Jean-Marc" a écrit dans le message de


news:
430cc4a3$0$328$
> "lou" a écrit dans le message de
> news:430cc122$0$29443$
> > bonjour
> > je cherche un bout de code qui me permet de verifier
> > si un serveur FTP est actif ou non
> > merci de votre aide
>
> Hello,
>
> tu peux mettre un controle winsock sur ta forme et
> vérifier si tu peux faire un connect sur le port 21.
> Il y a d'auters méthodes (API, etc) mais celle ci est
> simple.
>
> Private Sub Command2_Click()
> Dim t As Double
> Dim fini As Boolean
>
> Winsock1.Close
> Winsock1.RemoteHost = "ftp.membres.lycos.fr"
> Winsock1.RemotePort = 21
>
> Winsock1.Connect
> t = Timer
> Do While (Timer - t) < 5 ' 5 est le timeout en secondes
> DoEvents
> If Winsock1.State = sckConnected Then
> Exit Do
> End If
> Loop
> If Winsock1.State = sckConnected Then
> MsgBox "Serveur FTP actif"
> Else
> MsgBox "Serveur FTP NON actif"
> End If
> End Sub
>
> --
> Jean-marc
> "There are only 10 kind of people
> those who understand binary and those who don't."
> mailto: remove '_no_spam_' ;
>




Avatar
lou
re
en fait
ce que j 'estentds dire c'est que le pc qui set de server est toujours
allumé
mais il est possible que la partie sever ftp soit inaccesible
pour une raison quelconque
comment savoir si c'est accessible ou non

je ne sais pas si je me fais comprendre
merci de ton aide

"Jean-Marc" a écrit dans le message de news:
430ccfff$0$19342$
Quelle est ta définition de activé?

Un serveur, c'est soit
- En marche
Il y a alors un socket qui écoute et qui accepte tes connections
- Eteint
Il n'y a rien qui écoute sur le port de l'hote spécifié.

Si tu fais:
telnet users.skynet.be 21
=> En général, ça répond

Si tu fais
telnet ftp.jean-marc.invalid.be 21
=> je serais étonné que ça réponde ....

Que souhaites tu savoir au juste?

--
Jean-marc
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;

"lou" a écrit dans le message de
news:430ccc7e$0$12635$
> merci
>
> mais il me dit toujours que c'est actif
> qu il soit activé ou pas ???????
> MERCI
>
> "Jean-Marc" a écrit dans le message de
news:
> 430cc4a3$0$328$
> > "lou" a écrit dans le message de
> > news:430cc122$0$29443$
> > > bonjour
> > > je cherche un bout de code qui me permet de verifier
> > > si un serveur FTP est actif ou non
> > > merci de votre aide
> >
> > Hello,
> >
> > tu peux mettre un controle winsock sur ta forme et
> > vérifier si tu peux faire un connect sur le port 21.
> > Il y a d'auters méthodes (API, etc) mais celle ci est
> > simple.
> >
> > Private Sub Command2_Click()
> > Dim t As Double
> > Dim fini As Boolean
> >
> > Winsock1.Close
> > Winsock1.RemoteHost = "ftp.membres.lycos.fr"
> > Winsock1.RemotePort = 21
> >
> > Winsock1.Connect
> > t = Timer
> > Do While (Timer - t) < 5 ' 5 est le timeout en secondes
> > DoEvents
> > If Winsock1.State = sckConnected Then
> > Exit Do
> > End If
> > Loop
> > If Winsock1.State = sckConnected Then
> > MsgBox "Serveur FTP actif"
> > Else
> > MsgBox "Serveur FTP NON actif"
> > End If
> > End Sub
> >
> > --
> > Jean-marc
> > "There are only 10 kind of people
> > those who understand binary and those who don't."
> > mailto: remove '_no_spam_' ;
> >
>
>



Avatar
Jean-Marc
Et bien si l'hote accepte une connection sur le port 21,
c'est que le serveur FTP est ok.

Mais si tu souhaites aller plus loin et voir si le serveur
FTP est démarré ET opérationnel, alors rien de plus facile:
tu fais une vraie connection via winsock, en envoyant USER et PASSWORD.
Voici une transaction typique:

-> telnet ftp.monserver.perso
<- 220 monserverperso FTP server ready.

-> user USER_NAME
<- 331 Password required.

-> pass XXXXXXXXXXX
<-230 User logged in.

Si tu reçois un 220 après ton winsock.connect,
c'est déjà que le serveur est la et actif.

Pour aller plus loin, fais une connection en envoyant USER XXX
et PASS YYYYY, tu recevras alors un 331 puis un 230 si la connection
a pu être établie.

La lecture de la RFC FTP (RFC959) peut t'aider:
http://www.faqs.org/rfcs/rfc959.html


--
Jean-marc
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;



"lou" a écrit dans le message de
news:430cd843$0$20688$
re
en fait
ce que j 'estentds dire c'est que le pc qui set de server est toujours
allumé
mais il est possible que la partie sever ftp soit inaccesible
pour une raison quelconque
comment savoir si c'est accessible ou non

je ne sais pas si je me fais comprendre
merci de ton aide

"Jean-Marc" a écrit dans le message de


news:
430ccfff$0$19342$
> Quelle est ta définition de activé?
>
> Un serveur, c'est soit
> - En marche
> Il y a alors un socket qui écoute et qui accepte tes connections
> - Eteint
> Il n'y a rien qui écoute sur le port de l'hote spécifié.
>
> Si tu fais:
> telnet users.skynet.be 21
> => En général, ça répond
>
> Si tu fais
> telnet ftp.jean-marc.invalid.be 21
> => je serais étonné que ça réponde ....
>
> Que souhaites tu savoir au juste?
>
> --
> Jean-marc
> "There are only 10 kind of people
> those who understand binary and those who don't."
> mailto: remove '_no_spam_' ;
>
> "lou" a écrit dans le message de
> news:430ccc7e$0$12635$
> > merci
> >
> > mais il me dit toujours que c'est actif
> > qu il soit activé ou pas ???????
> > MERCI
> >
> > "Jean-Marc" a écrit dans le message de
> news:
> > 430cc4a3$0$328$
> > > "lou" a écrit dans le message de
> > > news:430cc122$0$29443$
> > > > bonjour
> > > > je cherche un bout de code qui me permet de verifier
> > > > si un serveur FTP est actif ou non
> > > > merci de votre aide
> > >
> > > Hello,
> > >
> > > tu peux mettre un controle winsock sur ta forme et
> > > vérifier si tu peux faire un connect sur le port 21.
> > > Il y a d'auters méthodes (API, etc) mais celle ci est
> > > simple.
> > >
> > > Private Sub Command2_Click()
> > > Dim t As Double
> > > Dim fini As Boolean
> > >
> > > Winsock1.Close
> > > Winsock1.RemoteHost = "ftp.membres.lycos.fr"
> > > Winsock1.RemotePort = 21
> > >
> > > Winsock1.Connect
> > > t = Timer
> > > Do While (Timer - t) < 5 ' 5 est le timeout en secondes
> > > DoEvents
> > > If Winsock1.State = sckConnected Then
> > > Exit Do
> > > End If
> > > Loop
> > > If Winsock1.State = sckConnected Then
> > > MsgBox "Serveur FTP actif"
> > > Else
> > > MsgBox "Serveur FTP NON actif"
> > > End If
> > > End Sub
> > >
> > > --
> > > Jean-marc
> > > "There are only 10 kind of people
> > > those who understand binary and those who don't."
> > > mailto: remove '_no_spam_' ;
> > >
> >
> >
>




Avatar
lou
un grand merci ça marche


"Jean-Marc" a écrit dans le message de news:
430cdb01$0$29443$
Et bien si l'hote accepte une connection sur le port 21,
c'est que le serveur FTP est ok.

Mais si tu souhaites aller plus loin et voir si le serveur
FTP est démarré ET opérationnel, alors rien de plus facile:
tu fais une vraie connection via winsock, en envoyant USER et PASSWORD.
Voici une transaction typique:

-> telnet ftp.monserver.perso
<- 220 monserverperso FTP server ready.

-> user USER_NAME
<- 331 Password required.

-> pass XXXXXXXXXXX
<-230 User logged in.

Si tu reçois un 220 après ton winsock.connect,
c'est déjà que le serveur est la et actif.

Pour aller plus loin, fais une connection en envoyant USER XXX
et PASS YYYYY, tu recevras alors un 331 puis un 230 si la connection
a pu être établie.

La lecture de la RFC FTP (RFC959) peut t'aider:
http://www.faqs.org/rfcs/rfc959.html


--
Jean-marc
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;



"lou" a écrit dans le message de
news:430cd843$0$20688$
> re
> en fait
> ce que j 'estentds dire c'est que le pc qui set de server est toujours
> allumé
> mais il est possible que la partie sever ftp soit inaccesible
> pour une raison quelconque
> comment savoir si c'est accessible ou non
>
> je ne sais pas si je me fais comprendre
> merci de ton aide
>
> "Jean-Marc" a écrit dans le message de
news:
> 430ccfff$0$19342$
> > Quelle est ta définition de activé?
> >
> > Un serveur, c'est soit
> > - En marche
> > Il y a alors un socket qui écoute et qui accepte tes connections
> > - Eteint
> > Il n'y a rien qui écoute sur le port de l'hote spécifié.
> >
> > Si tu fais:
> > telnet users.skynet.be 21
> > => En général, ça répond
> >
> > Si tu fais
> > telnet ftp.jean-marc.invalid.be 21
> > => je serais étonné que ça réponde ....
> >
> > Que souhaites tu savoir au juste?
> >
> > --
> > Jean-marc
> > "There are only 10 kind of people
> > those who understand binary and those who don't."
> > mailto: remove '_no_spam_' ;
> >
> > "lou" a écrit dans le message de
> > news:430ccc7e$0$12635$
> > > merci
> > >
> > > mais il me dit toujours que c'est actif
> > > qu il soit activé ou pas ???????
> > > MERCI
> > >
> > > "Jean-Marc" a écrit dans le message


de
> > news:
> > > 430cc4a3$0$328$
> > > > "lou" a écrit dans le message de
> > > > news:430cc122$0$29443$
> > > > > bonjour
> > > > > je cherche un bout de code qui me permet de verifier
> > > > > si un serveur FTP est actif ou non
> > > > > merci de votre aide
> > > >
> > > > Hello,
> > > >
> > > > tu peux mettre un controle winsock sur ta forme et
> > > > vérifier si tu peux faire un connect sur le port 21.
> > > > Il y a d'auters méthodes (API, etc) mais celle ci est
> > > > simple.
> > > >
> > > > Private Sub Command2_Click()
> > > > Dim t As Double
> > > > Dim fini As Boolean
> > > >
> > > > Winsock1.Close
> > > > Winsock1.RemoteHost = "ftp.membres.lycos.fr"
> > > > Winsock1.RemotePort = 21
> > > >
> > > > Winsock1.Connect
> > > > t = Timer
> > > > Do While (Timer - t) < 5 ' 5 est le timeout en secondes
> > > > DoEvents
> > > > If Winsock1.State = sckConnected Then
> > > > Exit Do
> > > > End If
> > > > Loop
> > > > If Winsock1.State = sckConnected Then
> > > > MsgBox "Serveur FTP actif"
> > > > Else
> > > > MsgBox "Serveur FTP NON actif"
> > > > End If
> > > > End Sub
> > > >
> > > > --
> > > > Jean-marc
> > > > "There are only 10 kind of people
> > > > those who understand binary and those who don't."
> > > > mailto: remove '_no_spam_' ;
> > > >
> > >
> > >
> >
>
>



Avatar
jean-marc
de rien !

--
Jean-marc
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;


"lou" wrote in message
news:430d611e$0$17152$
un grand merci ça marche


"Jean-Marc" a écrit dans le message de


news:
430cdb01$0$29443$
> Et bien si l'hote accepte une connection sur le port 21,
> c'est que le serveur FTP est ok.
>
> Mais si tu souhaites aller plus loin et voir si le serveur
> FTP est démarré ET opérationnel, alors rien de plus facile:
> tu fais une vraie connection via winsock, en envoyant USER et PASSWORD.
> Voici une transaction typique:
>
> -> telnet ftp.monserver.perso
> <- 220 monserverperso FTP server ready.
>
> -> user USER_NAME
> <- 331 Password required.
>
> -> pass XXXXXXXXXXX
> <-230 User logged in.
>
> Si tu reçois un 220 après ton winsock.connect,
> c'est déjà que le serveur est la et actif.
>
> Pour aller plus loin, fais une connection en envoyant USER XXX
> et PASS YYYYY, tu recevras alors un 331 puis un 230 si la connection
> a pu être établie.
>
> La lecture de la RFC FTP (RFC959) peut t'aider:
> http://www.faqs.org/rfcs/rfc959.html
>
>
> --
> Jean-marc
> "There are only 10 kind of people
> those who understand binary and those who don't."
> mailto: remove '_no_spam_' ;
>
>
>
> "lou" a écrit dans le message de
> news:430cd843$0$20688$
> > re
> > en fait
> > ce que j 'estentds dire c'est que le pc qui set de server est


toujours
> > allumé
> > mais il est possible que la partie sever ftp soit inaccesible
> > pour une raison quelconque
> > comment savoir si c'est accessible ou non
> >
> > je ne sais pas si je me fais comprendre
> > merci de ton aide
> >
> > "Jean-Marc" a écrit dans le message de
> news:
> > 430ccfff$0$19342$
> > > Quelle est ta définition de activé?
> > >
> > > Un serveur, c'est soit
> > > - En marche
> > > Il y a alors un socket qui écoute et qui accepte tes connections
> > > - Eteint
> > > Il n'y a rien qui écoute sur le port de l'hote spécifié.
> > >
> > > Si tu fais:
> > > telnet users.skynet.be 21
> > > => En général, ça répond
> > >
> > > Si tu fais
> > > telnet ftp.jean-marc.invalid.be 21
> > > => je serais étonné que ça réponde ....
> > >
> > > Que souhaites tu savoir au juste?
> > >
> > > --
> > > Jean-marc
> > > "There are only 10 kind of people
> > > those who understand binary and those who don't."
> > > mailto: remove '_no_spam_' ;
> > >
> > > "lou" a écrit dans le message de
> > > news:430ccc7e$0$12635$
> > > > merci
> > > >
> > > > mais il me dit toujours que c'est actif
> > > > qu il soit activé ou pas ???????
> > > > MERCI
> > > >
> > > > "Jean-Marc" a écrit dans le


message
de
> > > news:
> > > > 430cc4a3$0$328$
> > > > > "lou" a écrit dans le message de
> > > > > news:430cc122$0$29443$
> > > > > > bonjour
> > > > > > je cherche un bout de code qui me permet de verifier
> > > > > > si un serveur FTP est actif ou non
> > > > > > merci de votre aide
> > > > >
> > > > > Hello,
> > > > >
> > > > > tu peux mettre un controle winsock sur ta forme et
> > > > > vérifier si tu peux faire un connect sur le port 21.
> > > > > Il y a d'auters méthodes (API, etc) mais celle ci est
> > > > > simple.
> > > > >
> > > > > Private Sub Command2_Click()
> > > > > Dim t As Double
> > > > > Dim fini As Boolean
> > > > >
> > > > > Winsock1.Close
> > > > > Winsock1.RemoteHost = "ftp.membres.lycos.fr"
> > > > > Winsock1.RemotePort = 21
> > > > >
> > > > > Winsock1.Connect
> > > > > t = Timer
> > > > > Do While (Timer - t) < 5 ' 5 est le timeout en secondes
> > > > > DoEvents
> > > > > If Winsock1.State = sckConnected Then
> > > > > Exit Do
> > > > > End If
> > > > > Loop
> > > > > If Winsock1.State = sckConnected Then
> > > > > MsgBox "Serveur FTP actif"
> > > > > Else
> > > > > MsgBox "Serveur FTP NON actif"
> > > > > End If
> > > > > End Sub
> > > > >
> > > > > --
> > > > > Jean-marc
> > > > > "There are only 10 kind of people
> > > > > those who understand binary and those who don't."
> > > > > mailto: remove '_no_spam_' ;
> > > > >
> > > >
> > > >
> > >
> >
> >
>