Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как в Access (VBA) использовать REST API mail / 5 сообщений из 5, страница 1 из 1
19.09.2018, 18:12
    #39705181
nickstarnew
nickstarnew
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в Access (VBA) использовать REST API mail
Доброго времени суток!

Пробую из 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
| Ответить | Цитировать | Написать  
19.09.2018, 20:54
    #39705241
alecko
alecko
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в Access (VBA) использовать REST API mail
может поможет 21404455
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.09.2018, 01:09
    #39705317
vmag
vmag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в Access (VBA) использовать REST API mail
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
| Ответить | Цитировать | Написать  
20.09.2018, 09:37
    #39705414
court
court
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в Access (VBA) использовать REST API mail
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
| Ответить | Цитировать | Написать  
22.10.2018, 11:50
    #39720813
nickstarnew
nickstarnew
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как в Access (VBA) использовать REST API mail
Код: 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
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как в Access (VBA) использовать REST API mail / 5 сообщений из 5, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 426ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1611091]:
 0ms
get settings:
 8ms
get forum list:
 11ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 28ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 41ms
get tp. blocked users:
 1ms
others: 318ms
total:  426ms
x
x
Закрыть


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