Member Avatar for disposable_zero

DynDNS has recently changed their policy so that if you want to maintain your "free" account you have to login to their site at least once every 30 days. I'm trying to write a script that I can kick off on a scheduled task. I'm not very adept at coding. I found some sample code and have been moving stuff around until I can get it working. I've had great success. I've got it to take the user name and the password, I just can't make it hit the "Submit".

Below is the error I'm getting, if there's a better way than InvokeMemeber I'm open to it. Can anyone have look and see what I'm missing?

Error: Click Here To View

DynDNS_login_test.vbs

WScript.Quit Main

Function Main
  Set IE = WScript.CreateObject("InternetExplorer.Application", "IE_")
  IE.Visible = True
  IE.Navigate "https://account.dyn.com/entrance/"
  Wait IE
  With IE.Document
    .getElementByID("username").value = "testuser"
    .getElementByID("password").value = "Password1!"
    .getElementById("submit").Focus()
    .getElementById("submit").InvokeMember("click")
  End With
End Function

Sub Wait(IE)
  Do
    WScript.Sleep 500
  Loop While IE.ReadyState < 4 And IE.Busy 
  Do
    WScript.Sleep 500
  Loop While IE.ReadyState < 4 And IE.Busy 
End Sub

Sub IE_OnQuit
  On Error Resume Next
  WScript.StdErr.WriteLine "IE closed before script finished."
  WScript.Quit
End Sub
  • 1 Contributor
  • 1 Reply
  • 173 Views
  • 22 Hours Discussion Span
  • Latest Post Latest Post by disposable_zero
Member Avatar for disposable_zero

DanniWeb sends me a message "Miss You", this is why I don't use DanniWeb. Nice people, great community, but just too small. I can never get enough responses like in a thriving community.

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.