高手帮个忙,这个登录填表怎么提交?既没有name,也没id,document.forms().submit也不行
网站: http://www.answers.com/ 是个类似百度知道的网站,我想到这里问问题,每次登录太麻烦了,想弄个自动登录
--------------------------
Dim ie As Object
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.Navigate "http://www.answers.com/"
Do
Loop Until ie.ReadyState = 4
ie.Document.getElementById("username").Value = "1111111111111111111111111111111"
ie.Document.getElementById("password").Value = "1111111111111111111111111111111"
'下面是那个sign in按钮,看了下元素,只有个"<font> Sign in </font>"这种东西,就没办法用getelementById来click了.上下行倒是有个"image",试了几个方法都不行:
'方法1:(;或者改成 ie.Document.Forms(0).submit 也不行:)
ie.Document.Forms(loginform).submit
'方法2:(论坛里一位大侠给的方法抄了下)
Dim submitBtn
For Each submitBtn In ie.Document.All
If LCase(submitBtn.tagName) = "input" Then
If LCase(submitBtn.Type) = "image" Then
If submitBtn.Value = "" Then
'或者:If submitBtn.src = "http://en.site2.answcdn.com/templates/images/blank.gif?v=83010" Then 也不行
submitBtn.Click '点击
End If
End If
End If
Next
ie.Navigate "http://wiki.answers.com/"'这个是登录后跳转到这里,问问题是直接在这个页面的
----------------
谢谢!
[解决办法]
document.getElementById("login").childNodes.item(0).click
