webdem Sms gönderme

[gulvadi]

Merhaba arkadaşlar
Gecen yıl bir Sms sayfasından sms gönderiyordum. Burası kapatıldı. Şimdi başka bir siteye üye oldum ve sms göndermek istiyorum fakat web sayfasında mesaj kutusunun "input name" si yok mesaj kutusunu nasıl mesaj ve numara aktarabilirim. yazmış olduğum kodlar şöyle

Dim URL As String
Dim IE As Object
 Set IE = CreateObject("InternetExplorer.Application")
     IE.Visible = True
     IE.navigate "http://www.dakikpanel.com/login.php"
With IE
Do Until IE.ReadyState = 4: DoEvents: Loop
Do While IE.Busy: DoEvents: Loop
Do Until IE.ReadyState = 4: DoEvents: Loop
With IE.document.all
.UserName.Value = "kullanıcı adı"
.Password.Value = "şifre"
.Submit.Click
Application.Wait (Now + TimeValue("0:00:5"))
Do Until IE.ReadyState = 4: DoEvents: Loop
     Application.Wait (Now + TimeValue("0:00:2"))
     IE.navigate "http://www.dakikpanel.com/Mesaj-Gonder/"
     Application.Wait (Now + TimeValue("0:00:5"))
     .mesaj.Value = Cells(1, 8).Value
     .ekleneceknumaralar.Value = Cells(1, 9).Value
IE.document.all("Submit").Click
Application.Wait (Now + TimeValue("0:00:5"))
IE.document.all("Submit").Click
End With
End With



IE.Visible = True
End Sub

kaynak kodlar ekli dosyada

 

[gulvadi]

bu konuda fikri olan yok mu?

 

[gulvadi]

mesaj kutusuna "xzcv z" yazdım mazilada kodlar

<td><textarea name="mesaj" id="mesaj" style="width:260px;height:200px;" onkeydown="textCounter(document.sms. .mesaj, document.sms.karakter_sayisi, 619);document.getElementById('cellphone').innerHTML=mesaj.value;" onkeyup="textCounter(document.sms.mesaj, document.sms.karakter_sayisi, 619);document.getElementById('cellphone').innerHTML=mesaj.value;" onmouseover="textCounter(document.sms.mesaj, document.sms.karakter_sayisi, 619);document.getElementById('cellphone').innerHTML=mesaj.value;" onmouseout="textCounter(document.sms.mesaj, document.sms.karakter_sayisi, 619);document.getElementById('cellphone').innerHTML=mesaj.value;" onchange="textCounter(document.sms.mesaj, document.sms.karakter_sayisi, 619);document.getElementById('cellphone').innerHTML=mesaj.value;" onfocus="textCounter(document.sms.mesaj, document.sms.karakter_sayisi, 619)">xzcv z</textarea></td>
		  </tr>
		  <tr>

şeklide oldu kutu adı oldu