VBA: Пытаетесь нажать кнопку в IE, но угадываете, может быть, не настоящие кнопки?

0

Im на сайте aspx intranet, который имеет ежедневные отчеты, я могу перейти на веб-страницу, войти в систему с именем пользователя и паролем, но затем на первой странице есть ряд кнопок, и я хочу нажать на один из них, чтобы открыть раздел отчетов. Я предполагаю, что я использую неправильные команды, чтобы щелкнуть по нему. Это часть моего кода, которая ничего не делает. Где, например, мое приложение Internet Explorer.

Dim btnInput As Object
Dim ElementCol As Object
Set ElementCol = ie.Document.getElementsByTagName("input")

For Each btnInput In ElementCol
    If btnInput.Value = "x:WebTab1.4:mkr:ti3" Then
    btnInput.Click
Exit For
End If

Next btnInput

И вот что выглядит html.

<script type="text/javascript"> 
//<![CDATA[
Sys.WebForms.PageRequestManager._initialize('ToolkitScriptManager1', 'fPFT', ['tUpdatePanel1','','tWebTab1$tmpl4$up4',''], [], [], 90, '');
//]]>
</script>

<div id="UpdatePanel1">
<div class="ig_HarvestControl igtab_HarvestTHControl :=CtlMain:layout" id="WebTab1"style="background-color:SaddleBrown;font-size:XX-Large;height:450px;width:764px;visibility:hidden;overflow:hidden;">
<span class="igtab_HarvestTHHolder" id="x:WebTab1.0:mkr:head"><input type="hidden" id="WebTab1_clientState" name="WebTab1_clientState" /><input id="WebTab1.i" name="WebTab1.i" value="0" style="position:absolute;z-index:-1;width:0px;height:0px;font-size:1px;padding:0px;left:20px;top:50%;border:0px;" />
<span class="igtab_HarvestTHHolderNoScroll"><span class="igtab_HarvestTHTab igtab_HarvestTHTabSel" id="x:WebTab1.1:mkr:ti0"><span class="igtab_HarvestTHTail igtab_HarvestTHTailSel"><span class="igtab_HarvestTHCenter igtab_HarvestTHCenterSel"><span class="igtab_HarvestTHText igtab_HarvestTHTextSel">Notes</span></span></span></span>
<span class="igtab_HarvestTHTab" id="x:WebTab1.2:mkr:ti1"><span class="igtab_HarvestTHTail"><span class="igtab_HarvestTHCenter"><span class="igtab_HarvestTHText">PFT Compare</span></span></span></span>
<span class="igtab_HarvestTHTab" id="x:WebTab1.3:mkr:ti2"><span class="igtab_HarvestTHTail"><span class="igtab_HarvestTHCenter"><span class="igtab_HarvestTHText">DPS</span></span></span></span>
<span class="igtab_HarvestTHTab" id="x:WebTab1.4:mkr:ti3"><span class="igtab_HarvestTHTail"><span class="igtab_HarvestTHCenter"><span class="igtab_HarvestTHText">PAS Toolbox</span></span></span></span>

Кнопки представляют собой Notes, PFT Compare, DPS и PAS Toolbox. Есть ли другой способ, который, как предполагается, пытается щелкнуть по ним? Мне нужен PAS Toolbox. Любое руководство очень ценится.

  • 0
    Попробуйте это ... Поместите btnInput.FireEvent("onclick") после btnInput.Click
  • 0
    @ Сантош Не имеет никакого значения в результате. Я, должно быть, ссылаюсь на что-то неправильное, ошибки нет, просто нет нажатия кнопки ... Есть ли какой-то особый способ кодировать щелчок, если он находится внутри формы?
Показать ещё 2 комментария
Теги:
excel-vba
excel
internet-explorer

1 ответ

0
Лучший ответ

Вы пробовали кодирование в действии кнопки, а не пытаетесь сделать ваш код "нажатием" кнопки? Другими словами, просто чтобы ваш код открыл желаемый раздел отчета и полностью обходил эту кнопку?

  • 0
    Спасибо, я разобрался, добрался до нужного мне места, не нажимая никаких кнопок.

Ещё вопросы

Сообщество Overcoder
Наверх
Меню