Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pure Basic

Войти
Регистрация
Восстановить пароль
 
mcleshiy
3 / 3 / 1
Регистрация: 05.05.2013
Сообщений: 143
#1

Запрос GET для QIWI - Pure Basic

19.01.2018, 18:54. Просмотров 352. Ответов 3
Метки нет (Все метки)

Драсьте. Вот код.
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
InitNetwork()
 
Global qiwi_token.s= ""
Global qiwi_number.s = "79619783527"
 
Procedure GetToken()
  If ReadFile(0, "qiwi token.txt")
    qiwi_token = ReadString(0)
    CloseFile(0)
  EndIf
EndProcedure
 
Procedure.s PostToHost(Host$, File$) 
  ConnectionID = OpenNetworkConnection(Host$, 80) 
  If ConnectionID 
    String$ = "" 
    String$ + "GET " + File$ + " HTTP/1.1" + Chr(13) + Chr(10)
    String$ + "Accept: application/json" + Chr(13) + Chr(10)
    String$ + "Content-Type: application/json" + Chr(13) + Chr(10)
    String$ + "Authorization: Bearer "+qiwi_token + Chr(13) + Chr(10)
    Debug String$
    SendNetworkString(ConnectionID, String$) 
    Repeat : Until NetworkClientEvent(ConnectionID) = 2 
    Buffer = AllocateMemory(10000) 
    ReceiveNetworkData(ConnectionID, Buffer, 10000) 
    CloseNetworkConnection(ConnectionID) 
    ProcedureReturn PeekS(Buffer) 
  EndIf 
EndProcedure 
 
GetToken()
 
 
Debug PostToHost("edge.qiwi.com", "/person-profile/v1/profile/current")
Debug PostToHost("edge.qiwi.com", "/payment-history/v1/persons/"+qiwi_number+"/payments?rows=10")
 
; user@server:~$ curl "https://edge.qiwi.com/payment-history/v1/persons/79112223344/payments?rows=10"
;   --header "Accept: application/json"
;   --header "Content-Type: application/json"
;   --header "Authorization: Bearer YUu2qw048gtdsvlk3iu"
; Send
ответы не приходят, но если

PureBasic
1
Debug PostToHost("edge.qiwi.com", "/person-profile/v1/profile/current")
заменить на
PureBasic
1
Debug PostToHost("edge.qiwi.com", "person-profile/v1/profile/current")
придёт код ошибки 400, т.е. сервер получает данные. что я делаю не так?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.01.2018, 18:54
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Запрос GET для QIWI (Pure Basic):

Форма для входа на сайт для совершения платежей Qiwi - Visual Basic .NET
Хочу сделать программу для Qiwi кошелька. Вот накидал примерный интерфейс. Но не могу правильно указать код, для формы входа на сайт....

Бот для qiwi/webmoney - C++
Собственно нужен бот, который будет проверять новые платежи. При поступления нового бот: проверяет сумму, записывает комментарий к оплате в...

Все в Qiwi - Электронные деньги
Ребят, мне нужно обменять Яндекс.Деньги и Webmoney на Qiwi Резерв: 16.01 WMZ - Webmoney 175 WMR - Webmoney 576 руб. 96 коп -...

Работа БД с qiwi - PHP
Всем привет) Как реализовать такой скрипт? Вот например мне на qiwi пришло 5 рулей и в коментариях было написано например "Привет", то...

Python и Qiwi - Python
Здравствуйте как с помощью питона , авторизоваться на киви , и возвратить из отчетов преведеннную сумму

Qiwi класс - PHP
Есть qiwi класс Есть скрипт написанный для этого класса Но проблема заключается в том, чтобы мне его проверять и дополнять, постоянно...

3
locm
2039 / 798 / 75
Регистрация: 28.10.2011
Сообщений: 2,426
Записей в блоге: 2
19.01.2018, 20:33 #2
PureBasic
1
String$ + "Authorization: Bearer "+qiwi_token + Chr(13) + Chr(10) + Chr(13) + Chr(10)
0
mcleshiy
3 / 3 / 1
Регистрация: 05.05.2013
Сообщений: 143
19.01.2018, 23:03  [ТС] #3
эмм... только вот постоянно приходит код 400. документация говорит, что неверный синтаксис, если посылать запрос как вы указали
0
Faiotti
Нарушитель
28 / 29 / 6
Регистрация: 24.01.2018
Сообщений: 132
01.02.2018, 03:22 #4
Следует найти исходник на каком-либо другом языке, отсылающий какой-либо запрос к этому API.
С этим API не работал, но посмотрел документацию и вижу примеры как минимум на curl.

После этого следует сравнить тот и другой запрос с помощью сниффера - например, Fiddler - и плясать от этого.
0
01.02.2018, 03:22
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.02.2018, 03:22
Привет! Вот еще темы с ответами:

Авторизация на qiwi - PHP Сети
Добрый день, прошу помощи, не могу авторизироватся на qiwi, вот код $USER_LOGIN = "XXXX"; $USER_PASSWORD = "XXXX"; ...

Python QIWI - Python
Привет всем, как авторизоваться сейчас в киви? API не предлагать его сложно получить, пробовал через requests, но не подхватывает

Проверка QIWI - PHP
Всем привет! Уважаемые программисты, подскажите, пожалуйста, как проверить платеж киви? Сейчас много интернет-магазинов где оплата через...

Запрос, использующие в качестве источника данных предыдущий запрос (сумма всех заказов для каждого заказчика) - MS Access
Здравствуйте! Буду рада любой помощи. Ситуация следующая: имеется запрос, который для каждого заказчика рассчитывает сумму его заказа на...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.