用Access分析网站一例

文章作者 100test 发表时间 2011:03:26 20:45:05
来源 100Test.Com百考试题网


  问题:
  如何用 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

相关文章


计算机二级Access上机考试模拟试题(7)
计算机二级Access上机考试模拟试题(6)
2009等考二级Access上机考试模拟试题(3)
如何在Access报表中每隔N行显示一条粗线
用Access分析网站一例
全国计算机等级考试,计算机等级,计算机等级考试,计算机二级,计算机二级考试,等级考试,二级考试,Access
如何在报表中使用自定义尺寸的纸张
计算机等级,计算机等级考试,计算机二级,计算机二级考试,Access
计算机等级,计算机等级考试,计算机二级,计算机二级考试,Access
澳大利亚华人论坛
考好网
日本华人论坛
华人移民留学论坛
英国华人论坛