- 帖子
- 83
- 主題
- 17
- 精華
- 0
- 積分
- 105
- 點名
- 0
- 作業系統
- XP
- 軟體版本
- XP
- 閱讀權限
- 20
- 註冊時間
- 2010-12-28
- 最後登錄
- 2018-8-8
|
本帖最後由 小俠客 於 2013-6-13 13:56 編輯
現在我用Set objIE = CreateObject("InternetExplorer.Application")
的方法到此網站查詢資料:
http://www.hkexnews.hk/listedco/listconews/advancedsearch/search_active_main_c.aspx
然後收集網頁中的「發放時間」、「代號」、「股份名稱」的資料。我在它的原始檔中找到那表格的html碼- <table cellspacing="0" cellpadding="5" align="Left" border="0" id="ctl00_gvMain" style="width:100%;border-collapse:collapse;">
- <tr align="right" style="color:Black;background-color:White;">
- <td colspan="4">
- <table width="100%">
- <tr>
- <td align="left" valign="bottom"><span id="ctl00_gvMain_ctl01_lbPageCount" class="arial11black">顯示第 1 至 20 紀錄 (共有 8554 紀錄)</span>
-
- </td>
- <td align="right">
-
- <input type="image" name="ctl00$gvMain$ctl01$btnNext" id="ctl00_gvMain_ctl01_btnNext" src="/image/next_c.gif" style="border-width:0px;" />
- </td>
- </tr>
- </table>
- </td>
- </tr><tr class="headerStyle">
- <th scope="col">發放時間</th><th scope="col">代號</th><th scope="col">股份名稱</th><th scope="col">文件</th>
- </tr><tr style="color:Black;background-color:#E4EAF3;">
- <td align="left" valign="top">
- <span id="ctl00_gvMain_ctl03_lbDateTime">13/06/2013<br>13:26</span>
- </td><td align="left" valign="top" style="white-space:nowrap;">
- <span id="ctl00_gvMain_ctl03_lbStockCode">01230</span>
- </td><td align="left" valign="top" style="white-space:nowrap;">
- <span id="ctl00_gvMain_ctl03_lbStockName">雅士利國際</span>
- </td><td align="left" valign="top">
- <span id="ctl00_gvMain_ctl03_lbShortText">公告及通告 - [停牌]<br></span>
- <a id="ctl00_gvMain_ctl03_hlTitle" class="news" href="/listedco/listconews/SEHK/2013/0613/LTN20130613506_C.HTM" target="_blank">交易所通告 - 停牌</a>
-
- <span id="ctl00_gvMain_ctl03_lbFileInfo">(1KB, HTM)</span>
- </td>
- </tr><tr style="color:Black;background-color:White;">
- <td align="left" valign="top">
- <span id="ctl00_gvMain_ctl04_lbDateTime">13/06/2013<br>13:00</span>
- </td><td align="left" valign="top" style="white-space:nowrap;">
- <span id="ctl00_gvMain_ctl04_lbStockCode">02319</span>
- </td><td align="left" valign="top" style="white-space:nowrap;">
- <span id="ctl00_gvMain_ctl04_lbStockName">蒙牛乳業</span>
- </td><td align="left" valign="top">
- <span id="ctl00_gvMain_ctl04_lbShortText">公告及通告 - [短暫停牌]<br></span>
- <a id="ctl00_gvMain_ctl04_hlTitle" class="news" href="/listedco/listconews/SEHK/2013/0613/LTN20130613502_C.HTM" target="_blank">交易所通告 - 短暫停牌</a>
複製代碼 例如:第20、22、24行當中有我需要的資料:「13/06/2013 13:26」、「01230」、「雅士利國際」
可是我不懂怎樣把那些資料抽出,希望大家可以指教指教,謝謝大家 |
|