无法select网站上的checkbox

经过几天的尝试,并失败,我需要一些帮助,请。 我试图select一个网站上的checkbox,但它似乎不工作,因为我想。

该checkbox是表格中一行的一部分,以及其他一些数据。 这个想法是,我login在网站( http://www.apf.asn.au ),去表,从我的Excel表find我需要的数字,并select行中的数字框的数字被发现。

login和导航到表部分工作正常,但我找不到正确的方式来select框。

来自网站的代码:

<div class="table"> <div> <table class="table APFGrid StudentsSearch" id="ctl00_ContentPlaceHolderMainNoAjax_gvJumpRecordsList" style="border-collapse: collapse;" border="1" rules="all" cellspacing="0" <tbody> <tr>...</tr> 'Header <tr> <td> <span class="clsSelect"> <input name="ctl00$ContentPlaceHolderMainNoAjax$gvJumpRecordsList$ctl02$chkSelect" id="ctl00_ContentPlaceHolderMainNoAjax_gvJumpRecordsList_ctl02_chkSelect" onclick="javascript:ToggleCheckBoxSelection;" type="checkbox"></input> </span> </td> 'Box need to check <td class="Name">...</td> <td class="Name">...</td> <td class="DateBirth">...</td> <td class="APFNum">...</td> 'Number I'm looking for <td class="JumpType">...</td> <td class="DateBooked">...</td> <td>...</td> <td class="Name">...</td> </tr> <tr>...</tr> Etc. 

我使用这个代码:

 'Get APF Number from Pipe xNr = "20819334" 'Search Number online Dim i As Integer i = 0 For Each Row In APFtable If i = 0 Then Set Member = Row.getElementsByTagName("th") Else Set Member = Row.getElementsByTagName("td") End If i = i + 1 On Error Resume Next If xNr = Member(4).innerText Then 'Check the corresponding checkbox Exit For End If Next Row 

将我的例子中的数字xNr与表中的数字进行比较。 但我不知道如何检查框。

我试过这个代码:

 Name = "ctl00$ContentPlaceHolderMainNoAjax$gvJumpRecordsList$ct" & 100 + i & "$chkSelect" Set Check = IE.Document.GetElementsByName(Name) If Not Check Is Nothing Then Check(0).Click End If 

结束所有其他方式,我可以在其他论坛find工作,虽然这是最接近工作。 这意味着当我在variables名称中用“计算位置”部分进行硬编码时,它就起作用了。

有人可以帮我解决我的问题吗? 非常感激

 Member(4).parentElement.getElementsByTagName("input")(0).Click 

应该这样做,如果checkbox是该行的第一个input元素。