プロが教えるわが家の防犯対策術!

wshを用いて
ホームページのリンク先に行く方法がわかりません

図書館の自動ログインソースを作りたいのですが
図書館のトップhttps://www.lib.city.hino.tokyo.jp/licsxp-opac/W …
には行けたのですが
その先のログイン画面には入れません

var IE = WScript.CreateObject("InternetExplorer.Application");
IE.Visible = true;
IE.Navigate("https://www.lib.city.hino.tokyo.jp/licsxp-opac/W …
IE.Navigate("https://www.lib.city.hino.tokyo.jp/licsxp-opac/O …

のようなソースを作ったのですが、エラーが出てしまいます。
ホームのソースに「<a href='#' onclick ="javascript:login()" tabindex="123" >」という文があり
そこがポイントだと思うのですがわかりません。

ログインする方法・ソースを教えてください。

A 回答 (1件)

この手の仕組みはよく使いますね。

(なにせめんどくさがりやなもんで)

ログインの手順を追いかければよいでしょう。
ページが表示されるまえに次の処理にはいれないので、
ページの読み込み中にスリープをいれなくてはなりません。

login.vbs
'ここから
'以下の3行をかきかえれば各個人用になります。
USER="test-user"
PASSWD="test-pass"
URL="h"+"ttps://w"+"ww.lib.city.hino.tokyo.jp/licsxp-opac/OpacInitLoginAction.do?subSystemFlag=0"
'掲示板の関係で、URL表示制限があるのでわけてあります。
'もちろんつないでかいても動きます。

Set WSHShell=Wscript.CreateObject("Wscript.Shell")
set oIE=Wscript.CreateObject("InternetExplorer.application")
oIE.navigate2(URL)
oIE.visible=true

Do Until oIE.Busy = False
WScript.sleep(250)
Loop

set f=oIE.document.forms(0)
if(f IS Nothing) then
msgbox ("エラーです")
oIE.quit()
exit sub
end if

f.username.value=USER
f.j_password.value=PASSWD
WshShell.SendKeys "{ENTER}{ENTER}"

'ここまで

ログイン後になにか処理があるならつづけてかいていけば
オートパイロットになります。

この回答への補足

回答ありがとうございました。
すみません、質問の方法が悪かったです。

URLを指定してもそのページに飛ばす、ホームのページに行ってしまうのでホームからログイン画面があるページに入ろうかと考えたのです。
しかし、ホームからログインがあるページに移動する方法が分からないのですがわかりますでしょうか?

補足日時:2008/02/07 10:48
    • good
    • 0
この回答へのお礼

ありがとうございます。
自己解決しました

お礼日時:2008/02/07 12:07

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!