[RESOLVED] WebBrowser Help

[GDOG34]

Ok this is how the code works, In my web browser you cannot go to any site. that is not in the file. The first time you go to a allowed site you can go to any other site after that its like it dosent check the file no more. Whey is that?

My Code:

Dim FF As Integer, sItem As String
lstValidURLs.Clear
' add code here to ensure file exists
FF = FreeFile
Open App.Path & "\Configuration Files\allowed.ini" For Input As #FF
Do Until EOF(FF)
    Line Input #FF, sItem
    lstValidURLs.AddItem sItem
Loop
Close #FF
GoodURL = False
For I = 0 To lstValidURLs.ListCount - 1
  If Left(Combo1.Text, Len(lstValidURLs.List(I))) = lstValidURLs.List(I) Then
    GoodURL = True
    Exit For
  End If
Next I
If GoodURL Then
'Navigate To Selected Link One CLick
w1.Navigate2 Combo1.Text
Else
End If
End Sub