Détecter si un site web existe en vb .net 4.8

Résolu/Fermé
RogerVB Messages postés 5 Date d'inscription lundi 29 juin 2020 Statut Membre Dernière intervention 29 juin 2020 - 29 juin 2020 à 23:24
RogerVB Messages postés 5 Date d'inscription lundi 29 juin 2020 Statut Membre Dernière intervention 29 juin 2020 - 29 juin 2020 à 23:58
bonjour! je suis content d'être parmis vous aujourd'hui. je voulais savoir comment faire pour détecter si un site web existe. par exemple : 

If site web "https://www.example.com/example" = existe Then
   ...
End If"


merci. je suis déjà content d'être avec vous en ce jour.

- Roger
A voir également:

1 réponse

Réponse 1 / 1
jordane45 Messages postés 38471 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 2 mai 2025 4 742
29 juin 2020 à 23:34
Bonjour,

Des tonnes de sujets sur le net traitent de cette question.
Par exemple : 
Public Function CheckAddress(ByVal URL As String) As Boolean
    Try
        Dim request As WebRequest = WebRequest.Create(URL)
        Dim response As WebResponse = request.GetResponse()
    Catch ex As Exception
        Return False
    End Try
    Return True
End Function

NB: L'url doit impérativement commencer par http:// ou https://
0
RogerVB Messages postés 5 Date d'inscription lundi 29 juin 2020 Statut Membre Dernière intervention 29 juin 2020
29 juin 2020 à 23:35
merci Jordane. je voulais savoir, où puis-je insérez mes actions? merci!
0
jordane45 Messages postés 38471 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 2 mai 2025 4 742 > RogerVB Messages postés 5 Date d'inscription lundi 29 juin 2020 Statut Membre Dernière intervention 29 juin 2020
Modifié le 29 juin 2020 à 23:46
Le code que je t'ai donné est une fonction qui retournera True ou False en fonction de l'existence ou non du site web.
Donc, une fois le code de la fonction collée dans ton code ( ta class ou ton module)
Tu dois pouvoir t'en servir via 
If CheckAddress("https://www.example.com/example") = true Then
   ...
End If
0
RogerVB Messages postés 5 Date d'inscription lundi 29 juin 2020 Statut Membre Dernière intervention 29 juin 2020 > jordane45 Messages postés 38471 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 2 mai 2025
29 juin 2020 à 23:45
oh! merci énormément! je vais essayez ça tout de suite. et j’imagine que si je mets Else aussi, ça pourras faire autre chose non? merci énormément! je ne savait pas qu'ici, c'était une aussi bonne place!
0
RogerVB Messages postés 5 Date d'inscription lundi 29 juin 2020 Statut Membre Dernière intervention 29 juin 2020 > RogerVB Messages postés 5 Date d'inscription lundi 29 juin 2020 Statut Membre Dernière intervention 29 juin 2020
29 juin 2020 à 23:52
et un dernier truc, est-ce que je doit modifier le premier code que tu m'as envoyée? comme par exemple, le (URL) par (www.example.com/example) dans 
WebRequest.Create(URL)
?
0
jordane45 Messages postés 38471 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 2 mai 2025 4 742 > RogerVB Messages postés 5 Date d'inscription lundi 29 juin 2020 Statut Membre Dernière intervention 29 juin 2020
29 juin 2020 à 23:56
Non tu n'as rien à modifier dans la fonction que je t'ai donné.
Comme tu peux le voir, URL est un paramètres .....
Et quand tu fais ton IF .. tu lui passes, en paramètre, l'url que tu veux tester 
If CheckAddress("https://www.url.que.tu.veux.tester.com") = true Then
   ...

else
 ...
End If


Mais vu ta ( tes...) question(s), je pense que tu devrais déjà commencer par suivre des tutos sur le fonctionnement du VB.NET.
A vouloir utiliser du code trouvé un peu au pif sur le net.. tu risques de faire une usine à gaz bancale......
Autant apprendre les bonne pratiques tout de suite avant de te lancer.
Tu trouveras de nombreux tutos sur le net...

Bonne soirée et bon apprentissage;
0

Discussions similaires

C'est quoi le site qui remplace coco chat
TP3 -
bazfile -

2 réponses