none
Zertifikatsfehler - laden der Website fortsetzen mit VBS klicken

    Frage

  • Hallo,

    ich bin aktuell dabei einige Skripte für unser Monitoring zu schreiben, welche bestimmte Seiten im Internet Explorer automatisch öffnen soll und zum Login bestimmte Buttons klicken soll. Vorerst sei gesagt, ich habe nicht viel Ahnung von VBScript - bitte verzeiht mir schlechte Formulierungen/Fehler. Ich habe mich im Internet zu der Sache belesen, und das klicken der Login Buttons über IE.Document.All.Item(" input id des Buttons aus dem HTML Code") funktioniert soweit auch. Nur ist mein Problem das wir im Webinterface unserer USV eine Zertifikatswarnung bekommen, welche sich nicht durch installieren des Zertifikates beheben lässt. Daraufhin habe ich versuch, das klicken auf "laden der Website fortsetzen" mit VBS zu erreichen, jedoch ohne Erfolg.

    Der HTML Code zum "zu klickenden Link" ist:

    Ich habe bereits IE.Document.All.Item("continueToSiteAlign") versucht, jedoch ohne Erfolg. Kann mir da eventuell jemand weiterhelfen bitte?

    Vielen Dank im Voraus !

    Liebe Grüße

    Felix




    Montag, 23. Juli 2018 11:30

Alle Antworten

  • Hallo Felix,

    wie automatisiert Du den IE? Zeig mal bitte etwas Code.


    Gruß, Stefan
    Microsoft MVP - Visual Developer ASP/ASP.NET (2001-2018)
    https://www.asp-solutions.de/ - IT Beratung, Softwareentwicklung, Remotesupport

    Montag, 23. Juli 2018 13:19
  • Hallo Stefan,

    aktuell verwende ich z.B. folgendes VB Script, um mich an der Panda Security Website anzumelden, und danach zu einer bestimmten Seite in Panda zu navigieren:

    url_Left = "https://www.pandacloudsecurity.com/PandaLogin/SSO/DoLogin/16?brand=0&managed=False"
    set Shell = WScript.CreateObject("WScript.Shell")
    
    'Linker Monitor
    With CreateObject("InternetExplorer.Application")
    .TheaterMode = False
    .AddressBar = True
    .MenuBar = False
    .Resizable = True
    
    ' Hier die Fenstergröße definieren
    .Height = 1080
    .Width = 1920
    .Left = 0
    .Top = 0
    .FullScreen = False
    .Silent = False
    .Visible = True
    Wscript.Sleep 1000
    .Navigate url_Left
    
        Wscript.Sleep 5000
    Shell.AppActivate ("Am Panda-Konto anmelden - Internet Explorer")
    on error resume next
    .Document.All.Item("loginButton").Click
    
    Wscript.Sleep 10000
    
    .Navigate "https://sm.pandasecurity.com/csm/system/dashboard?lang=de&kiosk=true"
    Do While (.Busy Or .READYSTATE <> 4)
        Wscript.Sleep 250
    Loop
    
    End With

    Jedoch bekomme ich das Skript nicht zum laufen, wenn ich auf eine Website navigiere, wo folgender Zertifikatsfehler auftritt, da ich nicht weiß wie ich das "laden der Website fortsetzen" über VBS klicken kann.

    LG

    Felix

    Edit: Dazu ist noch zu sagen, dass das Skripte automatisch beim Start des Systems ausgeführt werden soll. Ich benutzte eine "Multiple-Desktop-App", welche verschiedene Desktops per Slideshow durchläuft. Jeweils beim 1. betreten des Desktops wird dann das entsprechende Skript für diesen Desktop ausgeführt.

    • Bearbeitet Felix24 Dienstag, 24. Juli 2018 10:26
    Dienstag, 24. Juli 2018 05:27