Question

我正在尝试在Visual Basic 中构建一个程序，它对我放在我网站上的文本作出反应。例如，该计划进入我的学校网站，如果我的学校的网站说'＃34;学校已关闭＆＃34;它会显示文字＆＃34; No School＆＃34;关于该计划。

这样的事情：

webbrowser1.navigate("www.mysite.com")
if <Webpage contains the words "School is Closed"> then
     label1.text = "No School"
end if

我以前做过，所以我知道这是可能的，我只是不记得如何。有人可以帮忙吗？

Answer 1

这样做的方法本身就是：

Imports System.Net
Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim strin As String = New WebClient().DownloadString(("http://example.com"))
        If strin.Contains("is closed") Then
            Label1.Text = "School"
        End If
    End Sub
End Class

Adapted from this.

Answer 2

我在这里找到了问题的答案： http://www.ultimateprogrammingtutorials.info/2013/09/down-for-everyone-or-just-me-in-vbnet.html

我遇到问题的原因是因为我没有导入System.Net命名空间。

Visual Basic如果网站包含某些文本

2 个答案: