We have been using below snippet in Excel Macro VBA for connecting JIRA and pulling the details. But it is not working anymore and throwing below error.Please help.
Error:
| Unauthorized (401) |
| |
| Encountered a "401 - Unauthorized" error while loading this page. |
| |
| Go to Jira home |
Snippet:
weburl = "***************"
Dim objHTTP As New MSXML2.XMLHTTP
Dim strUserName As String
Dim strPassword As String
Dim stroutput As String
strUserName = "************"
strPassword = "***************"
strURL = weburl
objHTTP.Open "GET", weburl, False
objHTTP.setRequestHeader "Authorization", "Basic " & Base64Encode(strUserName & ":" & strPassword)
objHTTP.setRequestHeader "Content-Type", "text"
objHTTP.send "Nothing"
stroutput = objHTTP.responseText