Hallo,
Ik ben al een tijdje met een browser bezig en probeer momenteel een url blocker te maken.
wat heb ik al gedaan:
allereerst heb ik een setting gemaakt waar een lijst gemaakt waar geblokkeerde sites in komen.
Vervolgens heb ik deze code toegevoegd:
Hierbij krijg ik de volgende error:
in de setting wordt de link op de volgende manier opgeslagen:
http://www.voorbeeldlink.nl
alvast bedankt.
Edit: mocht je je afvragen waarom ik ze opsla in een setting? ik weet momenteel nog geen andere manier om een reeks te gebruiken, mocht iemand een alternatief weten dat beter werkt "hoor" ik dat ook graag
Edit: ik heb net even nog iets uitgeprobeerd met de volgende code:
Deze code geeft de volgende foutmelding:
Index was outside the bounds of the array.
Ik ben al een tijdje met een browser bezig en probeer momenteel een url blocker te maken.
wat heb ik al gedaan:
allereerst heb ik een setting gemaakt waar een lijst gemaakt waar geblokkeerde sites in komen.
Vervolgens heb ik deze code toegevoegd:
Code:
Dim s As String
Dim strDomain() As String
For Each s In My.Settings.BlockedSites
strDomain = Split(s, "http://")
If wb.Contains(strDomain(1)) Then
wb.DocumentText = My.Resources.Blocked
AppManager.MainForm.pBar.Visible = False
Exit Sub
End If
Next
Hierbij krijg ik de volgende error:
Weet iemand hoe ik dit het beste kan verbeteren zodat het wel werkt?Value of type 'String' cannot be converted to 'system.windows.form.control'
in de setting wordt de link op de volgende manier opgeslagen:
http://www.voorbeeldlink.nl
alvast bedankt.
Edit: mocht je je afvragen waarom ik ze opsla in een setting? ik weet momenteel nog geen andere manier om een reeks te gebruiken, mocht iemand een alternatief weten dat beter werkt "hoor" ik dat ook graag
Edit: ik heb net even nog iets uitgeprobeerd met de volgende code:
Code:
If wb.Document.Url.ToString.Contains(strDomain(1)) Then
wb.DocumentText = My.Resources.Blocked
AppManager.MainForm.pBar.Visible = False
Exit Sub
End If
Deze code geeft de volgende foutmelding:
Index was outside the bounds of the array.
Laatst bewerkt: