web sayfasından sms göndermek

1 2 3
24/06/2009, 14:25

zetyu

daha önce benzer konularda bir çok örneklerinizi gördüm. Özellikle sledgeab
isimli kullanıcının örneklerinin birçoğunu anlamaya çalıştım
arzu ettiğim bir çok şeyi Access te uygulamayı bu sitede olan arkadaşlar sayesinde öğrendim.

Ancak web bağlantısına gelince iş duruyor.

Verilen örneklerin kodlarında bazı değişiklik yaparak kendime uyarlamaya çalıştım.

Turkcell in web sayfasından ,Accessi kullanarak mesaj göndermek istiyorum.
örnekte açıklamalar var yardımcı olursanız sevinirim
24/06/2009, 15:10

ozanakkaya

doğrulama resmi için kodu Metin16'nın girildiğinde olayına yaz.

Kod:
Dim HTML_Body As Object, HTML_Img As Object, MyImg As Object
Set HTML_Body = WebBrowser1.Document.All.tags("Body").Item(0)
        Set HTML_Img = HTML_Body.GetElementsByTagName("img")
        Set MyImg = HTML_Img(1)

        imgurl = MyImg.src
        
       WebBrowser9.Navigate2 imgurl
   Set HTML_Body = Nothing
   Set HTML_Img = Nothing
   Set MyImg = Nothing
   Set IE = Nothing

Uygulama tasarlarken kullandığım programlar bulunduğum pc'de olmadığı için Gir butonu kaynağa bakarak tıklanmasını düzenleyemem.
Yakın zamanda mehmetdemiral hocam benzeri örnek yapmıştı. Konuyu gördüğünde yardımcı olmaya çalışır.
24/06/2009, 15:24

zetyu

teşekkur ederim
01/07/2009, 16:43

esrefigit

şu andaki tek sorun galiba formu submit etme

WebBrowser1.Document.Forms("Login").submit
01/07/2009, 18:13

ozanakkaya

eşref hocamın verdiği kodun uygulanmış şekli aşağıdadır.

turkcell kullanıcı adı ve şifre olmadığı için 2. ekranı deneyemedim.
01/07/2009, 19:04

mehmetdemiral

))) Eşref'i boşuna beklememişiz demek ki.. Bu işlerin uzmanı o. 10 dakikada çözdü işi.
1 2 3