我正在编写VBScript自动化代码,以便在获得所需授权后从网站下载.xls文件。登录后,我需要点击一个特定的下载按钮,但是" id"对于该特定元素,HTML源代码中不可用。当我研究时,我了解了XPath。所以现在我需要使用元素的给定PAath单击该下载按钮。
我写的示例代码:
Const strURL = "https://gtf.com/"
Const strID = "abc"
Const strPswd = "xyz"
Set objIE = CreateObject( "InternetExplorer.Application" )
objIE.Visible = True
objIE.Navigate2 strURL
Do While objIE.Busy
WScript.Sleep 100
Loop
Set objShell = WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
objShell.SendKeys "{TAB 0}"
WScript.Sleep 100
objShell.SendKeys strID
WScript.Sleep 100
objShell.SendKeys "{TAB}"
WScript.Sleep 100
objShell.SendKeys strPswd
WScript.Sleep 100
objShell.SendKeys "{ENTER}"
WScript.Sleep 100
objIE.Navigate2 "https://gts.com/download/asc"
WScript.Sleep 100
Set objNode = objDoc.selectSingleNode("//*[@id="folderfilelisttable"]/tbody/tr[3]/td[13]/a[2]/span")
我不知道如何点击该XPath位置(在Set objNode
中)然后我需要将该文件存储在给定位置(文件夹)中,然后将该.xls文件转换为.xlsx,全部使用上面的代码。