Discussion :

[kyluxox]

Bonjour !

J'ai crée un petit programme qui verifie si une url est présente sur plusieurs page web et lorsqu'il y a une erreur 404 et bien mon programme plante ou arrête avec un warning: handled exception...error 404 ou 410

J'ai essayer plusieurs code comme ceux ci-bas pour telecharger le code source de la page mais dès que l'erreur 404 ou 410 se présente, tout plante:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Imports System
Imports System.IO
Imports System.Net 
Module Module1
Sub Main()
'Address of URL
Dim URL As String = "http://www.c-sharpcorner.com/default.asp"
Dim request As WebRequest = WebRequest.Create(URL)
Dim response As WebResponse = request.GetResponse()
Dim reader As StreamReader = New StreamReader(response.GetResponseStream())Dim str As String = reader.ReadLine()
o While str.Length > 0 
Console.WriteLine(str) 
str = reader.ReadLine() 
Loop 
End Sub
End Module

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Imports System
Imports System.IO
Imports System.Net
Module Module1 
Sub Main()
'Address of URL
Dim URL As String = "http://www.c-sharpcorner.com/default.asp"
Dim request As HttpWebRequest = WebRequest.Create(URL)
Dim response As HttpWebResponse = request.GetResponse()
Dim reader As StreamReader = New StreamReader(response.GetResponseStream())
Dim str As String = reader.ReadLine()
Do While str.Length > 0
Console.WriteLine(str)
str = reader.ReadLine()
Loop
End Sub
End Module

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Imports System
Imports System.IO
Imports System.Net
Module Module1 
Sub Main()
'Address of URL
Dim URL As String = "http://www.c-sharpcorner.com/default.asp"
' Get HTML data
Dim client As WebClient = New WebClient()
Dim data As Stream = client.OpenRead(URL)
Dim reader As StreamReader = New StreamReader(data)
Dim str As String = ""
str = reader.ReadLine()
Do While str.Length > 0
Console.WriteLine(str)
str = reader.ReadLine()
Loop
End Sub
End Module

Et Webclient....

Je voudrais simplement passer à l'autre url dans ma liste sans que mon programme arrête bref passer par dessus ou l'effacer si l'erreur se présente.

Quelqu'un si connait ?

Je suis niveau débutant.

Merci !

[kyluxox]

Ok ! Ma faute, j'avais mis un

Code :

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

1
2
3
4
5
try...
 
Catch ex As Exception
            MessageBox.Show(ex.Message, "Read Error")
        End Try

Étant débutant je n'avais jamais vus une messagebox de ce genre car d'habitude je n'avais qu'une petite fenetre mais là je ne croyais pas que ça venais de là !

Bref, je continue à apprendre hihihi Moi qui a chercher 2 heures sur le net et je n'ai même pas regarder mon code. ((

Bonne continuation !