posta meb .k12.tr bağlanma

[chakistes]

Merhaba arkadaşlar

posta meb.k12.tr sitesine kullanıcı adı ve şifre yazıyorum fakat giriş işlemini yapamadım.
Kullandığım kodlar
Set evn = CreateObject("internetexplorer.application")
With evn
evn.Visible = True
.navigate "posta.meb.k12.tr/webmail/index2.php"
Do While .busy: DoEvents: Loop
Do While .readystate <> 4: DoEvents: Loop
With .Document.All
.UserName.Value =xxxxxxxx
.userPass.Value = xxxxxxxx
Application.OnKey "{ENTER}"

End With
End With

 

[turist]

UserName yazan yeri username
olarak (küçük harflerle) değiştirip deneyin.

 

[chakistes]

kullanıcı adı ve şifre doğru yerleşiyor fakat giriş tuşunu yapamadım
msg=document.getElementById('msg');
veya
<input type="image" name="imageField" src="custom/images/giris.png" onclick="submitLoginForm();return false;">

giriş yapmak için uyarlayamadım

 

[turist]

Application.OnKey "{ENTER}"
Satırını silin.
onun yerine aşağıdaki kodları yazıp deneyin

Application.Wait (Now() + TimeValue("00:00:01"))
SendKeys "{TAB}"
Application.Wait (Now() + TimeValue("00:00:01"))
SendKeys "{ENTER}"

 

[chakistes]

teşekkür ederim

 

[turist]

Sağolun.

 

[halit3]

bunu dene

evn.Document.forms(0).submit