Question

我有这段代码

    Dim shellWindows = New SHDocVw.ShellWindows
    Dim strTemp As String
    For Each ie As SHDocVw.InternetExplorer In shellWindows
            If ie.LocationURL = "Http:\\somelocation" then
                    ie.Document.ExecCommand("SelectAll", True, vbNull)
                    ie.Document.ExecCommand("Copy", False, vbNull)
                    strTemp = (Clipboard.GetText())
            End if
    Next

但是，我需要知道这个html页面的标题。（此页面由javascript加载，我无法查看源代码。谢谢。）

Answer 1

ie.Document.title属性应该具有您需要的内容。 http://msdn.microsoft.com/en-us/library/ie/ms535862(v=vs.85).aspx

Answer 2

我只是将字符串检索为字符串并找到标题：

Imports System.Net
Imports System.Text
...
    Dim myRequest As HttpWebRequest
    Dim myResponse As HttpWebResponse
....
        myRequest = CType(WebRequest.Create(URL), HttpWebRequest)
        myResponse = CType(myRequest.GetResponse(), HttpWebResponse)
        sr = New StreamReader(myResponse.GetResponseStream())
        sResponse = sr.ReadToEnd.ToString

使用vb.net读取Internet Explorer页面标题

2 个答案: