Thema: Aktuell im Browser geöffnete Url auslesen

[OCtopus]

Ähnliche Themen

vista sidebar nicht aktuell

Festplatte auslesen

Startmenü - zu letzt geöffnete Programme werden nicht mehr angezeigt

Wie kann ich mit einem Skript die aktuell im Browser (IE, Firefox) geöffnete Url auslesen? Gibt es evtl. eine passende API-Funktion?

Ich brauche diese Information für ein Skript mit dem ich mich automatisch auf bestimmten Seiten einloggen kann.

Vielen Dank für Eure Hilfe.

[(auto)admin]

Vielleicht findet sich ja eine Antwort in folgenden Themen:

• vista sidebar nicht aktuell
• Festplatte auslesen
• Startmenü - zu letzt geöffnete Programme werden nicht mehr angezeigt
• CPU auslesen
• Vista WMI auslesen
• Als Adminisdrator User Passwort auslesen

[Markus]

also mit JavaScript bekommst du die aktuelle URL ganz einfach:

Code: [Auswählen]

<script type="text/javascript">
window.alert(document.URL);
</script>

also mittels "document.URL"

hoffe das bringt dir was...

[OCtopus]

Mit JS kann ich nicht umgehen. Ich bräuchte vbscript...

[Frank W.]

Hallo OCtopus,

ich gehe mal davon aus, dass es darum geht die URL von "außen" aus dem Browser zu bekommen.
Für den IE kann ich folgendes CodeSnip anbieten mit dem alle Instanzen des IE gefunden und durchlaufen werden
um anschließend jeweils die URL abzufragen.

Mit einem vergleichbaren Verfahren für FireFox kann ich leider atm nicht dienen.

Code: [Auswählen]

Dim oWindowList
Set oWindowList = CreateObject("Shell.Application").Windows
If oWindowList.Count > 0 Then
  Dim oWindow
  For Each oWindow In oWindowList
    If UCase(Right(oWindow.FullName, 12)) = "IEXPLORE.EXE" Then
      MsgBox "Internet Explorer gefunden. URL:= '" & oWindow.LocationURL & "'"
    End If
  Next
End If


Ich hoffe das hier hilft aber schon mal ein wenig weiter.

Gruß Frank

[OCtopus]

Vielen Dank, Frank. Das werde ich mal probieren.

Für Firefox bin ich zwischenzeitlich schon weiter gekommen, vgl:
http://de.autohotkey.com/forum/viewtopic.php?t=5638

[Frank W.]

Hallo OCtopus,

freut ( auch über Dankasagung  ) mich, wenn ich helfen konnte.