返回列表 上一主題 發帖

在 windows7 環境抓不到資料??

t8899

帖子
746 
主題
243 
精華
0 
積分
1002 
點名
0  
作業系統
WINXP 
軟體版本
OFFICE2003 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2024-5-5 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-3-5 07:02 | 顯示全部帖子

在 windows7 環境抓不到資料??

本帖最後由 t8899 於 2015-3-5 07:04 編輯

office 2003
在windows xp 下一切正常
在windows 7抓不到資料???(但如用F8,單步執行則抓的到)
測驗發現在 .Document.BODY.innerHTML = .Document.getElementsByTagName("table")(4).outerHTML 抓不到資料
Book2.zip (20.2 KB)
收藏 分享

t8899

帖子
746 
主題
243 
精華
0 
積分
1002 
點名
0  
作業系統
WINXP 
軟體版本
OFFICE2003 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2024-5-5 
2#
發表於 2015-3-5 14:19 | 顯示全部帖子
回復  t8899
試試看
GBKEE 發表於 2015-3-5 08:51


有時可以，有時又不可以
不可以的次數較多!

TOP

t8899

帖子
746 
主題
243 
精華
0 
積分
1002 
點名
0  
作業系統
WINXP 
軟體版本
OFFICE2003 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2024-5-5 
3#
發表於 2015-3-6 12:46 | 顯示全部帖子
回復  t8899
再試試看
GBKEE 發表於 2015-3-6 09:19

是沒問題了
但資料的日期偶而會抓到 前1日
今日尚未收盤，應抓到 3/5 , 試5次有1次抓到3/4

TOP

t8899

帖子
746 
主題
243 
精華
0 
積分
1002 
點名
0  
作業系統
WINXP 
軟體版本
OFFICE2003 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2024-5-5 
4#
發表於 2015-3-6 14:26 | 顯示全部帖子
本帖最後由 t8899 於 2015-3-6 14:28 編輯
回復  t8899

程式跑的比IE下載資料速度快,只好等它一下
GBKEE 發表於 2015-3-6 14:06


謝謝指導!
這行不是解決這種問題??  Do While .Busy Or .readyState <> 4: DoEvents

TOP

t8899

帖子
746 
主題
243 
精華
0 
積分
1002 
點名
0  
作業系統
WINXP 
軟體版本
OFFICE2003 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2024-5-5 
5#
發表於 2015-3-7 07:29 | 顯示全部帖子
本帖最後由 t8899 於 2015-3-7 07:31 編輯
回復  t8899

程式跑的比IE下載資料速度快,只好等它一下
GBKEE 發表於 2015-3-6 14:06

我剛發現
Application.Wait Time + #12:00:01 AM#
應該加在   If InStr(.Document.BODY.innerText, "查無資料") Then  的前面 才對?

TOP

        靜思自在 : 地上種了菜，就不易長草；心中有善，就不易生惡。
返回列表 上一主題