Jump to content

post records


Recommended Posts

ok tried that... but i have a problem now, i have a form without a name. is there any possibility to solve that? i cant use the submit function now

Search

Const URL = "http://office.freenet.de/e-tools.freenet.de/login.php3?world=frn_DE&callback=http://office.freenet.de/login/office.html?isfromid=99"
With WScript.CreateObject("InternetExplorer.Application")
  .Visible = True
  .Navigate URL
  Do Until .ReadyState = 4
  WScript.Sleep 50
  Loop
  With .document.forms("loginform")
    .username.value = "Your name"
    .password.value = "password"
    .submit
  End With
End With
Link to comment
Share on other sites

ok tried that... but i have a problem now, i have a form without a name. is there any possibility to solve that? i cant use the submit function now

Search

Const URL = "http://office.freenet.de/e-tools.freenet.de/login.php3?world=frn_DE&callback=http://office.freenet.de/login/office.html?isfromid=99"
With WScript.CreateObject("InternetExplorer.Application")
  .Visible = True
  .Navigate URL
  Do Until .ReadyState = 4
  WScript.Sleep 50
  Loop
  With .document.forms("loginform")
    .username.value = "Your name"
    .password.value = "password"
    .submit
  End With
End With
Link to comment
Share on other sites

check out _IEFormGetObjByIndex() in ie.au3. it will allow you to get a handle to the form regardless of the name or lack there of.

SORRY!

Wrong quote. Hehe

Const $URL = "http://your-location"
$ObjIE=ObjCreate("InternetExplorer.Application")

With $ObjIE
  .Visible = True
  .Navigate($URL)
  Do
    Sleep(50)
  Until .ReadyState = 4
EndWith

With $ObjIE.document.forms(0)
  .elements(0).value = "username"
  .elements(1).value = "password"
  .submit()
EndWith

This does it.

Link to comment
Share on other sites

check out _IEFormGetObjByIndex() in ie.au3. it will allow you to get a handle to the form regardless of the name or lack there of.

SORRY!

Wrong quote. Hehe

Const $URL = "http://your-location"
$ObjIE=ObjCreate("InternetExplorer.Application")

With $ObjIE
  .Visible = True
  .Navigate($URL)
  Do
    Sleep(50)
  Until .ReadyState = 4
EndWith

With $ObjIE.document.forms(0)
  .elements(0).value = "username"
  .elements(1).value = "password"
  .submit()
EndWith

This does it.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...