Аутентификация GitHub API с помощью MSXML2.XMLHTTP

Я пытаюсь пройти аутентификацию в GitHub API с помощью базовой аутентификации с использованием MSXML2.XMLHTTP. Я понимаю, что мне нужно передать свои учетные данные, используя HTTP-заголовок авторизации.

Итак, это мой код, но он всегда возвращается без проверки подлинности. (Согласно документации GitHub API, с ошибкой 404/Not Found). Что я делаю не так? (Очевидно, что код не использует мои настоящие учетные данные, а только «пользователь» и «пароль» в качестве примера).

Dim o
Set o = CreateObject("MSXML2.XMLHTTP")
o.open "GET", "https://api.github.com/user/", False, "user", "password"
o.setRequestHeader "Authorization", "Basic dXNlcjpwYXNzd29yZA=="
o.send
Wscript.Echo o.responseText

github github-api vbscript
person mydoghasworms    schedule 01.03.2015    source источник
comment
используя ваш скрипт, я получаю {сообщение: Not Found,documentation_url:developer.github.com/v3}. Если я делаю /users/scandox, я получаю свои данные.   -  person Daniel C    schedule 01.03.2015
comment
@DanielC Проблема в том, как указывает Кул-Тигин в своем ответе.   -  person mydoghasworms    schedule 04.03.2015

Ответы (1)


arrow_upward
2
arrow_downward

Мой предыдущий ответ был основан на недоразумении, поэтому я удалил его.
Конечная косая черта в конечных точках Github API действительно имеет значение, /user и /user/ не равны. Вы получаете настоящий 404 Not Found, а не один из ответов Github, связанных с обходным решением 404, связанным с авторизацией.
Это сработает:

Dim o
Set o = CreateObject("MSXML2.XMLHTTP")
o.open "GET", "https://api.github.com/user", False
o.setRequestHeader "Authorization", "Basic dXNlcjpwYXNzd29yZA=="
o.send
Wscript.Echo o.responseText
person Kul-Tigin    schedule 04.03.2015