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