Dim xmlhttp
Set xmlhttp = WScript.CreateObject("Msxml2.XMLHTTP")
xmlhttp.open "get","http://qtpcomplete.blogspot.com",false
xmlhttp.send()
WScript.StdOut.WriteLine xmlhttp.responseText
Set xmlhttp = WScript.CreateObject("Msxml2.XMLHTTP")
xmlhttp.open "get","http://qtpcomplete.blogspot.com",false
xmlhttp.send()
WScript.StdOut.WriteLine xmlhttp.responseText
No comments:
Post a Comment