Office中国论坛/Access中国论坛 › Access中国门户旧版 ›Access源码› 加载项/外接程序 › 查看内容

浅谈DOM之二：选择器（1）

2015-7-3 13:16| 发布者: admin| 查看: 1887| 评论: 0|原作者: roych|来自: www.office-cn.net

摘要: DOM操作的是网页元素，显然，我们需要一个网页脚本的运行环境。那么显然，我们可以选择IE、火狐等等作为运行环境。不过，我们还有一个更好的选择，就是Access内置的Webbrowser控件（需要恶补相关知识版友请点击这里 ...

   DOM操作的是网页元素，显然，我们需要一个网页脚本的运行环境。那么显然，我们可以选择IE、火狐等等作为运行环境。不过，我们还有一个更好的选择，就是Access内置的Webbrowser控件（需要恶补相关知识版友请点击这里）。

   确定了运行环境之后，我们就开始使用DOM吧。
   我们沿用上一节的文件，在窗体上插入一个Webbrowser控件，然后增加加载事件。这样就可以把网页加载到webbrowser里了：

Private Sub Form_Load()
'定义webbrowser和html文档
Dim wb As WebBrowser
Dim doc As HTMLDocument
Set wb = Me.WebBrowser0.Object
wb.Navigate CurrentProject.Path & "\test.html"
Set doc = wb.Document
End Sub

复制代码

   第一种选择器：getElementsByTagName【注：考虑到兼容性，IE6专用的document.all("p")之类就不说了】
   这是一种根据标签名来选择元素的选择器。例如，我们需要选择p元素，就可以使用：document.getElementsByTagName("p")。需要注意的是，这是选择了所有的p元素。如果需要选择第一个怎么办？那么只能用item下标（DOM的下标是从0开始的）来表示了。
   如果需要选择它的文本，则可以通过innerText或者TextContent属性来实现。需要说明的是，innerText并非EMCAScript（即JavaScript）的标准，但IE及火狐均支持这一属性。它们的区别在于，TextContent是移除标签后的文本，而innerText则会根据实际重新排列过，例如内置文本有分行时。

   选择是解决了。那么，对DOM增删改怎么办？我们至少有两种办法：修改HTML代码，或者处理节点。我们这里先从简单的修改HTML代码说起。假定不需要增加节点的话，我们可以重新设置innerText，否则就应该修改innerHTML了。例如：

Private Sub cmdCreate_Click()
Dim wb As WebBrowser
Dim doc As HTMLDocument

复制代码

收藏分享邀请

上一篇：浅谈DOM之二：选择器（1）

帐号		自动登录	找回密码
密码			注册

浅谈DOM之二：选择器（1）

最新评论

相关分类