bugun size facebook sayfalarında yada duvarda oto paylaşım yapma yı anlatcam
bir buton 2 timer 1 textbox koyalım forma buton çift tıkayıp içine timer1 start yazalım
timer 1 interval 2000 olsun içine
bu kod textbox1 e yazılan yazıyı veya linki paylaşım text ine aktarır timer2 mize start verdık şimdi bu yazıyı paylaşalım
timer2 çift tıklayın ve içine
paylaştık timer 2 interval 4000 yapalımkı link paylaşırak önizleme göruntusude çıksın
neden timerde döndurdum sureklı paylaşsın dıye
bir buton 2 timer 1 textbox koyalım forma buton çift tıkayıp içine timer1 start yazalım
timer 1 interval 2000 olsun içine
Kod:
For Each elem As HtmlElement In WebBrowser1.********.GetElementsByTagName("textarea")
If elem.GetAttribute("name") = "xhpc_message" Then
elem.Focus()
elem.SetAttribute("value", TextBox1.Text)
SendKeys.Send("{ENTER}")
Exit For
End If
timer2.start
timer1.stop
Next
timer2 çift tıklayın ve içine
Kod:
For Each ea As HtmlElement In WebBrowser1.********.GetElementsByTagName("input")
If ea.GetAttribute("value") = "Paylaş" Then
ea.InvokeMember("click")
Timer2.Stop()
Exit For
End If
Next
Timer1.Start()
neden timerde döndurdum sureklı paylaşsın dıye


