Guten Morgen,
da der Webbrowser (IE11 basierend) immer mehr Probleme auf diversen Internetseiten macht, habe ich auf den Cef Sharp Browser umgestellt.
Version 79.0, Download am 20.05.2020
Übermittelt wird die falsche Windosversion
Adresse Wie ist meine IP wird Windows 8 gemeldet. Besuche ich die gleiche Seite mit Firefox erscheint die richtige Version Windows 10.
Beim Sicherheitscheck der Sparkasse erhalte ich folgendes:
Ihr Google Chrome-Browser ist veraltet.
Der Sparkassen-Computercheck erkennt auf Ihrem Computer das Betriebssystem Windows 8.
Da ich gerne weiterhin AnyCpu benutzen möchte, muss wohl folgender Code ausgeführt werden:
Spoiler anzeigen
Da mein Programm nicht mit der Browser-Form starten soll, weiss ich nicht genau wo ich diesen Code plazieren soll.
da der Webbrowser (IE11 basierend) immer mehr Probleme auf diversen Internetseiten macht, habe ich auf den Cef Sharp Browser umgestellt.
Version 79.0, Download am 20.05.2020
Übermittelt wird die falsche Windosversion
Adresse Wie ist meine IP wird Windows 8 gemeldet. Besuche ich die gleiche Seite mit Firefox erscheint die richtige Version Windows 10.
Beim Sicherheitscheck der Sparkasse erhalte ich folgendes:
Ihr Google Chrome-Browser ist veraltet.
Der Sparkassen-Computercheck erkennt auf Ihrem Computer das Betriebssystem Windows 8.
Da ich gerne weiterhin AnyCpu benutzen möchte, muss wohl folgender Code ausgeführt werden:
VB.NET-Quellcode
- Class SurroundingClass
- <STAThread>
- Public Shared Sub Main()
- AppDomain.CurrentDomain.AssemblyResolve += AddressOf Resolver 'Fehler: Verwenden Sie eine RaiseEvent-Anweisung, um ein Ereignis aufzurufen.
- LoadApp()
- End Sub
- <MethodImpl(MethodImplOptions.NoInlining)>
- Private Shared Sub LoadApp()
- Dim settings = New CefSettings()
- settings.BrowserSubprocessPath = Path.Combine(AppDomain.CurrentDomain.SetupInformation.ApplicationBase, If(Environment.Is64BitProcess, "x64", "x86"), "CefSharp.BrowserSubprocess.exe")
- Cef.Initialize(settings, performDependencyCheck:=False, browserProcessHandler:=Nothing)
- Dim browser = New BrowserForm()
- Application.Run(browser)
- End Sub
- Private Shared Function Resolver(ByVal sender As Object, ByVal args As ResolveEventArgs) As Assembly
- If args.Name.StartsWith("CefSharp") Then
- Dim assemblyName As String = args.Name.Split({","c}, 2)(0) & ".dll"
- Dim archSpecificPath As String = Path.Combine(AppDomain.CurrentDomain.SetupInformation.ApplicationBase, If(Environment.Is64BitProcess, "x64", "x86"), assemblyName)
- Return If(File.Exists(archSpecificPath), Assembly.LoadFile(archSpecificPath), Nothing)
- End If
- Return Nothing
- End Function
- End Class
Da mein Programm nicht mit der Browser-Form starten soll, weiss ich nicht genau wo ich diesen Code plazieren soll.
Gruß Markus