Http Request Repsonse Query

**Killavirus** · 08-24-2010, 09:07 AM

Hi all

New Project here as we seem to be moving into hosting and need to make sure all the sites stay up and healthy !!!

What i would like to do is query a webpage and see if i get a reply, normally one could do this via Ping and read the error code of the cmd promt but if the Web server crashes this wont help me much :/

What i am looking to do is run a http Get query from excel and dependant on response (yes/no is fine) fill a cell in with either 0 or 1.

Later on i will be setting it so each query runs on a 15 min basis and fill a 24 hour Chart (well heres hoping :D )

Could somebody point me in the right direction to start in its been a while since i did any serious scripting and i have never done anything to do with the Web and VB its allo been local files.

Many thanks in Advance

p.s. yes i tried googling it, it may of been there but im not sure what im looking for .....

**Leith Ross** · 08-24-2010, 11:44 AM

Hello Killavirus,

This macro will look for URLs on the ActiveSheet starting at cell "A2". Each URL will be pinged an the results place in column "B" of same row.

Please Login or Register  to view this content.

Adding the Macro

Copy the macro above pressing the keys CTRL+C
Open your workbook
Press the keys ALT+F11 to open the Visual Basic Editor
Press the keys ALT+I to activate the Insert menu
Press M to insert a Standard Module
Paste the code by pressing the keys CTRL+V
Make any custom changes to the macro if needed at this time.
Save the Macro by pressing the keys CTRL+S
Press the keys ALT+Q to exit the Editor, and return to Excel.

To Run the Macro...
To run the macro from Excel, open the workbook, and press ALT+F8 to display the Run Macro Dialog. Double Click the macro's name to Run it.

**Killavirus** · 08-25-2010, 01:27 PM

looks Awesome !!!

doubt i will be able to rely on pings though due to if the IIS server crashes it would still return a ping, ill be trying with http get commands but see'ing how to implement cmd prompts i should be ok but will post updates seeing how i get on !!

**Chippy** · 08-25-2010, 07:38 PM

Use the WinHttpRequest object with:

.Open "GET", "http://www.yourwebsite.com/page.html", False
.Send

Then look at the Status or StatusText properties to determine the http response status.