作者s52222b (陈猪静)
看板Office
标题[算表] 怎麽用vba抓取公司的资料
时间Sun Nov 3 22:23:05 2019
hello all:
想询问一下用vba进入网站中的超连结下载档案
我写了一个小程式,想要进入公司的网站抓取资料
但遇到一个问题,我的日期以及机台都筛选好了
相关部分的程式码如下
With ie
.document.all("ctl00$ContentPlaceHolder1$ddlStart_date").Value = "20191031" '
起始日期
.document.all("ctl00$ContentPlaceHolder1$ddlEnd_date").Value = "20191031" '结
束日期
.document.all("ctl00$ContentPlaceHolder1$txtEntity").Value = "PCB39" '选择机台
.document.all("ctl00$ContentPlaceHolder1$DropDownCheckBoxes1$74").Checked = "Y
" '选择站点
.document.all("ctl00$ContentPlaceHolder1$Button2").Click '按下EXEL抓资料
? ? ? ?
? ? ? ? Do While ie.busy = True Or ie.readystate <> 4
? ? ? ? ? ? DoEvents
? ? ? ? Loop
end with
按下EXCEL後抓资料即可下载档案,但遇到一个小问题
按下EXCEL後会出现一个Click here 才能下载Excel档
https://m.imgur.com/gallery/wh2U3Pq
这个部分网页的原始码如下,他把超连结建在here那边
这个请问要怎麽让程式码进入
因为他的档名是随着你下载的时间点变动的,所以我没
办法直接用超连结进入,想请问这样有办法进入here那边
下载档案,并且将档案存在某一个位置吗??
https://m.imgur.com/gallery/wh2U3Pq
https://m.imgur.com/LSHTwUS
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 123.205.177.120 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1572790987.A.E37.html
※ 编辑: s52222b (123.205.177.120 台湾), 11/03/2019 22:25:53
1F:→ soyoso: google excel vba ie save as file dialog box11/04 07:08
目前执行程式码如下,在要按here的时候
有问题都会出现却出现没有设定物件变数
或with区块变数,
https://i.imgur.com/4iXJr9M.jpg https://i.imgur.com/UWdiV7X.jpg
这让我有疑问,确认网页的原始码之後发现,原始
码中有两个跟相关的分页
分别是MaintenceRecord.aspx?isCopy=True
跟 MaintenceRecord.aspx?HI...2这两个
预设的网页原始码是上面那一个,而HERE的部
分则是在下面的原始码
https://i.imgur.com/VHyRqHB.jpg
https://i.imgur.com/WGT3N1n.jpg
不知道是不是因为这样才读不到HERE部分的超
连结,如果是这个问题那该怎麽处理阿?
拜托求解!!!!
※ 编辑: s52222b (101.10.7.99 台湾), 11/04/2019 17:09:22
※ 编辑: s52222b (123.205.177.120 台湾), 11/04/2019 20:55:15
2F:推 waiter337: 要先看你的网站有没有绑定chrome才能开启 11/30 15:14