Domino 9 und frühere Versionen > ND7: Entwicklung
Links aus Webbrowser-Steuerelement im Browser öffnen
rar:
Hmmmm.....
Jetzt stehe ich wieder vor einem Problem.
Zur Zeit setze ich ein Flag im DocumentComplete wenn das Dok fertig geladen ist. Das wird dann im BeforeNavigate2 abgefragt. Wenn es gesetzt ist, dann öffne ich den Link mit diesem Code in einem neuen Fenster.
Call ws.URLOpen(Cstr(Url))
Cancel = True
Theoretisch sollte es so funktionieren. In der Praxis schaut es aber so aus, dass einige Webseiten aus mehreren Seiten bestehen. Wenn ich z.B. http://derstandard.at/ öffne, komm ich bis die Seite komplett geöffnet wird ca 5mal ins DocumentComplete und ins BeforeNavigate2 rein. Bis die Seite also offen ist, öffnen sich durch den Code im BeforeNavigate2 mehrere leere Fenster.
Irgendwie bräuchte ich ein Clickevent in dem Webbrowser, bei dem ich das Flag setze. Oder ein DieSeiteIstVollständigGeladenEvent.
Leider habe ich nichts dergleichen gefunden. Hat vielleicht jemand eine Idee, wie ich das machen könnte?
-daniel
Ralf_M_Petter:
Nun ich an Deiner Stelle würde halt mal schauen, was genau dass BeforeNavigate2 auslöst und ob es dabei irgendwelche Gemeinsamkeiten gibt, die du in deinem Script erkennen könntest.
Grüße
Ralf
rar:
Naja, das BeforeNavigate2 wird ja bei jedem laden der Seite aufgerufen. Leider besteht derStandard.at aus 5 Seiten und mir ist nicht klar wie abgefragt werden kann, ob die gesamte Seite fertig geladen ist.
Ralf_M_Petter:
Ich meinte du sollst mal schauen, ob die 5 Seiten aus denen der Standard besteht irgendwas gemeinsam haben. Poste doch mal die Urls die du beim BeforeNavigate bekommst?
Grüße
Ralf
rar:
Wenn ich im Postopen diesen Code ausführ,
--- Code: ---Dim objMWB As Variant
Set objMWB = Source.GetObject( "Microsoft Web Browser" )
objMWB.Navigate("http://derstandard.at")
--- Ende Code ---
dann komm ich 17 mal ins BeforeNavigate2. :-\
Folgende Seiten werden geöffnet (TF = TargetFrame):
--- Code: ---TF: topnav
Url: javascript:c='<html><body><img%20src='%20+%20unescape('%22')%20+%20'http://derstandard.at/img/site/top/derStandard.at.gif'
%20+%20unescape('%22')%20+%20'></body></html>'
TF: leftnav
Url: about:blank
TF: HAUPTFRAME
Url: http://derstandard.at/?ressort=Seite1
TF: bottomnav
Url: about:blank
TF: fremdInterface
Url: about:blank
TF: topnav
Url: http://derstandard.at/?page=topnav
TF:
Url: http://derstandard.at/MetaAdServer/provider.asp?i1=1&i2=1&i3=true&p=13&v1=derstandard.at/newsroom_uebersicht&v2=Middle1
TF:
Url: http://derstandard.at/MetaAdServer/provider.asp?i1=1&i2=1&i3=true&p=13&v1=derstandard.at/newsroom_uebersicht&v2=Middle2
TF:
Url: http://derstandard.at/MetaAdServer/provider.asp?i1=1&i2=1&i3=true&p=13&v1=derstandard.at/newsroom_uebersicht&v2=Middle3
TF:
Url: http://derstandard.at/MetaAdServer/provider.asp?i1=1&i2=1&i3=true&p=13&v1=derstandard.at/newsroom_uebersicht&v2=Right1
TF:
Url: http://derstandard.at/MetaAdServer/provider.asp?i1=1&i2=1&i3=true&p=13&v1=derstandard.at/newsroom_uebersicht&v2=Right2
TF:
Url: http://derstandard.at/MetaAdServer/provider.asp?i1=1&i2=1&i3=true&p=13&v1=derstandard.at/newsroom_uebersicht&v2=Right3
TF: advframe
Url: about:blank
TF: leftnav
Url: javascript:c='<html><head><title>NoNav</title></head><body%20bgcolor="#D8DBD8"></body></html>'
TF: advframe
Url: http://derstandard.at/MetaAdServer/werbung.asp?rt=cp/seite1/ressort
TF: bottomnav
Url: http://derstandard.at/?page=bottomnav
TF:
Url: http://derstandard.at/AdServer/AdServerM.aspx?Position=Honda_Sidebar_CRV_August08&type=10
--- Ende Code ---
Navigation
[0] Themen-Index
[*] Vorherige Sete
Zur normalen Ansicht wechseln