[VB.NET] Links openen in aparte vensters

[The Dud3]

Ik heb een progje gescherven dat kijkt of er in het registry een bepaalde entry is, en of hij niet "" is, en dan die entry (een URL) opent in de standard browser.

code:

        Dim i As Integer
        For i = 1 To 99
            Dim temp As String = registryLookUp(i)
            If temp <> "0" Then
                Try
                    System.Diagnostics.Process.Start(temp)
                Catch
                    MsgBox("Error: " & vbCrLf & vbCrLf & temp & vbCrLf & vbCrLf & "is not a valid URL.")
                End Try
            End If
        Next i

RegistryLookUp() staat dus in een standaardmodule, en retourneert "0" als de registrykey niet bestaat of leeg is.

Het probleem is nu dat hij de pagina's wel opent, maar in het zelfde venster.
Als ik bijvoorbeel www.google.com en www.tweakers.net wil opstarten, dan opent er zich een venster, en zie ik een ogenblijk google, die dan vervangen wordt door t.net.
Ik zou natuurlijk kunnen een nieuw IE venster kunnen maken door

code:

Shell("iexplore.exe -new " & temp)

te doen, maar dan zit ik vast aan IE.

Ik wil dus een nieuw venster van de standaardbrowser opennen.

[Verwijderd]

Hmm, dat kan volgens mij niet..
Zover ik weet is er in ieder geval geen standaardmethode voor iedere browser.

[The Dud3]

Verwijderd schreef op 17 september 2003 @ 12:50:
Hmm, dat kan volgens mij niet..
Zover ik weet is er in ieder geval geen standaardmethode voor iedere browser.

Zijn er buiten IE eigenlijk nog andere browsers die dit doen?
Anders stop ik er gewoon een "IE check" in

[whoami]

Heb je hier iets aan?
[rml][ VB] URL openen in nieuw venster[/rml]

[The Dud3]

whoami schreef op 17 September 2003 @ 13:15:
Heb je hier iets aan?
[rml][ VB] URL openen in nieuw venster[/rml]

Een beetje, maar ik kan geen VB6
Ik heb wel dit gevonden, maar dat helpt me ook niet echt

[Verwijderd]

Kan je niet in het register kijken dan voor de standaardbrowser en die dan starten???? Ik weet het ook niet precies waar dat in het register staat maar misschien kijken met welk programma een .html bestand wordt geopend....

[The Dud3]

code:

Dim i As Integer
        For i = 1 To 99
            Dim temp As String = registryLookUp(i)
            If temp <> "0" Then
                Try
                    Dim ExtReg As RegistryKey = Registry.ClassesRoot
                    Dim AppReg As RegistryKey = Registry.ClassesRoot
                    Dim xStr As String

                    ExtReg = ExtReg.OpenSubKey(".HTML")
                    xStr = ExtReg.GetValue("")
                    AppReg = AppReg.OpenSubKey(xStr & "\shell\open\command")

                    Dim SplitArray() As String
                    SplitArray = Split(AppReg.GetValue(""), """")
                    System.Diagnostics.Process.Start(SplitArray(1), temp)
                Catch
                    MsgBox("Error: " & vbCrLf & vbCrLf & temp & vbCrLf & vbCrLf & "is not a valid URL.")
                End Try
            End If
        Next i

Zo werkt het
Ty allemaal