【VB】VB WebBrowser 获取网站标题问题VB WebBrowser 获取网站标题问题

admin

2013年11月14日 16:52 本文热度 4825

为什么用WebBrowser控件的LocationName方法显示出来的是地址而不是标题呢？
Private Sub Command1_Click()
W.Navigate (Text1.Text)
End Sub

Private Sub W_StatusTextChange(ByVal Text As String)
Label2.Caption = "网址：" & WebBrowser1.LocationName
Label1.Caption = "url:" & WebBrowser1.LocationURL
End Sub

WebbBrowser1.Documents.Title即可获得网站标题

设改控件为 webBbro1
那么 webBbro1.LocationName 就是标题信息了

Private Sub WebBrowser1_DownloadComplete() '页面截入完毕事件
Dim p
p = WebBrowser1.Document.Title
If p = "123" Then
msgbox "的确是"
else
msgbox "不是"
End If
End Sub

该文章在 2013/11/14 16:52:14 编辑过

关键字查询

正在查询...

点晴ERP是一款针对中小制造业的专业生产管理软件系统,系统成熟度和易用性得到了国内大量中小企业的青睐。

点晴PMS码头管理系统主要针对港口码头集装箱与散货日常运作、调度、堆场、车队、财务费用、相关报表等业务管理，结合码头的业务特点，围绕调度、堆场作业而开发的。集技术的先进性、管理的有效性于一体，是物流码头及其他港口类企业的高效ERP管理信息系统。

点晴WMS仓储管理系统提供了货物产品管理,销售管理,采购管理,仓储管理,仓库管理,保质期管理,货位管理,库位管理,生产管理,WMS管理系统,标签打印,条形码,二维码管理,批号管理软件。

点晴免费OA是一款软件和通用服务都免费，不限功能、不限时间、不限用户的免费OA协同办公管理系统。