本帖最后由 pcl_test 于 2017-6-21 20:56 编辑
vbs- Set ie = CreateObject("InternetExplorer.Application")
- ie.Visible = True
- url = "http://pan.baidu.com/s/1dFt5C9z" '分享链接
- psw = "e38s" '提取密码
- ie.Navigate url
-
- Do
- WSH.Sleep 500
- Loop Until ie.readyState = 4
-
- ie.Document.getElementByID("accessCode").value=psw
- ie.Document.getElementByID("submitBtn").click()
复制代码
|