Anlatım Adı : Sms Gönderme Programlarının Mantığı [VB6]
Anlatım :
Merhaba Arkadaşlar,
Bugün sizlere Vb6 da yapılan sms gönderme programlarının mantığını açıklıyıcam.Bu yoldan yazarsınız diye düşünüyorum.Sms gönderme programı.Şimdi geçelim mantığa.
Arkadaşlar mantık şu bir bedava sms gönderme sitesi bulup onu programa bağlıyorlar.Peki bu nasıl oluyor ?
İlk olarak bi site buldum ben örnek bu "http://www.afreesms.com/freesms/" tırnaklar olmadan tabi
.Siteye girelim.Şimdi Form a bağlamak için 1 webbrowser ekliyoruz genelde bunun boyutu küçük olur ya görülmeyecek şekilde saklanır.Yada açık yapabilirsiniz.Ama hoş durmaz bence.Her neyse.Sonra Form load kısmına geliyor.Ve şu kodu yazıyor.
Webbrowser1.Navigate "http://www.afreesms.com/freesms/"
Bu kodu yazınca form açıldığında direk webbrowser "http://www.afreesms.com/freesms/" sitesini açıyor.Sonra buton koyuyoruz ve text ekliyoruz.Bir örnek veriyim.
Örn:/ Text1.text = Gönderilecek telefon numarası.
Sitemize gidiyoruz.Ordan gönderilecek telefon numarasını gireceğin bölüme sağ tıklayıp öğeyi denetle diyorsunuz.Ve ordan nameyi buluyorsunuz.Sonra şu kod ile onu programdaki texte bağlıyoruz.
Örn:/İsmi TelNo olsun.
WebBrowser1.********.All.Item("TelNo").Value = Text1.Text
Bağlamış olduk.
Anlatım :
Merhaba Arkadaşlar,
Bugün sizlere Vb6 da yapılan sms gönderme programlarının mantığını açıklıyıcam.Bu yoldan yazarsınız diye düşünüyorum.Sms gönderme programı.Şimdi geçelim mantığa.
Arkadaşlar mantık şu bir bedava sms gönderme sitesi bulup onu programa bağlıyorlar.Peki bu nasıl oluyor ?
İlk olarak bi site buldum ben örnek bu "http://www.afreesms.com/freesms/" tırnaklar olmadan tabi
Webbrowser1.Navigate "http://www.afreesms.com/freesms/"
Bu kodu yazınca form açıldığında direk webbrowser "http://www.afreesms.com/freesms/" sitesini açıyor.Sonra buton koyuyoruz ve text ekliyoruz.Bir örnek veriyim.
Örn:/ Text1.text = Gönderilecek telefon numarası.
Sitemize gidiyoruz.Ordan gönderilecek telefon numarasını gireceğin bölüme sağ tıklayıp öğeyi denetle diyorsunuz.Ve ordan nameyi buluyorsunuz.Sonra şu kod ile onu programdaki texte bağlıyoruz.
Örn:/İsmi TelNo olsun.
WebBrowser1.********.All.Item("TelNo").Value = Text1.Text
Bağlamış olduk.
0 yorum:
Yorum Gönder
Yorumlarınızda lütfen Türkçe ' yi güzel kullanınız.
Bilgili Yayın Yönetimi...
Dikkat ! : Küfür yada uygunsuz içerik içeren yorumlar yasaktır.Bu tür yorumlar site yönetimi tarafından tespit edilip silinmektedir.Fakat gözden kaçan yorumları ctn@turk.tc veya tospmailbomber@gmail.com adreslerinden bizlere iletebilirsiniz.