【マクロ】 UWSC Pa ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このスレッドのURL
■項目テキスト
58:50 07/05/06 23:12:59 LdZaxQzq0 >>55 続き。 CODES = "" FOR KAISU = 1 TO 25 START = POS("arrow_up.gif", GETSTR(0), KAISU) IF START = 0 THEN BREAK // 以下>>52の処理… CODETEMP = COPY(GETSTR(0), START, 200) // 矢印位置から200文字を切り出し(矢印込) SLEEP(1) CODESTART = POS("s=", CODETEMP, 0) + 2 // その中からコード部分を検索(先頭オフセット2文字) IF CODESTART = 2 THEN BREAK CODEEND = 4 CODE = COPY(CODETEMP, CODESTART, CODEEND) // 株式コードを切り出し CODES = CODES + CODE + "," // コード列作成。コンマが多いけど動いてるから…OK! FUKIDASI("CODES=" + CODES + "<#CR>" + CODETEMP, 10, 10, 0, 18) NEXT // PRINT CODES IE = CREATEOLEOBJ("InternetExplorer.Application") // IE起動開始 --- IE.visible = True IE.navigate("http://quote.yahoo.co.jp/q?s=" + CODES) // 上矢印以外が混ざってるのは情報鮮度の為カナ
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック!
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4840日前に更新/259 KB
担当:undef