Help met array en split

[w00tare]

Hallo,

Dit heb ik:

Dim page As String = GetPage("http://www.site/s.txt") ' Dit is site1|site2|site3
        Dim h_arr(0 To 999) As String
        Array.Clear(h_arr, h_arr.GetLowerBound(0), h_arr.Length)
        For Each ch As Char In page ' ch = "|"
            int += 1
        Next
        For i = 1 To int
            Dim p() As String = page.Split("|")
            h_arr(i) = p(0)
            page.Replace(p(0), Nothing)
        Next

Na deze code, moet h_arr dus

site1
site2
site3

bevatten. h_arr(0) = site1, h_arr(1) etc.

Hij gaat bij 'Dim p() As String = page.Split("|")' daar ergens de fout in.
Ik kom er zelf niet meer uit. Ik hoop jullie wel. Bedankt.

 

[xxmart]

mis ik iets? of is dit voldoende?

Dim page As String = "page1|page2|page3"
Dim myArr As Array = page.Split("|")

 

[w00tare]

mis ik iets? of is dit voldoende?

Dim page As String = "page1|page2|page3"
Dim myArr As Array = page.Split("|")

Och, Ik heb het al gevonden.

            h_arr(i) = p(0)

moest

            h_arr(i) = p(1)

zijn.

 

[xxmart]

Waarom zo omslachtig als ik vragen mag?