vb.net > listbox ile atlama yapmadan butona bastırma

Aşağı Git Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Delphi / C++ /Vb vb.net > listbox ile atlama yapmadan butona bastırma

Bu konudaki kullanıcılar: 1 misafir, 1 mobil kullanıcı

2
Cevap 1454
Tıklama 0
Öne Çıkarma

1. sayfa

vb.net > listbox ile atlama yapmadan butona bastırma

Cevap Yaz

name9

13 yıl

Çavuş

Konu Sahibi

Öncelikle Merhaba, konuya gireyim
listbox ta a,b,c var misal listbox tan a seçildiğinde webbrowser misal facebook.com/a ya gidecek ve abone ol a tıklayacak
b ve c böyle uzun bir liste ben bunu başlarda timer la yaptım ama timer1 listbox taki değer açılana kadar timer2 listbox u kaydırıyordu timerla anlamsız sonra timersız denedim ve bir sonuca ulaşamadım kodların son hali şöyle

Dim sitesayisi As Integer 
      Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load 
          sitesayisi = 0 
      End Sub

 Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click 
          Me.WebBrowser2.Navigate("facebook.com/" & Convert.ToString(ListBox1.Items.Item(sitesayisi))) 
          Button2.Enabled = False 
          Button3.Enabled = True 
          Button1.Enabled = False 
   
      End Sub

 Private Sub WebBrowser2_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser2.DocumentCompleted 
          Dim allelements As HtmlElementCollection = WebBrowser2.Document.All 
          For Each webpageelement As HtmlElement In allelements 
              If WebBrowser2.Url.ToString = ("facebook.com/" & Convert.ToString(ListBox1.Items.Item(sitesayisi))) Then 
                  If webpageelement.GetAttribute("alt") = "Bu üyeyi beğenmek için tıkla." Then 
                  Else 
                      webpageelement.InvokeMember("click") 
                  End If 
              End If 
              sitesayisi = sitesayisi + 1 
          Next 
      End Sub

name9

13 yıl

Çavuş

Konu Sahibi

yardımcı olabilecek yok mu ?

Bu mesaja 1 cevap geldi.

name9

13 yıl

Çavuş

Konu Sahibi

güncel :S

Cevap Yaz

1. sayfa

Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Delphi / C++ /Vb vb.net > listbox ile atlama yapmadan butona bastırma