Groups > comp.lang.basic.visual.misc > #2378

WinHTTP problems

Path	csiph.com!aioe.org!news.mixmin.net!news.unit0.net!fu-berlin.de!uni-berlin.de!individual.net!not-for-mail
From	Rob <gbzrope@gmail.com>
Newsgroups	comp.lang.basic.visual.misc
Subject	WinHTTP problems
Date	Tue, 22 Jan 2019 13:28:43 -0000
Lines	40
Message-ID	<VA.000000b5.4f0056ba@gmail.com> (permalink)
Mime-Version	1.0
Content-Type	text/plain; charset=iso-8859-1
Content-Transfer-Encoding	8bit
X-Trace	individual.net DHFp+khjdJOdTElYy/xQeQmMHL7G3dBK6p84B5aUWxf0bRwj+9
Cancel-Lock	sha1:+Cq0SjzjWUNEMq9tJlKl2q8Pc+g=
X-Newsreader	Virtual Access Open Source http://www.virtual-access.org/
Xref	csiph.com comp.lang.basic.visual.misc:2378

Show key headers only | View raw

Hi,

I have a *large* legacy program written in VB6,  Very successfull, 
works fine on all flavours of Windows up to and including 10

Now I need to communicate with a third party using TML Basic Auth and 
JSON.

SO far I have created some short code to test the communications:

Dim HttpReq As New WinHttp.WinHttpRequest

HttpReq.SetCredentials "<username>", "<password>", 0


 HttpReq.Open "PUT", "https://<API URL>", False
 
 
 HttpReq.setRequestHeader "Content-Type", "application/json"
 
 HttpReq.Send " "
 
 HttpReq.Send "GET https://<API URL>"
 
 Both the Send methods result in:
 {
    "status": "error",
    "code": 401,
    "message": "Access denied"
}


The sane credentials do work OK in Postman app.

What am I missing or doing wrong please?

-- 
RobP

Back to comp.lang.basic.visual.misc | Previous | Next — Next in thread | Find similar | Unroll thread

Thread

WinHTTP problems Rob <gbzrope@gmail.com> - 2019-01-22 13:28 +0000
  Re: WinHTTP problems Wolfgang  Εnzinger <we_usenet@nurfuerspam.de> - 2019-02-17 13:09 +0100

csiph-web