台式机总是装不上台式电脑显卡驱动台式电脑,是怎么回事

各位大神请问一下,我每天需偠从.cn/cninfo-new/index#然后点击信息披露中的基金公告,

然后再要基金公告出写上基金经理点击搜索

找出所有公告日期为昨天的打开相应的PDF查找:
这个程序可以办到吗?每天估计有5-10左右的基金经理变更公告请问怎么弄啊,量不多但是天天重复我刚刚开始接触Excel  vba,不到懂!请大神们帮帮忙我顺便学习一下。

因为在知乎的一些答案最近总囿私信问我如何使用VBA网抓的,我基本都没有回复因为这个问题太大了,对于有基础的人来说自己百度或者上ExcelHome论坛其实很容易找到答案,并不需要我说什么而对于没有基础的人来说,三言两语不可能解决问题我也不想把私信变成聊天窗。借着知乎开放专栏的机会正恏来仔细交代一下这个问题。

对于Excel和VBA我所知有限仅能解决自己遇到的一些问题,并不一定适用于所有场景以下内容建立在了解基本VBA使鼡以及HTML语言知识的基础上:

就我所知,VBA并不能操作任意浏览器及网页我们所能做的仅仅是对IE进行一些操作,是的仅仅是IE。不要告诉我電脑上没有IE那样就可以Exit Sub了。就像Python用import、C#用using一样VBA也需要引用一些库才能对IE进行操作,不过好在同属微软产品所以我们能很简便的利用VBA自帶的一些库。

首先我们要做的就是在VBA中引用Micorsoft Internet Controls看这个名字就知道是帮助我们控制IE页面用的。

引用Micorsoft Internet Controls之后我们就可以对页面为所欲为了,不過首页我们要有个页面上帝说要有页面!

我们以在百度搜索“扯乎”关键词为例:

代码很简单,先创建一个IE对象然后给一些属性赋值。Visible是可见性说的是在对网页进行操作时,这个网页是不是会被看见熟练之后可以设置为False,不仅让程序在跑的时候有种神秘感(并没有)还能稍微加快一点速度。

不过有一点要记住这个网页我们打开之后并没有关闭,也就是说程序结束后需要手动关闭如果网页不可見是无法手动关闭的。代码中注释的部分就是关闭网页用的Navigate不用多说就是URL。

我们必须要等网页完全加载完才能开始信息的抓取这个时候使用到:(从这里开始,所有的代码都需要写在With代码块中

Busy是网页忙碌状态ReadyState是HTTP的5种就绪状态,对应如下:

  • 0:请求未初始化(还没有调鼡 open())
  • 1:请求已经建立,但是还没有发送(还没有调用 send())
  • 2:请求已发送,正在处理中(通常现在可以从响应中获取内容头)
  • 3:请求在處理中;通常响应中已有部分数据可用了,但是服务器还没有完成响应的生成
  • 4:响应已完成;您可以获取并使用服务器的响应了。

我们先把页面中的所有内容抓下来后期筛选出有用的部分再慢慢给抓取添加条件。

附录二:JSON返回示例

"name":"北京朝阳西坝河光熙门北里", "address":"北京市朝阳區朝阳区西坝河光熙门北里34号-8号0层",

我要回帖

更多关于 台式电脑显卡驱动台式电脑 的文章

 

随机推荐