#include <IE.au3>
_IEErrorHandlerRegister()
$oIE = _IECreate ("http://demo.borland.com/gmopost/")
$form1=_IEFormGetObjByName($oIE,"myForm")
$entergmoonline=_IEFormElementGetObjByName($form1,"bsubmit")
_IEAction($entergmoonline,"click")
_IELoadWait($oIE)
$form2=_IEFormGetObjByName($oIE,"Items")
$orderquantity=_IEFormElementGetObjByName($form2,"QTY_TENTS")
$quantity="2"
_IEFormElementSetValue($orderquantity,$quantity)
$placeanorder=_IEFormElementGetObjByName($form2,"bSubmit")
_IEAction($placeanorder,"click")
_IELoadWait($oIE)
$form3=_IEFormGetObjByName($oIE,"Info")
$proceedwithorder=_IEFormElementGetObjByName($form3,"bSubmit")
_IEAction($proceedwithorder,"click")
_IELoadWait($oIE)
$form4=_IEFormGetObjByName($oIE,"Info")
$billtoname=_IEFormElementGetObjByName($form4,"billName")
$billtoaddress=_IEFormElementGetObjByName($form4,"billAddress")
$billtocity=_IEFormElementGetObjByName($form4,"billCity")
$billtostate=_IEFormElementGetObjByName($form4,"billState")
$billtozip=_IEFormElementGetObjByName($form4,"billZipCode")
$billtophone=_IEFormElementGetObjByName($form4,"billPhone")
$billtoemail=_IEFormElementGetObjByName($form4,"billEmail")
$creditcard=_IEFormElementGetObjByName($form4,"CardType")
$cardnumber=_IEFormElementGetObjByName($form4,"CardNumber")
$expiration=_IEFormElementGetObjByName($form4,"CardDate")
$placetheorder=_IEFormElementGetObjByName($form4,"bSubmit")
$billname="fname"
$billaddress="134"
$billcity="Bangalore"
$billstate="Karnataka"
$billzip="95121"
$billphone="9999999999"
$billemail="test_31820071@yahoo.com"
$ccnumber="1234567812345678"
$expdate="12/07"
_IEFormElementSetValue($billtoname,$billname)
_IEFormElementSetValue($billtoaddress,$billaddress)
_IEFormElementSetValue($billtocity,$billcity)
_IEFormElementSetValue($billtostate,$billstate)
_IEFormElementSetValue($billtozip,$billzip)
_IEFormElementSetValue($billtophone,$billphone)
_IEFormElementSetValue($billtoemail,$billemail)
_IEFormElementOptionSelect($creditcard,"MasterCard",1,"byText")
_IEFormElementSetValue($cardnumber,$ccnumber)
_IEFormElementSetValue($expiration,$expdate)
_IEFormElementCheckBoxSelect($form4,"OFF","shipSameAsBill",1,"byValue")
_IEAction($placetheorder,"click")
_IELoadWait($oIE)
$form5=_IEFormGetObjByName($oIE,"Item")
$returntohomepage=_IEFormElementGetObjByName($form5,"bSubmit")
_IEAction($returntohomepage,"click")
_IELoadWait($oIE)