Ustaw fokus na pole tekstowe HTML lub przycisk w formancie WebBroswer

Question

Otwieram witrynę w formancie WebBrowser przy użyciu VB.NET 2008. Na czwartej stronie witryny chcę ustawić kontrolę, uruchamiając klawisz tabulatora programowo. Korzystam z następującego kodu:

If adtxt.Text = "http://aojsl.com/dfassfeed2.php" Then 
    System.Windows.Forms.SendKeys.Send("{TAB}") 
End If 

Jednak mój kod nie może wywołać klawisza tabulatora. Czy ktoś wie jak to zrobić?

Answer 1

Metoda 1

Private Sub Form_Load() 
    WebBrowser1.Navigate "http://www.google.com/" 
    Do 
    Thread.Sleep(100) 
    Loop While webBrowser1.IsBusy = True 
End Sub 

Private Sub Command1_Click() 
    WebBrowser1.Document.All("q").focus 'Set focus to the search text field 
End Sub 

Private Sub Command2_Click() 
    WebBrowser1.Document.All("btnI").focus 'Set focus to the google "I Am feeling lucky button" 
End Sub 

Metoda 2

I konwertowane go do VB.Net z tego MSDN thread: Focus issues with System.Windows.Controls.WebBrowser

trzeba będzie zmienić ActiveElement w webBrowser.Document.ActiveElement.Focus() do pola tekstowego lub przycisku.

Public Partial Class Form1 
    Inherits Form 
    Public Sub New() 
    InitializeComponent() 
    Dim host As New WindowsFormsHost() 
    im webBrowser As New WebBrowser() 
    host.Child = webBrowser 
    elementHost1.Child = host 

    webBrowser.Navigate(New Uri("http://www.google.com")) 
    Me.Activated += Function() Do 
     Console.WriteLine(Me.ActiveControl) 
     If webBrowser.Document <> Nothing Then 
     If Me.ActiveControl = elementHost1 AndAlso webBrowser.Document.ActiveElement <> Nothing Then 
      webBrowser.Document.ActiveElement.Focus() 
     End If 
     End If 
    End Function 
    End Sub 
End Class 

Metoda 3

Innym sposobem może być to zrobić w HTML, np:

OnLoad="document.myform2.mybutton.focus();"> 

Answer 2

powiedzmy, że html youre stronie:

<button id="btn">Ok</button><input id="txt"> 

Można ustawić ostrość w ten sposób:

If adtxt.Text = "http://aojsl.com/dfassfeed2.php" Then 
    webbrowser1.document.getelementbyid("btn").focus() 
    webbrowser1.document.getelementbyid("txt").focus() 
End If 

Answer 3

Innym sposobem:

użyć GetElementsByTagName(TagName)

powiedzmy, że HTML jest:

<button>no</button> 
<button>no</button> 
<button onclick='alert(1);'>--focus me!--</button> 
<button>no</button> 

Dim Elems As HtmlElementCollection 
     Dim WebOC As WebBrowser = WebBrowser1 
     Elems = WebOC.Document.GetElementsByTagName("button") 
     For Each elem As HtmlElement In Elems 
      If elem.InnerHtml = "--focus me!--" Then 
       elem.Focus() 
       elem.InvokeMember("click") 

      End If 

     Next 

jeszcze jedno:

Dim num As Integer = 1 
     Dim elms As HtmlElementCollection 
     Dim wb As WebBrowser = WebBrowser1 
     elms = wb.Document.GetElementsByTagName("button") 
     For Each elem As HtmlElement In elms 
      If elem.Id = "" Then 
       elem.Id = "button" & num.ToString 
       num = num + 1 
      End If 
     Next 

     WebBrowser1.Document.GetElementById("button3").Focus() 

Answer 4

Aby skupić wybierz element, za pomocą funkcji regulacji ostrości w VB.NET. Na przykład:

Me.WebBrowser1.Document.All.Item("password").Focus() 

Spowoduje to ustawienie fokusu na elemencie o nazwie hasło!

Użyj Me.WebBrowser1.Document.All.Item("YOURelement"), aby znaleźć właściwy element, a następnie dodaj .Focus(), aby ustawić ostrość na tym, który chcesz! : D

Answer 5

Wykonaj Me.WebBrowser1.Document.All.Item (TextBox1.Text) .Focus()

dokonać pole tekstowe, a następnie, jeśli chcesz go spambot łatwy Wykrywa każdym Twój typ pisać i wysyłać