我怎么试都不行,总是提示我的网页元素不对,定位不了,我实在是没办法了,我没有网页的基础,VBA也是最近百度在边用边学的,找了很多资料,我猜应该这是一个iframe窗口,可能需要用什么代码/语法进到这个iframe窗口里面才能操作这里面的内容,求各位指教,我最终是希望通过VBA自动登陆这个网站,然后在里面的界面上传核注清单导入文件,但是第一步登陆就卡住了,我用同样的方式操作其他的网页都能登陆,不过其他网页的构造应该是比较简单的。
手工操作步骤:打开首页-点击卡介质-输入卡密码-点击登陆-登陆成功网页跳转-选择加贸保税中的加工贸易手册-网页跳转-点击进口核注清单-点击导入按钮-选择本地文件-上传-上传成功-点击暂存
奉上我的VBA代码,请高人指点
Sub start_chrome()
'声明并实例化一个chromedriver。
Dim chrome_driver As New ChromeDriver
'指定chrome浏览器程序的位置。
chrome_driver.SetBinary "C:\Program Files\Google\Chrome\Application\chrome.exe"
'设置隐性等待时间,即加载刷新网页等待返回成功的时间。默认30s。如果网速等原因,一个网页可能超时。用这个时间,可以设置等待时间。
chrome_driver.Timeouts.ImplicitWait = 60
'启动
chrome_driver.Start "chrome"
'转到单一窗口网页
chrome_driver.Get "https://sz.singlewindow.cn/index"
chrome_driver.Wait 5000
'转到单独登陆的iframe窗口页面
chrome_driver.Get "https://app.singlewindow.cn/cas/login?_local_card_flag=1&service=https%3A%2F%2Fapp.singlewindow.cn%2Fcas%2Fjump.jsp%3FtoUrl%3DaHR0cHM6Ly9hcHAuc2luZ2xld2luZG93LmNuL2Nhcy9vYXV0aDIuMC9hdXRob3JpemU.Y2xpZW50X2lkPXN6MDAwMDAwMDBWZTRTOUowMTQmcmVzcG9uc2VfdHlwZT1jb2RlJnJlZGlyZWN0X3VyaT1odHRwcyUzQSUyRiUyRnN6LnNpbmdsZXdpbmRvdy5jbiUyRk9BdXRoTG9naW5Db250cm9sbGVy&configInfoB64=JmNvbG9yQTE9RkZGRkZGJmNvbG9yQTI9NzUsNzksODQsMC43NQ%3D%3D&_local_login_flag=1&logoutFlag=1&localServerUrl=https%3A%2F%2Fsz.singlewindow.cn&localDeliverParaUrl=%2Fdeliver_para.jsp"
chrome_driver.Wait 5000
'点击卡介质、输入密码、点击登录
chrome_driver.FindElementById("//*[@id='span31']").Click
chrome_driver.FindElementById("//*[(@id = 'password')]").SendKeys Range("A1")
chrome_driver.FindElementById("//*[@id='loginbutton']").Click
End Sub
运行的错误提示