Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I have a couple of internal web applications that I would like to track their load times for certain web pages that they display. Most of the URLs are variations of the following.
1) https://mydomain.com/folder1/actions...1=119&ID2=AB01 2) https://mydomain.com/folder1/page1.jsp When the page is requested there are a couple of servers that are contacted to get some information from and I would like to capture as much of the task durations as possible. Is this something that could be done VBA. Any help would be greatly appreciated. |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
On Friday, December 27, 2013 8:29:32 AM UTC-7, Dirk wrote:
I have a couple of internal web applications that I would like to track their load times for certain web pages that they display. Most of the URLs are variations of the following. 1) https://mydomain.com/folder1/actions...1=119&ID2=AB01 2) https://mydomain.com/folder1/page1.jsp When the page is requested there are a couple of servers that are contacted to get some information from and I would like to capture as much of the task durations as possible. Is this something that could be done VBA. Any help would be greatly appreciated. How about this...ron Sub test_1() ' open IE, navigate to the website of interest and loop until fully loaded Set IE = CreateObject("InternetExplorer.Application") my_url = "https://mydomain.com/folder1/actions/searchList.do?key1=xyz&key2=1234&ID1=119&ID2=AB01" start_time = Timer With IE .Visible = True .navigate my_url .Top = 50 .Left = 530 .Height = 400 .Width = 400 End With Do Until Not IE.Busy And IE.ReadyState = 4 DoEvents Loop elapsed_time = (Timer - start_time) MsgBox ("The time required to load the webpage was " & Format(elapsed_time, "0.0000") & " seconds.") End Sub |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
On Friday, December 27, 2013 8:29:32 AM UTC-7, Dirk wrote:
I have a couple of internal web applications that I would like to track their load times for certain web pages that they display. Most of the URLs are variations of the following. 1) https://mydomain.com/folder1/actions...1=119&ID2=AB01 2) https://mydomain.com/folder1/page1.jsp When the page is requested there are a couple of servers that are contacted to get some information from and I would like to capture as much of the task durations as possible. Is this something that could be done VBA. Any help would be greatly appreciated. Hi Dirk...Tried posting this earlier, guess it didn't get through, so here goes again. Hope this gives you what you want...ron Sub test_1() ' open IE, navigate to the website of interest and loop until fully loaded Set IE = CreateObject("InternetExplorer.Application") my_url = "https://mydomain.com/folder1/actions/searchList.do?key1=xyz&key2=1234&ID1=119&ID2=AB01" start_time = Timer With IE .Visible = True .navigate my_url .Top = 50 .Left = 530 .Height = 400 .Width = 400 End With Do Until Not IE.Busy And IE.ReadyState = 4 DoEvents Loop elapsed_time = (Timer - start_time) MsgBox ("The time required to load the webpage was " & Format(elapsed_time, "0.0000") & " seconds.") End Sub |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Ron,
I got one of the posts. Thanks for the help. This will get me started. The next step will be to try and get the breakdown of the time for each section of the web page. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
How to load page with specific date? | Excel Programming | |||
How to load web page into Excel properly? | Excel Discussion (Misc queries) | |||
how do you print single page multiply times with increasing page . | Excel Worksheet Functions | |||
Load TextBox With Search Result Cell From a PAge | Excel Programming | |||
Microsoft Excel tries to load front page on opening | Excel Discussion (Misc queries) |