|
// マーケットスピードの起動
Exec("C:\Program Files\MarketSpeed\MarketSpeed\MarketSpeed.exe")
sleep(1)
// マーケットスピードの位置を指定
ACW(GETID("MARKET SPEED VER","MDIFrame"),85,107,800,600,0)
sleep(1)
// ログインをクリック
BTN(LEFT,CLICK,835,145,313)
sleep(1)
ID=getid("Market Speed - ログイン","#32770",0.1)
sendstr(ID,"ログインID",1,true) // ログインIDを入力
sendstr(ID,"パスワード",2,true) // ログインパスワードを入力
clkitem(ID,"OK",clk_btn or clk_short,true,1) // OKボタン
sleep(1)
// RSS起動
Exec("C:\Program Files\MarketSpeed\MarketSpeed\RSS.exe")
sleep(10)
// Excelの起動
Excel = CreateOLEObj("Excel.Application")
Excel.Visible = True
sleep(1)
// SMIS-RDATA Open
Excel.WorkBooks.Open(FileName :="d:\user\SMIS-R\SMIS-RDATA.xls", updatelinks := True, readOnly :=False) ※ここは改行しないで1行で記述
sleep(1)
// マクロスタート
Excel.Run("kansi")
|
|
|