CLEAR CACHÉ GECKOFX


Sub clearChaceGecko()
    Gecko.Cache.ImageCache.ClearCache(True)
    Gecko.Cache.ImageCache.ClearCache(False)

    Dim historyMan As nsIBrowserHistory = Xpcom.GetService(Of nsIBrowserHistory)(Gecko.Contracts.NavHistoryService)
    historyMan = Xpcom.QueryInterface(Of nsIBrowserHistory)(historyMan)
    historyMan.RemoveAllPages()
End Sub

CefSharp.WinForms

https://www.nuget.org/packages/CefSharp.WinForms/

Imports CefSharp
Imports CefSharp.WinForms

 Private ChromeBrowser As ChromiumWebBrowser

 Public Sub New()
    InitializeComponent()

    Dim settings As New CefSettings()
    CefSharp.Cef.Initialize(settings)

   'main browser
    ChromeBrowser = New ChromiumWebBrowser("https://www.miweb.com/")
    Me.Controls.Add(ChromeBrowser)
    ChromeBrowser.Visible = True
    ChromeBrowser.Dock = DockStyle.Fill
End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    AddHandler ChromeBrowser.FrameLoadEnd, AddressOf ChromeBrowser_FrameLoadEnd
End Sub

Sub ChromeBrowser_FrameLoadEnd()
    With ChromeBrowser
       'Complete web form
       Dim identifiers As List(Of Long) = .GetBrowser.GetFrameIdentifiers()
       For Each i As Long In identifiers
          Try
           Dim frame As CefSharp.IFrame = .GetBrowser.GetFrame(i)
           frame.ExecuteJavaScriptAsync("document.getElementById('user').value='root';")
           frame.ExecuteJavaScriptAsync("document.getElementById('paw').value='1234';")
           frame.ExecuteJavaScriptAsync("document.getElementById('btgo').click();")
           Exit For
   Catch ex As Exception
          End Try
      End With
End Sub