bonjours a toute la communauté,

Aujourd'hui, j'ai besoin de l'aide de tous pour résoudre mon problème.

voici ce que j'essaye de faire:

Crée des favoris de Webbrowser.

Bon , c'est très simple, le save fonctionne tous. mais le PROBLÈME est la:

Je veux avoir le favoris comme Text le Webbrowser.documenttitle
et lorsque l'on click dessus, le Webbrowser.url.tostring

Voici mon Codage en plusieur partie.

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim item1 As New ListViewItem
 
        item1.Name = TextBox2.Text
        item1.Text = TextBox1.Text
 
 
        FrmBase.ListView1.Items.Add(item1)
        My.Settings.FavList.Add(TextBox2.Text)
        My.Settings.HistoriqueCombobox.Add(TextBox1.Text)
        Me.Close()
    End Sub
 
'pour ajouter le favoris - A cette partie tous fonctionne correctement, 'lorsqu'on click avec le code ci-dessous , tous fonctionne , sa navige etc. . .
 
Private Sub ListView1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) _
Handles ListView1.MouseUp
        Try
            Dim hti As ListViewHitTestInfo = ListView1.HitTest(e.Location)
            Dim url As String = hti.Item.Name
            CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(url)
 
'pour ajouter le traiteur d'événement sur le click. - Tous MARCHE. C'est 'fantastique mais . . .  lorsque j'arrive au save et que jouvre le browser a 'nouveau . . la c'est mon gros problème. 
'J'avais essayer avec 2 save , 1 pour le name et l'autre pour le text ,
 'mais sa donne que sa copie environ 2,3x fois
 'les item qui sont dans my.settings . . .
 
For Each item As String In My.Settings.FavList
            For Each itemm As String In My.Settings.HistoriqueCombobox
                Dim item1 As New ListViewItem
                item1.Name = item.ToString
                item1.Text = itemm.ToString
                ListView1.Items.Add(item1)
            Next
        Next
Alors, je vous le demande a nouveau a tous, Aidez moi, c'est le peu qu'il me reste.

Un gros merci encore