split function

[davyquyo]

why doesn't this work

Private Sub Command1_Click()
On Error Resume Next
Text2.Text = Split(ophalen, "seta")(Text3.Text - 1)
End Sub
 
Private Sub Form_Load()
Dim ophalen As String
Open "C:\Program Files\Call of Duty\Main\config_mp.cfg" For Input As #1
Input #1, ophalen
Text1.Text = ophalen
Close #1
End Sub

and i have an other problem
i want to split it with a gign that looks like an empty square
if i copy it and paste than i begin the next rule

how can i let cbscript know tht he must split it with this sign

he must get info from this file

http://www.davyquyo.be/config_mp.cfg

but when i try he give error
out of range
because of the empty squares
he only can read //generate by call of duty