powered by simpleCommunicator - 2.0.52     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как в Access (VBA) использовать REST API mail
5 сообщений из 5, страница 1 из 1
Как в Access (VBA) использовать REST API mail
    #39705181
nickstarnew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Доброго времени суток!

Пробую из Access вызвать REST API mail, но не понимаю как это сделать.

Описание находиться по этому адресу http://api.mail.ru/docs/guides/restapi/ , описание функции здесь https://api.mail.ru/docs/reference/rest/friends-get/

Пишу такой код:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
Private Sub ch_REST_Click()

    Set objHTTP = CreateObject("MSXML2.XMLHTTP")
    Dim myxml As String

    myxml = "<?xml version=""1.0""?>" & _
            "<mydomain ver=""2.0"">" & _
            "<login_request>" & _
            "<login>soft@mail.ru<;/login>" & _
            "<password>Мой пароль</password>" & _
            "</login_request>" & _
            "</mydomain>"
            

    objHTTP.Open "POST", "http://www.appsmail.ru/platform/api?method=friends.get&app_id=423004&session_key = be6ef89965d58e56dec21acb9b62bdaa&sig=ee120d11bab79b5770af536ee05dfa78", False, myxml
    objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    objHTTP.send
    result = objHTTP.responseText   ' Get the result
    
    
    MsgBox (result)



но выходит ошибка код 102


Что делать?
...
Рейтинг: 0 / 0
Как в Access (VBA) использовать REST API mail
    #39705241
alecko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
может поможет 21404455
...
Рейтинг: 0 / 0
Как в Access (VBA) использовать REST API mail
    #39705317
Фотография vmag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
nickstarnew,

Я надеюсь в кнопке Логин и пароль свои а не из примера?
Логин без @mail.ru ?
session_key тоже свой реальный вычисленный, а не из примера?

Свой UID можно получить так (правая ссылка):
https://api.mail.ru/docs/guides/url-to-uid/
только в конце вместо grishin напиши то, что у тебя в ящике маил стоит до собаки

Так то в ошибке всё написано - UID не соответствует session_key...
UID скорее всего вычисляется по логину, а вот session_key нужен реальный на открытую сессию,
в документации - очень туманно... См. авторизацию запроса...
https://api.mail.ru/docs/guides/restapi/#session
...
Рейтинг: 0 / 0
Как в Access (VBA) использовать REST API mail
    #39705414
Фотография court
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
nickstarnew
Код: vbnet
1.
 objHTTP.Open "POST", "http://www.appsmail.ru/platform/api?method=friends.get&app_id=423004&session_key = be6ef89965d58e56dec21acb9b62bdaa&sig=ee120d11bab79b5770af536ee05dfa78", False, myxml

что это ??
посмотри какой параметр у XMLHTTP.Open на этом месте
Зачем вообще ты этот хмл формируешь ? Где про него в доке ?
Там ясно сказано, что вся авторизация через session_key и uid

авторДанные запроса могут передаваться в виде query-строки (после знака ?) при использовании метода GET, либо в теле POST-запроса.
ты сформировал УРЛ для ГЕТ, а отправляешь по ПОСТ
...
Рейтинг: 0 / 0
Как в Access (VBA) использовать REST API mail
    #39720813
nickstarnew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Sub ch_REST_Click()

    Set objHTTP = CreateObject("MSXML2.XMLHTTP")
    
    objHTTP.Open "GET", "http://**.***.***.**:****/api/user/login?Login=****&Password=****", False
    objHTTP.setRequestHeader "Content-Type", "application/xml"
    objHTTP.send
    result = objHTTP.responseText 
    MsgBox (result)

End Sub



Пока не добавил порт ругался что отказано в доступе, а после добавления порта в URL стала выходить ошибка: Сбой скачивания указанного ресурса. Что это может быть, может я не могу в IP адрес в строке использовать номер порта? Может какую команду пропустил?

Создается впечатление, что блокировка происходит на уровне шлюза (stunnel), но как его обойти не представляю...

Может кто имел опыт работы по REST через stunnel?
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как в Access (VBA) использовать REST API mail
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]