PDA

View Full Version : Excel VBA script to automically go a a webpage and click on a button



Danielyootw
04-01-2019, 11:12 PM
Hi,

I need help to find codes to automatically go to a site and click on a button
For example:

Click on: Demo>Open Page>In Same Window (this button only on the horizontal blue bar)

Cheers
Daniel

Danielyootw
04-01-2019, 11:17 PM
By the way, here is the site

snb
04-02-2019, 03:23 AM
It is totally dependent of the code with which the websitepage is created.

Danielyootw
04-02-2019, 09:51 AM
hmm.. how would you code if I would like to automatically click on the button below

"var pmSame00 = new TPopMenu('in same window','','a','index.html','Open page in same window');"


The whole menu coding is as per below


var mm0 = new TMainMenu('mm0','horizontal');







var pmDemo00 = new TPopMenu('Demo','5','','','doiMenu v.1.5 demo');



var pmIcon00 = new TPopMenu('with Icon','','','','with icon');



var pmFav00 = new TPopMenu('Favorites','../img/favorites.gif','','','favorites');



var pmHist00 = new TPopMenu('History','../img/history.gif','','','History');



var pmHome00 = new TPopMenu('Home','../img/home.gif','','','Home');



var pmSep00 = new TPopMenu('-','','','','');



var pmRef00 = new TPopMenu('Refresh','../img/refresh.gif','','','Refresh');



var pmStop00 = new TPopMenu('Stop','../img/stop.gif','','','Stop');







var pmOpen00 = new TPopMenu('Open page','','','','Open page demo');



var pmSame00 = new TPopMenu('in same window','','a','index.html','Open page in same window');



var pmDiv00 = new TPopMenu('in new window','','f',"newWindow('index.html')",'Open page in new window');



var pmL00 = new TPopMenu('Long popup menu','','','','Popup menu demo');







var pmAlert00 = new TPopMenu('Alert','','f',"alert('You have clicked me!')",'Alert');







var pmHelp00 = new TPopMenu('Help','','','','Help');



var pmAbout00 = new TPopMenu('About','','f',"alert('doiMenu v.1.5\\nThis is freeware\\n© 2003 Donna Iwan Setiawan')",'About this program');











mm0.Add(pmDemo00);



pmDemo00.Add(pmIcon00);



pmIcon00.Add(pmFav00);



pmIcon00.Add(pmHist00);



pmIcon00.Add(pmHome00);



pmIcon00.Add(pmSep00);



pmIcon00.Add(pmRef00);



pmIcon00.Add(pmStop00);



pmDemo00.Add(pmSep00);



pmDemo00.Add(pmOpen00);



pmOpen00.Add(pmSame00);



pmOpen00.Add(pmDiv00);



pmDemo00.Add(pmL00);



mm0.Add(pmAlert00);



mm0.Add(pmHelp00);



pmHelp00.Add(pmAbout00);



//end of xp style