The very basic code below populates the trainline form online. When I come to submit the form, the page just refreshes itself. If I omit the f.submit command and press the online button myself it works. Is there another option for submitting or do i have the wrong command? Any advice or help appreciated.
Code:Sub get_times_test() Set web = CreateObject("InternetExplorer.Application") web.Navigate2 "http://www.thetrainline.com/buytickets/?href=&T2ID=8507_20078301696" web.Visible = True Do Until web.ReadyState = 4 DoEvents Loop Set f = web.Document.forms(0) f("OriginStation").Value = "LDS" f("DestinationStation").Value = "MAN" f("outwardDate").Value = "20/12/09" f("OpenReturnJourneyCheckBox").Checked = True f.submit End Sub




Reply With Quote