如何阻止用户在Web浏览器中导航?

时间:2011-07-29 12:22:16

标签: vb.net

我目前正在构建一个只加载一个页面的webbrowser,但我不希望用户能够通过点击广告链接导航,因为我不希望他们能够上网,点击链接最终会导致他们回到谷歌搜索他们喜欢的东西,如果他们足够聪明的话!

有什么想法吗?

3 个答案:

答案 0 :(得分:1)

页面加载完成后,拦截链接:

Dim olink As HtmlElement

Dim olinks As HtmlElementCollection = WB1.Document.Links

For Each olink In olinks

    olink.AttachEventHandler("onclick", AddressOf LinkClicked)

Next

然后添加一个函数:

Private Sub LinkClicked(ByVal sender As Object, ByVal e As EventArgs)
    If txtAddress.Enabled = True Then
        Dim link As HtmlElement = WB1.Document.ActiveElement
        Dim url As String = link.GetAttribute("href")
        MsgBox("Link Clicked: " & link.InnerText & vbCrLf & "Destination: " & url)
        WB1.Navigate(url, False)
    End If
End Sub

答案 1 :(得分:0)

听起来像是一个系统管理员问题,对我而言。

我不熟悉任何合适的软件。但如果您设置操作系统以便只允许访问“白名单”上的网页,则无需编写自定义网络浏览器。

答案 2 :(得分:0)

如果项目中有浏览器组件,则应为浏览器URL添加事件侦听器,如果更改,则重定向到所需页面。