質問: ### 前提 緊急です。 下記のような定型処理があります。 1. IEで、あるサイトにログイン。 2. テキストボックスに検索条件を入力し、`エンター(1)`。※ダウンロード可能なファイル一覧が表示 3. 1件目のファイルを選択、ダウンロードボタンを押下。 4. ダウンロード通知バーより、「名前を付けて保存」を`クリック(2)`。 これをUWSCにて自動化・スケジュール登録し、運用しているのですが、 実行端末(Win7)にリモートデスクトップで接続していないと動作しません。 ### 実現したいこと 実行端末(Win7)の電源を入れた後、一度だけリモートデスクトップにてログインを済ませたら、 二度とリモートデスクトップで接続しなくても、きちんと動作するようにしたいです。 ### 発生している問題 前提にある、`エンター(1)`と`クリック(2)`の部分が主な原因と考えております。 * まず`エンター(1)`ですが、検索ボタンがある訳ではなく本当にエンターキーを入力しないといけません。これを`KBD(VL_RETURN)`で実装しているのですが、非ログイン時には上手くエンターキーが送信されず、動作しません。 * 続いて`クリック(2)`ですが、IE9以降、ファイルダウンロード時に出現するようになったダウンロード通知バーをクリックせねばならず、`BTN(LEFT,CLICK,782,300,100)`のように座標指定でクリックするという実装ですが同じく非ログイン時にはクリックされず、ダウンロードできません。 ### その他 UWSCじゃなくても、Win7上で動作するものであれば何でも構いません。何でもいいのでみなさんの知恵をお貸しください。宜しくお願いします。
回答: wshを使用して自動スクリプトを作成してみては? ``` 'IE待ち Sub IEWait(IEObj) Do While IEObj.Busy = True Or IEObj.readystate <> 4 WScript.Sleep 100 Loop WScript.Sleep 1000 End Sub Set IE_APP = CreateObject("InternetExplorer.Application") With IE_APP .Navigate "https://www.google.co.jp/" .Visible = True End With '表示待機 Call IEWait(IE_APP) IE_APP.Document.forms("tsf").item("q").value = "検索文字列" '検索文字列を入力すると画面が切り替わる為待機 Call IEWait(IE_APP) '検索クリック IE_APP.Document.forms("tsf").item("btnK").Click Call IEWait(IE_APP) ```