Skip to content

Instantly share code, notes, and snippets.

@pushmon
Created February 22, 2012 18:14
Show Gist options
  • Save pushmon/1886432 to your computer and use it in GitHub Desktop.
Save pushmon/1886432 to your computer and use it in GitHub Desktop.
VBScript
On Error Resume Next
Dim http, urlString
urlString = "http://pshmn.com/eaFnY"
Set http = CreateObject("Msxml2.ServerXMLHTTP")
http.Open "GET", urlString
http.Send
Set http = Nothing
If err.Number <> 0 Then
' log error
End If
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment