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