问题: 如何用 Access 分析一个网站,或者在网站上提交一个查询,得到结果后存储进数据库哪? 如何用 Access 下载 DVBBS 论坛上所有的帖子? 如何用 ACCESS 编写灌水程序? 答案非常简单—— DHTML 编程。 有人可能问了,ACCESS 使用的是 VBA ,而 DHTML 中使用的是 VBS 怎么可能通用哪?其实 VBS / VBA 都是 VB 的子集。在 Access 中只要引用 Microsoft Internet Controls Microsoft HTML Object Library 即可,然后在窗体上加入 “Microsoft Web 浏览器”控件 好了,下面就以我写的一个读取某 IP 物理地域查询网站页面的数据库为例说明 DHTML / “Microsoft Web 浏览器”控件在 ACCESS 的应用吧。 “Microsoft Web 浏览器”控件的作用是什么哪?主要就是为了获得 DOCUMENT 对象的,DHTML 的操作都是以 DOCUMENT 对象为运行基础的。 要完成读取网页的功能我们必须了解 DHTML 的几个简单的对象以及属性 1、DOCUMENT 对象:代表这整个 HTML 文档 2、BODY 对象:是 DOCUMENT 对象的子对象,里面存储着所有显示给用户看的 HTML 代码 3、innerText 属性:页面中显示给客户看的文本,注意:不是 HTML 代码呦 4、innerHTML属性:构成页面的 HTML 代码 5、对象.all.length属性:页面中所有 element 的个数。(all 用于表示所有对象) ok ,接下来就让我们一边写代码,一边分析吧: Option Compare Database Dim blnSwitch As Boolean Private Sub Command1_Click() 用于启动浏览功能 Me.WebBrowser3.Navigate ("http://ip.loveroot.com/index.php?job=search") End Sub Private Sub Command11_Click() 将需要搜索的IP 写入全局变量 splitIP Text1.Value End Sub Function splitIP(strip) 将需要搜索的IP 写入全局变量 Dim a() As String strip = strip