[VB.NET] Timeout - Passer au suivant ?
Bonjour !
J'ai un petit problème de timeout et arrêt d'exécution d'une liste pour traitement.
Ma listview = des liens
Bref si la page web prend trop de temps à se télécharger(20 sec.) et bien j'ai une erreur "timeout". Et c'est correct, le problème se situe que lorsque j'ai ce timeout et bien je veux tout simplement passer à l'autre lien dans la liste. Pour l'instant le timeout arrête l'application.
Je ne sais pas une condition pourrait faire l'affaire dans le style:
"If timeout et bien revenir dans la boucle" <-- ce que je ne sais faire étant débutant.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
| For boucle = 0 To ListView1.Items.Count - 1
Dim listname = ListView1.Items(boucle).SubItems(2).Text
Dim search2 As New StreamReader(wclient.OpenRead(listname))
Dim searcha2 As String = search2.ReadToEnd
Dim testString1 As String
Dim testString2 As String
Dim expression As Regex = New Regex("comment"" value=""\b[^>]*""(.*?)")
Dim string1 As String = searcha2
For Each myMatch In expression.Matches(string1)
List2.Add(myMatch.ToString())
testString1 = Regex.Replace(myMatch.ToString, "comment"" value=""", "")
testString2 = Regex.Replace(testString1, """", "")
Dim teststring3 = testString2.ToString
Dim TempStr(1) As String
Dim TempNode As ListViewItem
TempStr(1) = teststring3
TempNode = New ListViewItem(TempStr)
ListView1.Items(boucle).SubItems(1).Text = teststring3
Refresh()
Next |
Merci de votre aide !
