route127の日記: ahkとcurlでedge操作
普段の仕事で使うページを開くのに使おうと、こないだperlで練習したcurlでのedge操作をahkで書き直した。
perlではバッククォートとしていた所をahkで書くに当たって、Runで実行したコマンドの標準出力を受け取る為にWScript.Shellを立ててその中でコマンド実行しようかとも思ったが、それも煩わしくて(ちゃんと書けるか自信もなくて)curlから一時ファイル(temp_edge.txt)に出力させて読み込む様にしたがなんか無駄な感じはする。
今見返したらポート番号とか一時ファイルとか色々ベタ書きなのもあるけど動作ディレクトリ(A_WorkingDir、今回はC:\fugafuga)を指定していないのが結構ダメな気がしてきたけど3秒後に保存ボタン押す。
Run, C:\hogehoge\msedgedriver.exe,,, pid
Sleep 5000
RunWait, curl -sS localhost:9515/session -d "{""capabilities"":{}}" -o temp_edge.txt
FileRead, inputfile, C:\fugafuga\temp_edge.txt
;MsgBox, %inputfile%
RegExMatch(inputfile, "sessionId...([0-9a-f]+)", session)
;MsgBox, % session1
url = http://funyafunya.aspx
RunWait, curl -sS localhost:9515/session/%session1%/url -d "{""url"":""%url%""}"
Sleep 5000
WinActive("funyafunya")
;WinMaximize, A
Sleep 2000
Click, Left, 100, 100
Sleep 2000
Send, 100000
Click, Left, 200, 300
Process, Close, %pid%
ahkとcurlでedge操作 More ログイン