久しぶりに、コンピュータ関係のネタを。でもやっぱり携帯がらみなんだな。
携帯の契約数が多くなると、各社のwebサイトでログインして料金明細・オプション契約を見たりするのが面倒になりませんか？
そこで、自動化してみました。
単品で、MydocomoだけだけどIE9+Windows7の環境で上手くいったのでレポート。
やり方
１．まずはUWSCというツールをダウンロードしてください。
ググれば一発で出ますが、ものぐさ太郎に；http://www.uwsc.info/
フリー版でよろしいです。
２．次に、メモ帳を開いて次のソースをコピーペーストしてください。
MDCM_UIMと、MDCM_PWDに書かれている＊は、自分の持っているドコモIDとパスワードをテキストでベタ書きしてください。セキュリティとかは一切考慮していません。
できたら、UWSCをダウンロードして展開したフォルダに、dcm_al.uwsとでも名前を付けて保存してください。
(ソースここから)
// https://www.mydocomo.com/dcm/dfw/web/pub2/r/sys/icewall/authlogin_top.html
// docomo id auto logon
//Special Thanks to http://excel20080504.web.fc2.com/uwsc/U5.htm
// インターネットエクスプローラを起動（コピーペイストで利用）
IE = CREATEOLEOBJ("InternetExplorer.Application")
IE.visible = True
IE.navigate("https://www.mydocomo.com/dcm/dfw/web/pub2/r/sys/icewall/authlogin_top.html")
IE.visible = True
REPEAT
SLEEP(0.1)
UNTIL !IE.busy AND IE.readystate=4
IE.document.forms[0].MDCM_UID.value = "090********"
IE.document.forms[0].MDCM_PWD.value = "***********"
SLEEP(0.05)
id = GETID("「My docomo」「docomo Online Shop」ログイン | My docomo（マイドコモ） | NTTドコ
モ – Internet Explorer, optimized for Bing and MSN", "IEFrame", -1)
//clkitem(ID,"ログイン",CLK_ACC)
CTRLWIN(id, MAX)
CLKITEM(id, "閉じる", CLK_ACC)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_TAB,DOWN,50)
SLEEP(0.05)
KBD(VK_ENTER,DOWN,5)
(ソースここまで）
３．UWSCを起動して一番左のボタン(読み込み(L))をクリック。
４．ファイルダイアログからdcm_al.uwsを選択。
５．真ん中の(再生(P)）ボタンをクリック。
ほどなくして、テキストにべた打ちしたdocomoidでMyDocomoにログインした状態になると思います。
これを応用して、IEのタブを増やしつつ、違うドコモIDでログインし、というのを繰り返せば、たぶん1分弱でお手持ちの回線分自動ログインできるはず。
au版とsoftbank版も作成予定。（自分のために）
環境 Windows7pro64bit IE9.0.8112.16421
追記
うーん Mydocomoはログイン状態を保持するので2枚目の窓をあけたら最初のIDでログインされた状態になってしまってる。これは困るなあ・・