Webbrowser multi-onglets
Soyez le premier à donner votre avis sur cette source.
Vue 13 464 fois - Téléchargée 1 364 fois
Description
Cette DLL permet de créer un navigateur multi-onglets à partir d'un objet TabControl de Visual Studio. Tout est dans le zip...
N'hésitez pas à me poser des questions à propos des fonctions...
Source / Exemple :
Imports WebBrowser_Lib
Public Class frmMain
Dim clsNavigator As New WebBrowser_Lib.MultiTab
Private Sub frmMain_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
clsNavigator.TabControlDefined(Me.TabControl1)
clsNavigator.NewTabPage()
clsNavigator.GoHome()
AddHandler clsNavigator.Navigated, AddressOf WebBrowser_Navigated
AddHandler clsNavigator.Navigating, AddressOf WebBrowser_Navigating
AddHandler clsNavigator.ProgressChanged, AddressOf WebBrowser_ProgressChanged
AddHandler clsNavigator.NewWindow, AddressOf WebBrowser_NewWindow
AddHandler clsNavigator.DocumentCompleted, AddressOf WebBrowser_DocumentCompleted
AddHandler clsNavigator.PreviewKeyDown, AddressOf WebBrowser_PreviewKeyDown
End Sub
Public Sub WebBrowser_PreviewKeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.PreviewKeyDownEventArgs)
End Sub
Public Sub WebBrowser_Navigated(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserNavigatedEventArgs)
End Sub
Public Sub WebBrowser_Navigating(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserNavigatingEventArgs)
End Sub
Public Sub WebBrowser_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)
Me.txtURL.Text = clsNavigator.AbsoluteUri
clsNavigator.DisplayTilte()
End Sub
Public Sub WebBrowser_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs)
'Barre de progresion du chargement.
Me.pgbLoading.Minimum = 0
Me.pgbLoading.Maximum = e.MaximumProgress
Me.pgbLoading.Value = e.CurrentProgress
End Sub
Public Sub WebBrowser_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs)
'Annule l'ouverture des fenêtres d'Internet Explorer.
e.Cancel = True
End Sub
Private Sub btnOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOpen.Click
clsNavigator.Navigate(Me.txtURL.Text)
End Sub
Private Sub btnOpenInNewTab_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOpenInNewTab.Click
clsNavigator.Navigate(Me.txtURL.Text, True)
End Sub
Private Sub btnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClose.Click
clsNavigator.DeleteTabPage()
End Sub
Private Sub TabControl1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
Me.txtURL.Text = clsNavigator.AbsoluteUri
End Sub
End Class
Conclusion :
N'hésitez pas à me poser des questions à propos des fonctions...
Codes Sources
A voir également
- Vb.net webbrowser
- Webbrowser vb.net - Meilleures réponses
- Vb webbrowser - Meilleures réponses
- Navigateur internet multi onglets besoin d'aide ✓ - Forum - VB.NET
- Javascript : Onglet à tabulation multi bloc - CodeS SourceS - Guide
- Webbrowser gérant popup, onglets, boutons souris... - Codes sources - C# / .NET (.NET)
- Delphi webbrowser - Forum - Delphi / Pascal
- Chat multi client java - Guide
Commentaires
j'ai trouver pour ouvrir un lien dans un nouvelle onglet
ClsNavigator.Navigate(ClsNavigator.WebBrowser.StatusText, True)
et voila
mais pour ouvrir dans une nouvelle fenetre ça c'est autre chose ,pas encore trouve
pourrais tu me dire comment on peut ouvrir un lien d'une page web dans un nouvelle onglets avec WebBrowser_Lib parce que j'ai fais le tour de ton appli mais en vein
Tu peut me répondre directement sur mon site http://iblsysteme.dyndns.org/forum
Merci beaucoups
pour la note 9/10 pour ce petit manque pour les ouvertures de page
Bien à toi
Ne prend pas mal, le niveau "initié". J'ai choisi ce niveau car pour moi quelqu'un de débutant ne connait pas le système des collections et des AddHandler.
Mais sinon, c'est vrai, le code n'est pas difficile !
Cordialement.
Niveau initié c'est pas un peu exageré ? c'est du niveau débutant, et encore.
Après tout c'est un simple navigateur web, le code est court et très simple.
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.