Skip to content

Instantly share code, notes, and snippets.

@JoeGlines
Created April 25, 2022 11:37
Show Gist options
  • Save JoeGlines/7ff6ff93b88bc43d1537bd365bb33fb1 to your computer and use it in GitHub Desktop.
Save JoeGlines/7ff6ff93b88bc43d1537bd365bb33fb1 to your computer and use it in GitHub Desktop.
;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses. They're structured in a way to make learning AHK EASY
; Right now you can get a coupon code here: https://the-Automator.com/Learn
;*******************************************************
#SingleInstance,Force
;**************************************
API_Token:="XXXXXXXXXXXPut your API token hereXXXXXXXXXXXXXXXXX"
QueryString:=QueryString_Builder({"address":"836 Kilbridge Lane","citystatezip":"Coppell,TX","zws-id":API_Token})
;~ QueryString:=QueryString_Builder({"address":"31 Boulevard terrace","citystatezip":"Novato,CA","zws-id":API_Token})
EndPoint:="http://www.zillow.com/webservice/GetDeepSearchResults.htm"
;***********API call to Zillow*******************
HTTP := ComObjCreate("WinHttp.WinHttpRequest.5.1")
HTTP.Open("GET", EndPoint . QueryString)
HTTP.Send()
MsgBox % HTTP.ResponseText
;~ SciTE_Output(HTTP.ResponseText) ;Text,Clear=1,LineBreak=1,Exit=0
;~ SciTE_Output(sXML_Pretty(HTTP.ResponseText," ")) ;Text,Clear=1,LineBreak=1,Exit=0
;***********Query string builder*******************
QueryString_Builder(kvp){
for key, value in kvp
queryString.=((A_Index="1")?(url "?"):("&")) key "=" value
return queryString
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment