[VB6] ShellExecute activeert Opera niet, probleem met DDE(?)

[Robtimus]

Vanuit een form probeer ik een door de user geselecteerde browser te openen met een URL mbv de volgende code (SW_SHOW = 5, sFullParams is momenteel alleen de URL):

Visual Basic:

nResult = ShellExecute(Me.hWnd, "Open", sBrowser, sFullParams, "", SW_SHOW)

Zowel Opera als Firefox openen de pagina perfect. Echter, wat ik ook als laatste parameter opgeef (1 tot 10 welke volgens de specs ondersteund zijn), als er al een Opera venster actief is dan wordt deze niet geactiveerd. Als er geen Opera venster actief is dan wordt er een nieuwe geopend met de URL. Firefox doet het wel zoals het hoort, in alle gevallen wordt Fx de actieve browser.

Ik heb met testen al ontdekt dat dit waarschijnlijk komt omdat Opera gebruik maakt van DDE (als ik dit uitschakel dan gaat het ook vanuit bv Explorer niet goed), maar hoe gebruik ik dit dan met ShellExecute? Op een manier die voor Fx en andere browsers ook werkt?

[Robtimus]

Flink zitten googlen vandaag en ik heb een manier gevonden voor DDE.
Met een text control (genaamd Text1 in de code):

Visual Basic:

Text1.LinkMode = 0                      ' 0 is None
Text1.LinkTopic = "Opera|WWW_OpenURL"   ' Uit de DDE settings de Application en Topic
Text1.LinkTimeout = 1000                ' De timeout
Text1.LinkMode = 2                      ' 2 is Manual, maw verzend wanneer wij dat willen
Text1.LinkExecute sURL                  ' Verstuur de URL, ook wel "%1" in DDE settings
Text1.LinkMode = 0                      ' Weer op none zetten, anders krijg je foutmeldingen