HPからデータをdownloadするマクロ - 秀丸エディタ関連ソフト会議室 - スレッド25226, 2008/08/02

HPからデータをdownloadするマクロ

emc827 さん　08/08/02 06:55

hm v7.07, winxp he sp3
現在、手作業で、HPからデータを取り込んでいます。
これをマクロでできますでしょうか？
http://www.stockboard.jp/flash/data/sel552.dat

データを取り込んだ後の、処理マクロです。
最初の4行は、手作業で、削除しています。
この手作業もマクロで処理したいのです。

replaceallfast "^(.*?),([0-9][0-9][0-9][0-9]),(.*?),.*" , "\\2,\\3", regular;

よろしくお願いします。

RE:25226 HPからデータをdownloadするマク

三月さん　08/08/02 08:18

>hm v7.07, winxp he sp3
>現在、手作業で、HPからデータを取り込んでいます。
>これをマクロでできますでしょうか？
>http://www.stockboard.jp/flash/data/sel552.dat
>
>データを取り込んだ後の、処理マクロです。
>最初の4行は、手作業で、削除しています。
>この手作業もマクロで処理したいのです。
>
Hidemarnet Explorerが導入してあれば、以下の感じで。
--
$file = "sel552.dat";
// ファイル名が変わる場合はinput関数で
// $file = input( "ファイル名を指定", $file );
$url = "http://www.stockboard.jp/flash/data/" + $file;
$local = "C:\\tmp\\" + $file;

// Hidemarnet Explorerで開く
openfile "http://www.stockboard.jp/flash/data/sel552.dat";

// Hidemarnet Explorerで開いただけだと編集できないのでローカルに保存
saveas "C:\\tmp\\sel552.dat";

// なぜか読み取り専用になるので開きなおす
loadfile "C:\\tmp\\sel552.dat";

// 4行分削除
deleteline;
deleteline;
deleteline;
deleteline;

// 保存
save;

RE:25227 HPからデータをdownloadするマク

三月さん　08/08/02 08:20

訂正
--
$file = "sel552.dat";
// ファイル名が変わる場合はinput関数で
// $file = input( "ファイル名を指定", $file );
$url = "http://www.stockboard.jp/flash/data/" + $file;
$local = "C:\\tmp\\" + $file;

// Hidemarnet Explorerで開く
openfile $url;

// Hidemarnet Explorerで開いただけだと編集できないのでローカルに保存
saveas $local;

// なぜか読み取り専用になるので開きなおす
loadfile $local;

// 4行分削除
deleteline;
deleteline;
deleteline;
deleteline;

// 保存
save;

RE:25228 希望通りできました

emc827 さん　08/08/02 08:50

HM Explorer v4.02, HMv7.07 winxp he sp3
552.dat以外にも沢山あります。
これで楽になりました。
ありがとう御座いました。

RE:25229 追加願い

emc827 さん　08/08/02 18:14

早速使用させて頂いています。
追加願いです。

1.信用取引規制銘柄一覧
http://member.rakuten-sec.co.jp/ITS/Companyfile/margin_restriction.html#9000

2.貸借取引対象銘柄および代用有価証券適格銘柄一覧
銘柄一覧表(08/08/01)
http://www.jsf.co.jp/de/view.php?id=179&category=11
http://www.jsf.co.jp/user-image/1217550952.xls

1217550952.xls　この場合、毎日番号が替わります。

PS:　
上記２つ　現在、excelマクロで処理しています。

よろしくお願いします。

RE:25230 追加願い

秀丸担当 さん　08/08/04 15:29

>1.信用取引規制銘柄一覧
>http://member.rakuten-sec.co.jp/ITS/Companyfile/margin_restriction.html#9000

これをどうすればいいのか不明ですが、４桁の番号と名前だけを残せばいいとい
うことでしょうか？
例えば以下のような感じでしょうか。

setcompatiblemode 0x200;
newfile;
disabledraw;
openfile "http://member.rakuten-sec.co.jp/ITS/Companyfile/margin_restriction.
html#9000";
//if( readonly ) readonlyswitch;
gofiletop;
setclipboard "";
while(1){
searchdown "([0-9][0-9][0-9][0-9])\\n *\\n(.+)\\n", regular;
if(result==false)break;
appendcopy;
}
closenew;
paste;
replaceallfast "([0-9][0-9][0-9][0-9])\\n *\\n(.+)\\n", "\\1,\\2\\n",regular;

>2.貸借取引対象銘柄および代用有価証券適格銘柄一覧
>銘柄一覧表(08/08/01)
>http://www.jsf.co.jp/de/view.php?id=179&category=11
>http://www.jsf.co.jp/user-image/1217550952.xls
>
>1217550952.xls　この場合、毎日番号が替わります。

xlsの場合、秀丸エディタだけでは、ダウンロードしてファイルに保存する作業
で手動の入力が必要になってきます。
また、xlsを直接扱うことはできないです。

別途、コマンドラインのツールでダウンロードするツール，xlsをcsvに変換する
ツールなどがあれば、それを利用してやることはできるかもしれません。
バッチファイルにしておくか、マクロの場合run文でできると思います。

RE:25239 秀丸のできる処とできない処を教

emc827 さん　08/08/04 16:48

1.信用取引規制銘柄一覧：
これが希望でした。ありがとう御座いました。
excelマクロでは、日々公表銘柄貸株注意喚起整理ポスト監理ポストの銘柄削除等、
約300stepのマクロを組んでいます。
No.25131秀丸さんの回答から、秀丸とexcel　得意分野を使い分けて使用したいと思
います。

2.貸借取引対象銘柄および代用有価証券適格銘柄一覧　銘柄一覧表(08/08/01)
xlsの場合、秀丸エディタだけでは、ダウンロードしてファイルに保存する作業で、
手動の入力が必要になってきます。また、xlsを直接扱うことはできないです。

了解しました。
これは、excelマクロの方が簡単にできることが分かりました。
excelマクロで一番難しかったのは、毎日替わる番号を認識する方法でした。

秀丸のできる処とできない処を教えて頂きありがとう御座いました。