イーサン
岡三RSSを自動でログアウト・終了・起動・ログインする方法が知りたいです。
岡三RSSを自動でログアウト・終了する方法が知りたいです。
いつもお世話になっております。
Excel+VBAの環境でRANKING関数やQUOTE関数を使って
銘柄情報を取得するプログラムを作っています。
起動してから数分間は情報が返ってくるのですが、その後
しばらくすると岡三RSSから情報が返ってこなくなります。
掲示板を色々と調べてみたところ、下記の状況と同じようです。
-----------------------------------------------------------
https://bbs.okasan-online.co.jp/ont/rss/board/?topic_id=93
-----------------------------------------------------------
(概略)情報を500件取得したあとは、ブックを閉じてログアウト
する。その後、1分ほど待ってから、再度ログインする）
解決策としては、「UWSCやタスクスケジューラを使う」とあるのですが、岡三RSSの
1.ログアウト
2.終了
3.起動
4.ログイン(このとき、ユーザIDとパスワードが入っていない場合は自動で入れる)
は、具体的にはどのようにすればできるのでしょうか？
一部でもよいので、サンプルがあればご提供いただけると
ありがたいです。
UWSC、タスクスケジューラ、VBAのいずれでも結構です。
なお、岡三RSSをVBAから終了・起動する方法は分かっています。
（shell関数でcmd,taskkillを使っています）
岡三RSSのログアウトとログインの方法がわからなくて困っています。
おいそがしい中すみませんが、何卒よろしくお願いいたします。
2019年08月27日
大野 了
イーサンさん、こんばんは
VBAを使用されていて、現在岡三RSSの終了と起動をされているのであれば、
そのままVBAを使用されて岡三RSSを再起動かけるのが、
もっとも簡単ではないかと思いました。
ログインは、岡三RSSの設定で
『パスワードを保存する(自動ログイン)』にチェックを入れると
岡三RSSが起動した際に、自動でログインがされます。
ログアウトは、もし気持ち悪いとかなければ、
taskkillで強制的に落とす形でもよいのではないかと思います。
もし、どうしてもログアウトされたいのであれば、
UWSCでスクリプトを組むのではなく『記録』でマウス操作を覚えさせ、
それでログアウトさせる方法はいかがでしょうか？
一応、スクリプトでできないかやってみたのですが、
UWSCでタスクバーの岡三RSSのハンドルが上手い事取れなかったので、
だいぶん複雑になってしまうかと思います。
ですので・・・
1．終了(taskkill)
2．起動(cmd)
3．自動でログインされる
という流れはいかがでしょうかー？
2019年08月28日
イーサン
大野さん
お世話になっております。
いつも丁寧な回答をありがとうございます！
>ログインは、岡三RSSの設定で
>『パスワードを保存する(自動ログイン)』にチェックを入れると
>岡三RSSが起動した際に、自動でログインがされます。
自動ログインにはチェックを入れているのですが、VBAから
岡三RSSの停止・起動を繰り返しているといつの間にか
チェックが消えてしまうことがあります(?)
もしかしたら私の設定ミスか見間違いかもしれないので、
もう少し様子を見てみます。
>UWSCでスクリプトを組むのではなく『記録』でマウス操作を覚>えさせ、
>それでログアウトさせる方法はいかがでしょうか？
この『記録』とはExcelの『マクロの記録』の事でしょうか？
Excelのマクロの記録は岡三RSSのログアウトにも使えるという事でしょうか？
また、追加の質問ですみませんが、
-----------------------------------------------------------
https://bbs.okasan-online.co.jp/ont/rss/board/?topic_id=93
-----------------------------------------------------------
(概略)情報を500件取得したあとは、ブックを閉じてログアウト
する。その後、1分ほど待ってから、再度ログインする）
の流れで、ブックを閉じるときは、ブックだけでなくExcel自体も
終了する必要があるのでしょうか？
たくさんの質問ですみませんがよろしくお願いいたします。
2019年08月28日
大野 了
イーサンさん、こんにちは！！
>自動ログインにはチェックを入れているのですが、VBAから
>岡三RSSの停止・起動を繰り返しているといつの間にか
>チェックが消えてしまうことがあります(?)
そうなんですね・・・
ちなみに手動でログアウトすると、なぜかチェックが外れてしまいますw
もしかしたら同じような現象なのかもですね・・・
もし、パスワードだけが抜けてしまうような場合であれば・・・
UWSCで以下のようなスクリプトを書いてあげることにより、
パスワードのテキストにパスワードを入れて、ログインすることができます
===============================
WindowHandle = GETID("ログイン","HwndWrapper")
SENDSTR(WindowHandle,"password",2, true)
SCKEY(WindowHandle,VK_RETURN)
===============================
>この『記録』とはExcelの『マクロの記録』の事でしょうか？
>Excelのマクロの記録は岡三RSSのログアウトにも使えるという事でしょうか？
いえ、こちらはUWSCに『記録』という機能がありまして、
Excelの『マクロの記録』と同じように、マウスの起動などを覚えて
スクリプトに落としてくれる機能になります。
UWSCがタスクバーのWindowIDをとれないためログアウトするためのマウス操作を
覚えさせてログアウトさせてあげる必要がありまーす！！
(もしかしたら何かあるのかもしれないですが、UWSCのプロではないので・・・)
>(概略)情報を500件取得したあとは、ブックを閉じてログアウト
>する。その後、1分ほど待ってから、再度ログインする）
>の流れで、ブックを閉じるときは、ブックだけでなくExcel自体も
>終了する必要があるのでしょうか？
こちらは、すべてのブックを落として1分以上か
Excelを落として1分以上かになります。
なので、すべてのブックを落としている状態であればExcelが起動しっぱなしでも大丈夫です！！
回答に漏れがないことを祈って・・・w
2019年08月28日
イーサン
大野さん、こんにちは！
チェックが外れてしまう件については、教えていただいた方法で
試してみます。
マウス操作の記録についても、UWSCで試してみます。
また、すべてのブックを落とす必要があることは知りませんでしたので助かりました！
いつも親切丁寧な回答をありがとうございます！
2019年08月29日
大野 了
今までの経験が少しでも、お役に立てたら幸いです！！
うまくいくことを祈りまーす！！
2019年09月01日
イーサン
大野さん
お世話になっております
--------------------------------------------------------
もし、パスワードだけが抜けてしまうような場合であれば・・・
UWSCで以下のようなスクリプトを書いてあげることにより、
パスワードのテキストにパスワードを入れて、ログインすることができます
===============================
WindowHandle = GETID("ログイン","HwndWrapper")
SENDSTR(WindowHandle,"password",2, true)
SCKEY(WindowHandle,VK_RETURN)
===============================
--------------------------------------------------------
私の環境では、
1.ログインID [テキストボックス]
2.ログインID保存 [チェックボックス]
3.パスワード [テキストボックス]
4.パスワード保存(自動ログイン) [チェックボックス]
5.インサイダー関連同意 [チェックボックス]
がすべて未入力の状態になってしまうのですが、その場合は、どのように指定すればよいのでしょうか？
すみませんです。よろしくお願いいたします。
2019年09月04日
RSSユーザー
こんにちは。
UWSCでスクリプトを組んでいろいろと
やってみたところ、1から3まではできたの
ですが、4と5はアイテム名の設定がうまくいかずできませんでした。。。
仕方がないので、.NET Framework等のライブラリ
を使ってウインドウを操作することで実現したいと
思います！
2019年09月08日
大野 了
イーサンさん、こんばんは！！
返信がだいぶ遅くなってすみません。
パスワードだけじゃなくてすべてが空白になってしまうんですね・・・
でしたら以下のようなスクリプトはいかがでしょうかー？
================================
WindowHandle = GETID("ログイン","HwndWrapper")
SENDSTR(WindowHandle,"ユーザID",1, true)
SCKEY(WindowHandle,VK_TAB)
SCKEY(WindowHandle,VK_SPACE)
SENDSTR(WindowHandle,"password",2, true)
SCKEY(WindowHandle,VK_TAB)
SCKEY(WindowHandle,VK_SPACE)
SCKEY(WindowHandle,VK_TAB)
SCKEY(WindowHandle,VK_SPACE)
SCKEY(WindowHandle,VK_RETURN)
================================
多分これで、すべてチェックして起動してくると思います！！
2019年09月08日
イーサン
大野さん、こんにちは。
ありがとうございます！これでできました。
どうもありがとうございました！
2019年09月09日
大野 了
イーサンさん、うまくいきましたかー
よかったです！！
お役に立てて幸いです！！
2019年09月09日