URL opslaan en openen in VB.net

[Scandax]

Hallo,

Ik ben al een tijdje bezig in VB.net 2008 en heb een vraag: Hoe kan ik iemand een URL laten opslaan en (die opgeslagen) URL laten openen in zo'n browser dat je in een form kan plaatsen? De browser staat in een andere form.
Ik heb een tijdje terug een TUT gezien over my.settings en dacht dat ik het daarmee misschien wel klaar kreeg, maar dat werkt dus niet.

Gr Scandax

 

[CaptainBri]

Hoeveel URL's wil je de gebruiker laten openen?
Je kan het bijv. doen door het naar een bestandje weg te schrijven (.txt) en daarna weer te openen

 

[Scandax]

Ok, weet jij toevallig iets van een tutorial waarin me word uit gelegd hoe ik dat moet doen? Heb nog nooit iets op die manier gedaan

 

[CaptainBri]

Ok, weet jij toevallig iets van een tutorial waarin me word uit gelegd hoe ik dat moet doen? Heb nog nooit iets op die manier gedaan

Kijk eens:

De code voor het inlezen:

       Dim ofd As OpenFileDialog = New OpenFileDialog()

        If ofd.ShowDialog() = Windows.Forms.DialogResult.OK Then
            Dim Lees As StreamReader = New StreamReader(ofd.FileName)
            Dim Alles As String = Lees.ReadToEnd

            Dim arr() As String = Alles.Split(Environment.NewLine)

            For Each a As String In arr
                lstURLs.Items.Add(a)
            Next
            Lees.Close()
        End If

De code voor het wegschrijven ervan:

        Dim sfd As SaveFileDialog = New SaveFileDialog()

        If sfd.ShowDialog() = Windows.Forms.DialogResult.OK Then
            Dim Schrijf As StreamWriter = New StreamWriter(sfd.FileName)
            For Each a As String In lstURLs.Items
                Schrijf.Write(a + Environment.NewLine)
            Next
            Schrijf.Close()
        End If

Als je vragen hebt, stel ze gerust!

 

[Scandax]

Dank
Zal vandaag proberen.

EDIT:

Ik snap niet hoe ik dit moet gebruiken xD
Ik klik dubbel op mijn knop "Opslaan" en plak de code erin. VB.net vertelt me nu dit:

Dim Lees As StreamReader = New StreamReader(siteurl.txt)

Type 'StreamReader' is not defined

VB.net laat ook dit zien:

For Each a As String In arr 1stURLs.Items.Add(a)

Name 'tURLs.Items.Add (a)' is not declared

Ik dacht eerst dat ik op de plek waar 1stURLs staat Textbox1 of Textbox1.Text neer moet zetten maar dat is blijkbaar niet zo..

Verder weet ik niet of dit klopt:

Dim Lees As StreamReader = New StreamReader(siteurl.txt)

 

[CaptainBri]

Helemaal bovenin je code, moet je schrijven: ''Imports System.IO'' (zonder ''")

En de 1stURLs = een listbox.
En ''siteurl.txt'' moet in dezelfde directory(map) staan als van het programma die je uitvoert (de .exe), dan werkt het.