• 2014.12.11
• 未分類
• UWSからUWSを呼び出すにはCALL はコメントを受け付けていません

UWSからUWSを呼び出すにはCALL

uwsからuwsを呼び出す場合にはCALLを使います

 

IE = CREATEOLEOBJ("InternetExplorer.Application")
IE.visible = true
IE.navigate("https://wlan.m-zone.jp/wlan/portal.jsp")
 
REPEAT
 SLEEP(0.1)
UNTIL !IE.busy AND IE.readystate = 4

ifb IE.document.URL = "http://portal.m-zone.jp/" then
	//現在ログアウト画面と判定。ということは現在はログイン中
else
	//ログイン中ではないので、ログイン画面を出ている。ログインをする
	call docomo-wifi-autologin.uws
endif

ie.quit

7行目までは　http://uwsc.36nyan.com/iesetdata/　と同じ

9行目：https://wlan.m-zone.jp/wlan/portal.jsp　を開いたのに、http://portal.m-zone.jp/　が表示されているという事は、ログイン中。　何もしない

12行目：ログイン中ではないということは、ログイン画面が出ているはず。

13行目：ログイン操作。http://uwsc.36nyan.com/iesetdata/　をCALLで呼び出す

16行目：IEを閉じる