Skip to content

Commit

Permalink
Fix Http return
Browse files Browse the repository at this point in the history
  • Loading branch information
QuentinLemCode committed Dec 11, 2017
1 parent 8a9fc57 commit 16a94a3
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions 3270_lib.au3
Original file line number Diff line number Diff line change
Expand Up @@ -239,12 +239,12 @@ Func __HttpGet($sURL, $sData = "")
Local $oHTTP = ObjCreate("Microsoft.XMLHTTP")
Local $sRequest = $sURL & $sData
$oHTTP.Open("GET", $sRequest, False)
If (@error) Then Return SetError(1, 0, 0)
If (@error) Then Return SetError(1, 0, "Error with request : " & $sRequest)

$oHTTP.withCredentials = True
$oHTTP.send()

If (@error) Then Return SetError(2, 0, 0)
If (@error) Then Return SetError(2, 0, "Error with request : " & $sRequest)

Return SetError(0, 0, "Request : " & $sRequest & @CRLF & $oHTTP.responseText)
Return SetError(0, 0, $oHTTP.responseText)
EndFunc ;==>__HttpGet

0 comments on commit 16a94a3

Please sign in to comment.