返回列表 上一主題 發帖

抓網頁到工作表,有欄位抓不到?

抓不到最右邊“詳細資料”的欄位 ??
sub abc12()
   Dim A As Object, E As Object
    With Create ...
t8899 發表於 2021-3-18 07:05


詳細資料中的html內容:
document.fm_t05sr01_1.SEQ_NO.value='1';document.fm_t05sr01_1.SPOKE_TIME.value='130602';document.fm_t05sr01_1.SPOKE_DATE.value='20210318';document.fm_t05sr01_1.COMPANY_ID.value='1583';document.fm_t05sr01_1.skey.value='1583202103181';openWindow(this.form ,'');

網頁連結
https://mops.twse.com.tw/mops/web/ajax_t05sr01_1?encodeURIComponent=1&TYPEK=all&step=1&skey=1583202103181&hhc_co_name=&firstin=true&COMPANY_ID=1583&COMPANY_NAME=&SPOKE_DATE=20210318&SPOKE_TIME=130602&SEQ_NO=1


  • 先找到https://mops.twse.com.tw/mops/web/t05sr01_1中網頁語法相關元素
  • 再比對上法所需關鍵字代入
  • 輸入正確網址
  • excel 簡單錄製即可下載


TOP

        靜思自在 : 做好事不能少我一人,做壞事不能多我一人。
返回列表 上一主題