TradeFunc_DoPostRequest

TradeFunc_DoPostRequest(payload, openSearchInBrowser = false) {
	UserAgent   := TradeGlobals.Get("UserAgent")
	cfduid      := TradeGlobals.Get("cfduid")
	cfClearance := TradeGlobals.Get("cfClearance")

	/* Not working yet, no response
	postData := payload
	payLength:= StrLen(payload)
	reqHeaders =
		(LTrim
			Content-type: application/html
			Host: poe.trade
			Connection: keep-alive
			Content-Length: %payLength%
			Cache-Control: max-age=0
			Origin: http://poe.trade
			Upgrade-Insecure-Requests: 1
			Content-type: application/x-www-form-urlencoded
			Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
			Referer: http://poe.trade/
		)
	If (StrLen(UserAgent)) {
		options .= "`nUser-Agent: " UserAgent
		options .= "`nCookie: __cfduid= " cfduid "; cf_clearance= " cfClearance
	}
	options =
		(LTrim
			Charset: UTF-8
			Method: POST
		)
	If (openSearchInBrowser) {
		options .= "`nNO_AUTO_REDIRECT"
	}

	html := ""
	html := PoEScripts_Download("http://poe.trade/search", ioData := postData, ioHdr := reqHeaders, options, false)
	*/

	ComObjError(0)
	Encoding := "utf-8"
    ;Reference in making POST requests - http://stackoverflow.com/questions/158633/how-can-i-send-an-http-post-request-to-a-server-from-excel-using-vba
	HttpObj := ComObjCreate("WinHttp.WinHttpRequest.5.1")
	If (openSearchInBrowser) {
		HttpObj.Option(6) := False
	}

	HttpObj.Open("POST","http://poe.trade/search")
	HttpObj.SetRequestHeader("Host","poe.trade")
	HttpObj.SetRequestHeader("Connection","keep-alive")
	HttpObj.SetRequestHeader("Content-Length",StrLen(payload))
	HttpObj.SetRequestHeader("Cache-Control","max-age=0")
	HttpObj.SetRequestHeader("Origin","http://poe.trade")
	HttpObj.SetRequestHeader("Upgrade-Insecure-Requests","1")
	HttpObj.SetRequestHeader("User-Agent", UserAgent)
	HttpObj.SetRequestHeader("Content-type","application/x-www-form-urlencoded")
	HttpObj.SetRequestHeader("Accept","text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8")
	HttpObj.SetRequestHeader("Referer","http://poe.trade/")

	HttpObj.SetRequestHeader("Cookie","__cfduid=" cfduid "; cf_clearance=" cfClearance)
    ;HttpObj.SetRequestHeader("Accept-Encoding","gzip;q=0,deflate;q=0") ; disables compression
    ;HttpObj.SetRequestHeader("Accept-Encoding","gzip, deflate")
    ;HttpObj.SetRequestHeader("Accept-Language","en-US,en;q=0.8")
	HttpObj.SetRequestHeader("Cookie","__cfduid=" cfduid "; cf_clearance=" cfClearance)
	HttpObj.Send(payload)
	HttpObj.WaitForResponse()

	Try {
		If Encoding {
			oADO          := ComObjCreate("adodb.stream")
			oADO.Type     := 1
			oADO.Mode     := 3
			oADO.Open()
			oADO.Write(HttpObj.ResponseBody)
			oADO.Position := 0
			oADO.Type     := 2
			oADO.Charset  := Encoding
			html := oADO.ReadText()
			oADO.Close()
		}
	} Catch e {
		html := HttpObj.ResponseText
		If (TradeOpts.Debug) {
			MsgBox % e
		}
	}

	If A_LastError
		MsgBox % A_LastError

	FileDelete, %A_Scriptdir%\result.txt
	FileAppend, %html%, %A_Scriptdir%\result.txt

	Return, html
}