fuite de mémoire RAM quand j'utilise webbrowser VB

Question

Salut, 
j'ai un prblme avec mon application, c'est juste une forme qui contient un navigateur webbrower pour charger des liens (groupes facebook) d'un fichier .txt, apres certain temps je trouve que l'application a consommée toute la RAM !!!
SVP, aidez moi, s'il ya une solution pour libérer la mémoire consommée par le webbrowser apres chaque navigation ???

voici le code:

Dim liens As String() = File.ReadAllLines("D:\liste_grps.txt")

For i = 1 To nbr_liens

WebBrowser1.Navigate(liens(i))

WebBrowser1.Stop()

Next


merci d'avance

ucfoutu · Answer

Bonjour,
Et que se passerait-il selon toi si tu ouvrais le même nombre de liens URL manuellement ?

ajdad · Answer

merci ucfoutu pour ta réponse,
il donne le meme problme ! je pense q l ya probleme au niveau de webbrowser, qui fait le cumule de la mémoire consommée.

ucfoutu · Answer

Et ce n'est alors pas un problème VB.Net, mais totalement autre ...
Tu aurais le même en ouvrant par exemple un grand nombre de n'importe quoi d'autres choses.
Sans compter que le navigateur garde en plus l'historique des liens !

ajdad · Answer

j'ai essayer avec la methode dispose(), mais elle tue le webbrowser definitivement, alors que j'ai besoin d'utiliser le navigateur avec le reste des liens !

ucfoutu · Answer

Une autre fois, donc : ce n'est pas un problème VB.Net, mais un problème de limites d'une machine.
 
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.

ajdad · Answer

le webbrowser est un element de vb.net, alors, la question c'est, coment on peut libérer la mémoire vive consommée par cet element apres plusieur utilisation sans ferme l'application ?

Zermelo · Answer

Bonsoir ajdad. 
Est-ce bien la totalité de votre code que vous nous avez donné ?
Cordialement.

ajdad · Answer

merci Zermelo pour votre reponse, 
oui, 
j'ai une simple application, qui me permet de charger une liste de liens (groupes facebook) un par un:

Dim liens As String() = File.ReadAllLines("D:\liste_grps.txt") 

For i = 1 To nbr_liens 

WebBrowser1.Navigate(liens(i)) 

WebBrowser1.Stop() 

Next

mais apres qlq temps, j'ai recu un message que la mémoire est insuffisante !!!

j'ai verifié les performances de mon pc par le gestionnaire de taches, et j'ai trouvé que cet application atteinte 1.5Go !!! presqu toute la ram !

ajdad · Answer

c'est un vrai problème n'est ce pas ;-)
ou est les vrai programmeurs !

PWM63 · Answer

Bonjour,

Je viens de trouver 1 solution pour résoudre ce problème de fuite mémoire.

D'après mes tests, cela fonctionne (sur VB Net 2010). La mémoire libérable est automatiquement réellement libérée par le système dès que cette mémoire libérable est suffisamment conséquente. Avant ma solution, mon programme montait à plus d'1 Go en RAM avant que le message d'erreur ne s'affiche. Maintenant, dès que le programme monte vers les 400 Mo, cela redescend à 100 Mo.

Pour rendre la mémoire du WebBrowser libérable, il faut normalement faire 1 Dispose. Le problème est que le contrôle n'est plus utilisable.

Il est donc possible de contourner ce problème, en créant 1 liste de WebBrowser.
Une fois la page chargée, il ne reste plus qu'à faire 1 Dispose du WebBrower dans cette liste, et le tour est joué.
On fait ensuite 1 Remove sur la liste pour ne pas garder 1 élément vide pour rien.

En espérant que ça en aide plus d'un. :)

PS : dans mon exemple ci-dessous, mon WB n'avait pas à s'afficher à l'écran, les contôles sont donc créés dans le code uniquement. Si vous avez besoin d'afficher le WebBrowser à l'écran, je pense qu'il suffit juste d'ajouter le contrôle dans le conteneur (form ou autre).

Exemple :
Public Class Form_WB

Dim wb As WebBrowser 'le WB qui sera instancié quand on en aura besoin, et qui ne sera jamais Disposed parce qu'on veut le réutiliser
    Dim wbs As New List(Of WebBrowser) 'le WB ci-dessus sera ensuite ajouté dans cette liste de WB ; on naviguera dans le wb de cette liste, et on fera le dispose du wb dans cette liste

Private Sub Button_Naviguer_Click(sender As System.Object, e As System.EventArgs) Handles Button_Naviguer.Click

'on recrée le WB
        wb = New WebBrowser

wb.ScriptErrorsSuppressed = True

AddHandler wb.DocumentCompleted, New WebBrowserDocumentCompletedEventHandler(AddressOf wb_DocumentCompleted)

'on l'ajoute dans la liste
        wbs.Add(wb)

'pour naviguer, ne pas utiliser wb, mais utiliser wbs(n-1)
            wbs(wbs.Count - 1).Navigate(mon_url, False) 'ne pas oublier de déclarer / renseigner mon_url

End Sub

Private Sub wb_DocumentCompleted(sender As System.Object, e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)

'mettre du code ici si besoin

'terminer par ceci :

wbs(wbs.Count - 1).Dispose() 'on libère le wb de la liste ; le wb hors liste est donc toujours disponible

'à ce stade, si on fait 1 GC.Collect, la mémoire devrait être immédiatement libérée (je n'ai pas essayé car le système s'en charge tout seul quand il a besoin de RAM)

wbs.RemoveAt(wbs.Count - 1) 'l'item vide ne sert à rien dans la liste, autant réduire la liste

End Sub

End Class

Fuite de mémoire RAM quand j'utilise webbrowser VB

10 réponses

Votre réponse

Discussions similaires