Private Sub WebBrowser1_DocumentComplete()
html = WebBrowser1.Document.documentElement.outerHTML
End Sub
<HTML><HEAD>
<META content="text/html; charset=utf-8" http-equiv=Content-Type></HEAD>
<BODY>
<TABLE cellSpacing=0 border=1>
<TBODY>
<TR>
<TH bgColor=lightgrey>Time</TH>
<TH bgColor=lightgrey>ID</TH>
<TH bgColor=lightgrey>NOM</TH>
<TH bgColorl
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Try
WebBrowserTemp.ScriptErrorsSuppressed = True
Dim debutA As Long = Environment.TickCount ' millisec
WebBrowserTemp.Navigate(REMOTE_URL)
Do While WebBrowserTemp.ReadyState <> WebBrowserReadyState.Complete
System.Threading.Thread.Sleep(10)
Application.DoEvents()
If (Environment.TickCount - debutA) / 1000 > 1 Then Exit Do
Loop
'MsgBox("Chargement terminé !")
Catch ex As Exception
Console.WriteLine("HTML : error " & ex.Message)
End Try
' Récuperer les tables
Dim TableCollection As HtmlElementCollection = WebBrowserTemp.Document.GetElementsByTagName("table")
toto = "aaaaa" & Chr(0) & "bbbbb"
MsgBox toto
Text1.Text = toto
<HEAD>
<META content="text/html; charset=utf-8" http-equiv=Content-Type></HEAD>
<BODY>
<TABLE border=1 cellSpacing=0>
<TBODY>
<TR>
<TH bgColor=lightgrey>Time</TH>
<TH bgColor=lightgrey>ID</TH>
<TH bgColor=lightgrey>NOM</TH>
<TH bgColor=lightgrey>Prénom</TH>
<TH bgColor=lightgrey>Naissance</TH>
<TH bgColor=lightgrey>Age</TH>
<TH bgColor=lightgrey>Sexe</TH>
<TH bgColor=lightgrey>Ceinture</TH>
<TH bgColor=lightgrey>CeintureTxt</TH>
<TH bgColor=lightgrey>Club</TH>
<TH bgColor=lightgrey>Responsable</TH>
<TH bgColor=lightgrey>Vérification</TH>
<TH bgColor=lightgrey>NouveauClub</TH></TR>
<TR>
<TD name="Time">1457713325348</TD>
<TD name="ID">1</TD>
<TD name="NOM">TEST</TD>
<TD name="Prénom">Tést</TD>
<TD name="Naissance">2000</TD>
<TD name="Age">Cadet</TD>
<TD name="Sexe">M</TD>
<TD name="Ceinture">1</TD>
<TD name="CeintureTxt">Blanche-jaune</TD>
<TD name="Club">GIMNASIO TENDO</TD>
<TD name="Responsable">rest</TD>
<TD name="Vérification">ok 12345</TD>
<TD name="NouveauClub">0</TD></TR>
<TBODY>
<TR>
<TD name="Time">1457800662926</TD>
<TD name="ID">2</TD>
<TD name="NOM">TSR</TD>
<TD name="Prénom">Tree</TD>
<TD name="Naissance">2000</TD>
<TD name="Age">Cadet</TD>
<TD name="Sexe">M</TD>
<TD name="Ceinture">1</TD>
<TD name="CeintureTxt">Blanche-jaune</TD>
<TD name="Club">GIMNASIO TENDO</TD>
<TD name="Responsable">resp</TD>
<TD name="Vérification">ok 12345</TD>
<TD name="NouveauClub">0</TD></TR>
<TR>
<TD name="Time">1457800662926</TD>
<TD name="ID">3</TD>
<TD name="NOM">DSF</TD>
<TD name="Prénom">Sf</TD>
<TD name="Naissance">2000</TD>
<TD name="Age">Cadet</TD>
<TD name="Sexe">M</TD>
<TD name="Ceinture">2</TD>
<TD name="CeintureTxt">Jaune</TD>
<TD name="Club">GIMNASIO TENDO</TD>
<TD name="Responsable">resp</TD>
<TD name="Vérification">ok 12345</TD>
<TD name="NouveauClub">0</TD></TR></TBODY></TABLE></BODY>