返回列表 上一主題 發帖

[發問] 網頁下載疑問

reangame

帖子
66 
主題
16 
精華
0 
積分
99 
點名
0  
作業系統
Win7 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
註冊時間
2012-8-12 
最後登錄
2023-10-26 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2021-3-28 16:32 | 只看該作者

[發問] 網頁下載疑問



請問各位大大：
想以VBA自動下載這網站的資料：Goodinfo
但遇到2個困難點，
一、要挑選圖片紅1位置的排名範圍，才會產生對應的下載內容(圖片紅2)，須逐一下載
二、檢視原始碼也找不到下載連結路徑

想法：自動下載排名範圍內所有資料(現有7個範圍)，並將7個範圍的資料依序貼到新的工作表。

請大大們協助指導一下，不需要全部程式碼，主要是2個困難點的程式碼完全沒有想法該怎麼寫，麻煩各位大大指教了！
收藏 分享
我是斯多

reangame

帖子
66 
主題
16 
精華
0 
積分
99 
點名
0  
作業系統
Win7 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
註冊時間
2012-8-12 
最後登錄
2023-10-26 
3#
發表於 2021-3-31 18:12 | 只看該作者
回復 2# quickfixer


   好的，非常感謝您提供的資訊！
我是斯多

TOP

quickfixer

帖子
154 
主題
1 
精華
0 
積分
200 
點名
1  
作業系統
windwos 7 
軟體版本
64bit 
閱讀權限
20 
註冊時間
2017-5-29 
最後登錄
2025-1-1 
2#
發表於 2021-3-28 18:56 | 只看該作者
本帖最後由 quickfixer 於 2021-3-28 19:05 編輯

回復 1# reangame


    01那邊s大,去年有寫過全部的程式碼點我點我#828那個就是了
可惜goodinfo不是會員就不能一次下載全部,速度慢,還要分好幾頁,還有流量限制

我用fiddler找到正確網址,取代程式碼中的網址,還以為要改很多程式碼,沒想到什麼都不用改就成功下載了
    Url = "https://goodinfo.tw/StockInfo/StockList.asp?RPT_TIME=&MARKET_CAT=熱門排行&INDUSTRY_CAT=合計殖利率 (最新年度)@@合計殖利率@@最新年度"
    Url_a = "https://goodinfo.tw/StockInfo/StockList.asp?SEARCH_WORD=&SHEET=股利政策發放年度&SHEET2=股利分配資料 (以最後成交價統計)&MARKET_CAT=熱門排行&INDUSTRY_CAT=合計殖利率 (最新年度)@@合計殖利率@@最新年度&STOCK_CODE=&RPT_TIME=最新資料&STEP=DATA&RANK="

TOP

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