Page 1 sur 1
[FUNC] _IFURLExists
Posté : dim. 06 nov. 2011 13:33
par moi
voici une fonction qui permet de vérifier si une URL existe...
► Afficher le texte
Code : Tout sélectionner
Func _IfURLExists($url)
$source = BinaryToString(InetRead($url))
If $source = "" then Return 0
If $source <> "" then Return 1
EndFunc
la fonction renvoi un si l'URL existe et 0 si elle n'existe pas...
Re: [FUNC] _IFURLExists
Posté : dim. 06 nov. 2011 14:37
par Tlem
@moi
Je comprend qu'à 13 ans vous ayez besoin de reconnaissance, mais faire une fonction, juste pour le fait de faire une fonction, n'a aucun intérêt !
Votre fonction est totalement inutile car InetRead() renvoi une erreur en cas d’échec.
Pour l'instant, je n'ai pas encore filtré ce genre de fonction qui n'apporte vraiment rien à qui que ce soit, mais je pense qu'un bon ménage fera du bien au forum.
Re: [FUNC] _IFURLExists
Posté : dim. 06 nov. 2011 14:40
par moi
Tlem a écrit : faire une fonction, juste pour le fait de faire une fonction
cette fonction m'a servi, pour moi cette fonction sert à quelle que chose...
Re: [FUNC] _IFURLExists
Posté : dim. 06 nov. 2011 14:41
par TT22
Oui, c'est bien mais si l'on n'est pas connecté à internet et que l'adresse existe, il nous dira que non
Sinon, on peut aussi utiliser un Ping :
► Afficher le texte
Code : Tout sélectionner
If Ping("www.google.fr") <> 0 Then
$Exist = "L'adresse existe !"
ElseIf Ping("www.google.fr") = 0 Then
$Exist = "L'adresse n'existe pas ou vous n'êtes pas connécté à internet !"
EndIf
MsgBox(64,"Info",$Exist)
Re: [FUNC] _IFURLExists
Posté : dim. 06 nov. 2011 14:51
par Tlem
@moi
Cela ne change pas l'inutilité de cette fonction.
Re: [FUNC] _IFURLExists
Posté : dim. 06 nov. 2011 23:10
par mikell
If

error Then
