Login em site Botão sem id ou name

[Moises]

Olá a todos.

Estou seguindo o tutorial do site e tentando acessar a seguinte página da internet para fazer login http://www.erepublik.com

Consigo colocar os dados do user e da senha mas não consigo enviar o formulário.

Segue código do formulário:

Código: Selecionar todos

<div id="signin">
			<form method="post" action="/br/login" id="login_form">
			<input type="hidden" id="_token" name="_token" value="e8fa6b9d83730165b9d1ad64e2a7bedb">
			<div class="visible_form">
				<p>
					<label for="citizen_email">E-mail</label>
					<input type="text" id="citizen_email" name="citizen_email" value="" />
				</p>
				<p>
					<label for="citizen_password">Senha</label>
					<input type="password" id="citizen_password" name="citizen_password" />
				</p>
				<p>
					<button type="submit">
						Acessar					</button>
				</p>
				<img src="//www.erepublik.net/images/modules/homepage/separator.png" alt="" width="2" height="22" class="separator" />
				<a href="javascript:;" class="facebook_signin button" title="Acessar através do Facebook">
					<img src="//www.erepublik.net/images/modules/homepage/fb_small.png" alt="" />
					Acessar através do Facebook				</a>

				<img src="//www.erepublik.net/images/modules/homepage/separator.png" alt="" width="2" height="22" class="separator" />

				<a id="change_lang" href="#" class="closed" title="Português brasileiro">
					<span><img src="//www.erepublik.net/images/flags_png/S/Brazil.png" alt="" width="16" height="16" /></span>
					<q>BR</q>
				</a>



			</div>

Meu código utilizado

Código: Selecionar todos

Sub AcessaPagina()
    Dim ie As Object
    Set ie = CreateObject("InternetExplorer.Application")
    ie.Navigate "http://www.erepublik.com"
    
    ie.Visible = True
    While ie.Busy
    
    Wend
    
    ie.Document.getElementsByName("citizen_email").Item.InnerText = "login"
    ie.Document.getElementsByName("citizen_password").Item.InnerText = "senha"
    
    
    
End Sub