mixi vbaでログインしたい
こんばんは。教えてください。
mixiへ自動ログインするコードを書いているのですが
ソースを見ても、”ログインボタンを押す”がわかりません。
ソースの一部は
*****************************************************************
<form action="/login.pl" method="post" name="login_form">
<input type="hidden" value="/home.pl" name="next_url" />
<ul class="loginForm">
<li class="inputForm">ログインメールアドレス<br />
<input tabindex="1" size="30" name="email" /></li>
<li class="inputForm">パスワード<br />
<input tabindex="2" type="password" name="password" /></li>
<li class="autoLogin"><input tabindex="3" type="checkbox" name="sticky" id="auto" /><label for="auto">次回から自動的にログイン</label></li>
</ul>
<p class="pwReminder"><a href="http://mixi.jp/remind_password.pl">※パスワードを忘れた方はこちら</a></p>
<p class="loginButton"><input tabindex="4" type="image" alt="ログイン" src="http://img.mixi.jp/img/basic/logout/btn_login001.gif" /></p>
<p class="sslLink01"><a href="https://mixi.jp/">SSL(https)はこちら</a></p>
</form>
*****************************************************************
です。
これを元に
Sub ログイン_mixi()
URL = "http://mixi.jp/home.pl"
Set objIE = CreateObject("InternetExplorer.application")
objIE.Visible = True
objIE.Navigate URL
objIE.document.Forms(0).item("email").Value = "○○○○○○"
objIE.document.Forms(0).item("password").Value = "○○○○"
objIE.document.all.sticky.Click
End Sub
まで出来たのですが、最後のログインボタンをクリックする方法がわかりません。
ログイン以外は、nameの部分を抜き取ればうまく行ったのですが
ログインだけはnameがないので、どうしていいのかわかりません。
ご教授よろしくお願い致します。
![その他([技術者向] コンピューター) イメージ](https://gazo.okwave.jp/okwave/images/related_qa/c205_3_thumbnail_img_sm.png)
お礼
早速やってみたら、無事にログインできるようになりました！ 本当にありがとうございました。