AccessTr.neT
Açılan site içinde arama yapmak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic .NET (https://accesstr.net/forum-visual-basic-net.html)
+--- Forum: Visual Basic .NET Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-net-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Açılan site içinde arama yapmak (/konu-acilan-site-icinde-arama-yapmak.html)



Açılan site içinde arama yapmak - drummers - 30/05/2012


Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click
Dim metin As String = WebBrowser1.Document.Body.InnerHtml
MsgBox(InStr(metin, Me.TextBox4.Text))
End Sub

Bu kod ile TextBox4.Text yazılı harf yada kelimeyi açılan sitede aratıyorum ve sonuç olarak bana sayfadaki yerini söylüyor

İsteğim şudur: TextBox4.Text yazılı olanı açılan sitede işaretlesin istiyorum, çünkü sayfa baya uzun.
Teşekkürler


Cvp: Açılan site içinde arama yapmak - alpeki99 - 31/05/2012

Explorer içinde seçili hale getirmek için biraz araştırmak lazım.


Cvp: Açılan site içinde arama yapmak - drummers - 31/05/2012

(31/05/2012, 10:35)alpeki99 yazdı: Explorer içinde seçili hale getirmek için biraz araştırmak lazım.

Vallahi sabırsızlıkla bekliyorum. Gayet önemli bi konu benim için

Teşekkürler


Cvp: Açılan site içinde arama yapmak - alpeki99 - 31/05/2012

Şu ana kadar çok az ilgilenebildim ve aramalarımda çok verimli bir sonuç elde edemedim. WebBrowser soruları daha dar alanlı bir konu olduğundan çözüme ulaşmak zaman alabiliyor.


Cvp: Açılan site içinde arama yapmak - drummers - 31/05/2012

(31/05/2012, 15:51)alpeki99 yazdı: Şu ana kadar çok az ilgilenebildim ve aramalarımda çok verimli bir sonuç elde edemedim. WebBrowser soruları daha dar alanlı bir konu olduğundan çözüme ulaşmak zaman alabiliyor.



WebBrowser1.DocumentText = WebBrowser1.Document.Body.InnerHtml.Replace(Me.TextBox4.Text, "<span style='background-color: yellow'>" & Me.TextBox4.Text & "</span>")

Bu aslında sorunu çözüyor fakat butona basınca sayfa yapısını bozuyor. Önüne geçemedim.

<div> tag ının içinde aranacak yerler.. Sayfayı, sebebini çözmediğim bir olaydan dolayı scriptini bozuyor.

Scrip uyarısıda veriyor ama onu loada "WebBrowser1.ScriptErrorsSuppressed = True" yazarak çözdüm... Sayfanın kaynak kodlarını isterseniz verebilirim..
Teşekkürler