如何在没有特定ID的情况下使用getElementsBy

时间:2019-07-04 11:41:31

标签: vba

我不熟悉使用Microsoft Visual Basic进行编程,并且正在尝试创建一个将坐标放入图像数据库网站的程序。

我正在尝试将数字放入网站上的特定空间。

我想输入一个数字以进行正确升序的地方,当我在网站上检查该地方时没有特定的ID,因此我尝试使用getElementsByTagName,但这是行不通的。

我还希望找到HTML代码较大部分的ID,如此处指定的How to access HTML element without ID?,但这也不起作用。

Sub MovesData()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")

IE.Visible = True
IE.navigate "http://wsa.roe.ac.uk:8080/wsa/getImage_form.jsp? programmeID=&database=UKIDSSDR11PLUS&ra=&dec=&sys=J&filterID=all&xsize=1&ysize=1&obsType=object&frameType=stack&mfid=&fsid=&name="

Do While IE.Busy
    Application.Wait DateAdd("s", 1, Now)
Loop

IE.document.getElementsByTagName("ra").Value = "23"


End Sub

特定行的HTML代码为:

<input type="text" name="ra" value="" size="15">

HTML代码部分为:

<td nowrap="" align="right"><b>RA</b> or <b>Galactic Long.:</b></td>
<td>
<input type="text" name="ra" value="" size="15">
<td><input type="text" name="ra" value="" size="15"></td>

我希望输出在右边的提升框中为23,但它只是空白,并且存在运行时错误438“对象不支持此属性或方法”。任何帮助将不胜感激!

0 个答案:

没有答案