臺灣證券即時交易資訊網頁的資料來源 |
|
|
|
ryanhsiao
一般會員   發表：4 回覆：8 積分：2 註冊：2009-11-17 發送簡訊給我 |
舊版的臺灣證券交易所的【基本市況報導網站】
(現在已經換新網頁了，但資料來源仍有效) 以前曾經想把它網頁的數據抓取下來， 然後自建個大型資料庫將所有股票都抓回來， 但卻在抓取的過程中,發現它用一些ｊａｖａ ｓｃｒｉｐｔ技術將網頁資料保護住， 所以沒有辦法直接簡單的判斷Html Tag來抓資料。 後來破解後，才發現原來它的資料來源只是簡單的一個網址，沒有保護， 如台泥的股票代碼是1101 那它的即時股價資訊的資料來源網址便是： http://mis.tse.com.tw/data/1101.csv 然後你再去切它的欄位順序就好，就這麼簡單。 與大家分享。 以下是它幾個欄位順序： [code cpp] NMHTTP1->Get("http://mis.tse.com.tw/data/1101.csv"); String source=NMHTTP1->Body; TStringList *list=new TStringList; list->CommaText=source; StockStruct *item=GetStockContent(list); [/code] StockStruct* GetStockContent(TStringList *list) { StockStruct *item=new StockStruct; try { item->StkNo=list->Strings[0]; item->UpDown=list->Strings[1].ToDouble(); item->DspTime=list->Strings[2]; //list->Strings[3];漲停 //list->Strings[4];跌停 item->OpenPrice=list->Strings[5].ToDouble(); item->HighPrice=list->Strings[6].ToDouble(); item->LowPrice=list->Strings[7].ToDouble(); item->MatchPrice=list->Strings[8].ToDouble(); item->MatchQty=list->Strings[9].ToDouble(); item->DQty=list->Strings[10].ToDouble(); item->BuyPrice1=list->Strings[11].ToDouble(); item->BuyQty1=list->Strings[12].ToDouble(); item->BuyPrice2=list->Strings[13].ToDouble(); item->BuyQty2=list->Strings[14].ToDouble(); item->BuyPrice3=list->Strings[15].ToDouble(); item->BuyQty3=list->Strings[16].ToDouble(); item->BuyPrice4=list->Strings[17].ToDouble(); item->BuyQty4=list->Strings[18].ToDouble(); item->BuyPrice5=list->Strings[19].ToDouble(); item->BuyQty5=list->Strings[20].ToDouble(); item->SellPrice1=list->Strings[21].ToDouble(); item->SellQty1=list->Strings[22].ToDouble(); item->SellPrice2=list->Strings[23].ToDouble(); item->SellQty2=list->Strings[24].ToDouble(); item->SellPrice3=list->Strings[25].ToDouble(); item->SellQty3=list->Strings[26].ToDouble(); item->SellPrice4=list->Strings[27].ToDouble(); item->SellQty4=list->Strings[28].ToDouble(); item->SellPrice5=list->Strings[29].ToDouble(); item->SellQty5=list->Strings[30].ToDouble(); item->StockNo_Name=list->Strings[36]; if ( item->MatchPrice > item->OpenPrice ){ item->sUpDownMark="↑"; }else if ( item->MatchPrice < item->OpenPrice ){ item->sUpDownMark="↓"; }else if ( item->MatchPrice == item->OpenPrice ){ item->sUpDownMark="-"; } item->sUpDownPercent=FloatToStrF(100*item->UpDown/item->OpenPrice,ffFixed,4,2) "%"; }catch(Exception &e){ cout << "[GetStockContent Process]" e.Message << endl; } return item; } |
|
ryanhsiao
一般會員 發表：4 回覆：8 積分：2 註冊：2009-11-17 發送簡訊給我 |
|
|
fusung
中階會員  發表：26 回覆：169 積分：99 註冊：2003-11-25 發送簡訊給我 |
|
|
GrandRURU
站務副站長 發表：240 回覆：1680 積分：1874 註冊：2005-06-21 發送簡訊給我 |
|
|
ANDY8C
資深會員  發表：114 回覆：582 積分：299 註冊：2006-10-29 發送簡訊給我 |
|
|
christie
資深會員 發表：30 回覆：299 積分：475 註冊：2005-03-25 發送簡訊給我 |
|
|
cashyy
高階會員 發表：117 回覆：322 積分：212 註冊：2004-04-30 發送簡訊給我 |
|
|
yachu721
初階會員 發表：51 回覆：98 積分：44 註冊：2003-07-13 發送簡訊給我 |
2325 代號 0
1 漲跌 1 14:30:00 時間 2 31.55 漲停 3 27.45 跌停 4 29.5 開盤 5 30.5 最高 6 29.35 最低 7 30.5 成交 8 26497 成交張數 9 2040 單量 10 30.45 買方1順位 11 19 買方1順位人數 12 30.4 買方2順位 13 13 買方2順位人數 14 30.3 買方3順位 15 13 買方3順位人數 16 30.25 買方4順位 17 203 買方4順位人數 18 30.2 買方5順位 19 24 買方5順位人數 20 30.5 賣方1順位 21 804 賣方1順位人數 22 30.55 賣方2順位 23 29 賣方2順位人數 24 30.6 賣方3順位 25 443 賣方3順位人數 26 30.65 賣方4順位 27 11 賣方4順位人數 28 30.7 賣方5順位 29 487 賣方5順位人數 30 0 31 1 32 24 33 1000 34 0 35 矽品 公司 36
編輯記錄
yachu721 重新編輯於 2011-10-01 09:12:18， 註解 無‧
|
|
cashyy
高階會員 發表：117 回覆：322 積分：212 註冊：2004-04-30 發送簡訊給我 |
|
|
jow
尊榮會員 發表：66 回覆：751 積分：1253 註冊：2002-03-13 發送簡訊給我 |
發表時間：2011-03-18 14:59:28
IP:61.219.xxx.xxx 訂閱
系統時間：2024-05-07 21:22:29
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |