ADVISE: Accessing PHP Objects in Internet Explorer from Excel VBA -
i trying automate excel upload process have our data warehouse. excel vba, initiating ie session our data warehouse > login credentials > navigate page upload, having problems.
the url not change when navigating website, coded in php believe. therefore, need click specific image - not know how.
in code below, added comments , error message receive when debugging. added image of website, button trying hit, , inspect of element. please , thank in advance! <3 stack overflow!
signed, doug fresh
private sub commandbutton2_click() dim objie internetexplorer dim aele htmllinkelement dim ele object dim y integer dim result string set objie = new internetexplorer objie.visible = true objie.navigate "http://kpionline.bitam.com/english/memberlogin.php" while objie.busy = true or objie.readystate <> 4: doevents: loop objie.document.getelementbyid("user_name").value = "username@bimbo.com" 'not real objie.document.getelementbyid("user_pwd").value = "bimbo2017" 'not real objie.document.getelementbyid("login").click while objie.busy = true or objie.readystate <> 4: doevents: loop objie.navigate "https://kpionline7.bitam.com/artus/genvi_test/loadstage.php?txtrepositorio=fbm_bmd_0030&txtuser=xxxxxxx&txtpassword=xxxxx" while objie.busy = true or objie.readystate <> 4: doevents: loop '************************************************************************** 'how click icon??? objie.document.getelementbyid("enl8").getelementsbytagname("img")(0).click while objie.busy = true or objie.readystate <> 4: doevents: loop 'please see image php/js website code 'error: run-time error '424': object required '************************************************************************** objie.quit end sub
try objie.document.getelementbyid("enl8").click

Comments
Post a Comment