2013-11-25 2 views
1

Кнопка на этой странице HTML не имеет имени или идентификатора, поэтому я не могу щелкнуть по ней. Я просмотрел предыдущие вопросы, но ни один из них не похож на этот HTML, который я вижу. Я не включил всю страницу, но это раздел с кнопкой, в которой мне нужно щелкнуть.Как я могу нажать кнопку отправки в этом HTML-коде (не имеет имени или идентификатора) с MS Access VBA

Я использую VBA из MS Access 2010 для manuupulate IE v8. Я все еще участвую в извинениях, если это легко (надеюсь, что это так). так как вы можете видеть, что тип ввода SUBMIT не имеет имени или идентификатора. Благодарю.

</div> 
<div id="container"> 
<div class="group"> 
    <div id="content"> 
    <div class="banner"> 
<h2>Welcome</h2> 

<div id="search-box"> 
    <form method="get"> 
     <label for="criteria">Search</label> 
     <input type="text" id="search" name="search" value="" maxlength="255" /> 
     <input type="submit" class="button" value="Search" /> 
    <p class="hint">Search by Order No. Service ID or Your reference ID</p> 
    </form> 

ответ

1

Может использовать что-то вроде этого:

Set tags = wb.Document.GetElementsByTagname("Input") 

For Each tagx In tags 
    If tagx.value = "Search" Then 
     tagx.Click 
     Exit For 
    End If 
Next 

Где термометру является контроль WebBrowser.

+2

+1 Хороший трюк. Но вы без необходимости продолжаете цикл даже после того, как нашли правильный контроль. Просто поставьте 'Exit For' перед' End If'. –

+0

Да, забыл об этом :) Я отредактирую его, спасибо! – Manu

+0

спасибо, ребята, которые сделали трюк - так легко в итоге! высоко оценивайте свою помощь. – user3030149

2

Используйте это:

Dim htmlButton 
Set htmlButton = WebBrowser1.Document.GetElementByID("search-box").GetElementsByTagname("Input")(1) 

'' Test to see if we got the right element. (Comment out or remove this line later) 
MsgBox htmlButton.Value 

'' Click that button 
htmlButton.Click 
+1

+ 1 Neat :) Возможно, вы захотите добавить метод '.Click'? :) –

+1

@ Сиддхарт Маршрут: Сделано! :) –

Смежные вопросы