Groups | Search | Server Info | Keyboard shortcuts | Login | Register
Groups > comp.lang.basic.misc > #463
| Path | csiph.com!4.us.feeder.erje.net!2.eu.feeder.erje.net!feeder.erje.net!1.eu.feeder.erje.net!fu-berlin.de!uni-berlin.de!individual.net!not-for-mail |
|---|---|
| From | Rob <gbzrope@gmail.com> |
| Newsgroups | comp.lang.basic.misc |
| Subject | WinHTTP problems |
| Date | Tue, 22 Jan 2019 13:28:44 -0000 |
| Lines | 35 |
| Message-ID | <VA.000000b6.4f005841@gmail.com> (permalink) |
| Mime-Version | 1.0 |
| Content-Type | text/plain; charset=iso-8859-1 |
| Content-Transfer-Encoding | 8bit |
| X-Trace | individual.net 2kyQVRavuF1tDC7bD18qTAS4n7AutwXWgX8idqj7Vfym/gySkI |
| Cancel-Lock | sha1:rxfWT/63158zKf8XN6sJljnuY5I= |
| X-Newsreader | Virtual Access Open Source http://www.virtual-access.org/ |
| Xref | csiph.com comp.lang.basic.misc:463 |
Show key headers only | View raw
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?
Back to comp.lang.basic.misc | Previous | Next — Next in thread | Find similar
WinHTTP problems Rob <gbzrope@gmail.com> - 2019-01-22 13:28 +0000
Re: WinHTTP problems Wolfgang Εnzinger <we_usenet@nurfuerspam.de> - 2019-02-16 23:56 +0100
Re: WinHTTP problems Wolfgang Εnzinger <we_usenet@nurfuerspam.de> - 2019-02-17 00:12 +0100
Re: WinHTTP problems Wolfgang Εnzinger <we_usenet@nurfuerspam.de> - 2019-03-02 21:31 +0100
csiph-web