Auf Thema antworten

Nachricht

<blockquote data-quote="MS-User" data-source="post: 1253585" data-attributes="member: 79681">Ich frage bereits seit Längerem aus Excel heraus eine Website ab, bei welcher ich mich mit Benutzername und Passwort authentifizieren muss. Da die Website die Authentifizierung etwa alle 15 Minuten verwirft, muss ich mich für jede Abfrage (ca. 1-2x pro Stunde) neu anmelden.Bis einschließlich Excel 2013 konnte ich es noch so lösen, dass ich per VBA ein IE Objekt erstellt habe, in welchem ich automatisiert die Anmeldung durchführe, und und zwar folgendermaßen:Set IE = CreateObject(&quot;InternetExplorer.Application&quot;)&nbsp; &nbsp; With IE&nbsp; &nbsp; &nbsp; &nbsp; .Visible = False&nbsp; &nbsp; &nbsp; &nbsp; .navigate &quot;&quot;&nbsp; &nbsp; &nbsp; &nbsp; Do Until .readyState = 4&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; DoEvents&nbsp; &nbsp; &nbsp; &nbsp; Loop&nbsp; &nbsp; &nbsp; &nbsp; .document.all.Item(&quot;email&quot;).Value = &quot;&quot;&nbsp; &nbsp; &nbsp; &nbsp; .document.all.Item(&quot;password&quot;).Value = &quot;&quot;&nbsp; &nbsp; &nbsp; &nbsp; .document.forms(0).submit&nbsp; &nbsp; End WithSeit Excel 2016 (mit Get&amp;Transform) funktioniert genau dieses Skript aber nun nicht mehr. Die Authentifizierung in einer manuellen Webabfrage funktioniert hingegen noch - ist aber natürlich keine Lösung, da ich das ständig wiederholen müsste.Hat daher jemand eine Idee, wie das obige Skript unter Excel 2016 wieder dazu gebracht werden kann, dass die Authentifizierung an der Website automatisch erfolgt, und die anschließende Datenabfrage der Website erfolgreich ist?Danke schon eimal im Voraus!</blockquote>

[QUOTE="MS-User, post: 1253585, member: 79681"] Ich frage bereits seit Längerem aus Excel heraus eine Website ab, bei welcher ich mich mit Benutzername und Passwort authentifizieren muss. Da die Website die Authentifizierung etwa alle 15 Minuten verwirft, muss ich mich für jede Abfrage (ca. 1-2x pro Stunde) neu anmelden. Bis einschließlich Excel 2013 konnte ich es noch so lösen, dass ich per VBA ein IE Objekt erstellt habe, in welchem ich automatisiert die Anmeldung durchführe, und und zwar folgendermaßen: [I]Set IE = CreateObject("InternetExplorer.Application")[/I] [I] With IE[/I] [I] .Visible = False[/I] [I] .navigate ""[/I] [I] Do Until .readyState = 4[/I] [I] DoEvents[/I] [I] Loop[/I] [I] .document.all.Item("email").Value = ""[/I] [I] .document.all.Item("password").Value = ""[/I] [I] .document.forms(0).submit[/I] [I] End With[/I] Seit Excel 2016 (mit Get&Transform) funktioniert genau dieses Skript aber nun nicht mehr. Die Authentifizierung in einer manuellen Webabfrage funktioniert hingegen noch - ist aber natürlich keine Lösung, da ich das ständig wiederholen müsste. Hat daher jemand eine Idee, wie das obige Skript unter Excel 2016 wieder dazu gebracht werden kann, dass die Authentifizierung an der Website automatisch erfolgt, und die anschließende Datenabfrage der Website erfolgreich ist? Danke schon eimal im Voraus! [/QUOTE]

Authentifizierung