Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / PUT json / 7 сообщений из 7, страница 1 из 1
28.04.2017, 00:30
    #39445795
style1
style1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PUT json
Здравствуйте! Пытаюсь создать запись на сервере, получаю

Код: javascript
1.
2.
3.
4.
5.
6.
7.
8.
{
  "timestamp" : "2017-04-28T00:26:24+0300",
  "status" : 400,
  "error" : "Bad Request",
  "exception" : "org.springframework.http.converter.HttpMessageNotReadableException",
  "message" : "Bad Request",
  "path" : "/1.0/user/backlog"
}



Что может быть не так?

процедура:
Код: vbnet
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.
    Set http = CreateObject("MSXML2.XMLHTTP")
    http.Open "PUT", sBaseUrl & "/1.0/user/backlog", False
    http.setRequestHeader "Content-Type", "application/json;charset=UTF-8"
    http.setRequestHeader "Authorization", "AccessToken " & sToken
    http.setRequestHeader "X-User-Authorization", sAuthoriztion
    
    
Dim bPOST() As Byte, PostData As String
    PostData = PostData & "{"
    PostData = PostData & ",""address-type-to"":""DEFAULT"""
    PostData = PostData & ",""given-name"":""" & GET_PersonalName_By_Type(tFirmContragent, "N") & """"
    PostData = PostData & ",""house-to"":""" & GET_House_By_Address(tClientAddress) & """"
    PostData = PostData & ",""index-to"":" & GET_PostCode_By_AddressDatas(tClientAddress_Datas)
    PostData = PostData & ",""mail-category"":""" & CategoryRPO & """"
    PostData = PostData & ",""mail-direct"":643"
    PostData = PostData & ",""mail-type"":""" & TypeRPO & """"
    PostData = PostData & ",""mass"":" & iWeight
    PostData = PostData & ",""middle-name"":""" & GET_PersonalName_By_Type(tFirmContragent, "P") & """"
    PostData = PostData & ",""order-num"":""" & Format(nz(Me.Controls(Me!txt_Frm_Prfx & "ID"), 0), "000000") & """"
    PostData = PostData & ",""place-to"":""" & GET_City_By_AddressDatas(tClientAddress_Datas) & """"
    PostData = PostData & ",""insr-value"":" & nz(Me.Controls(Me!txt_Frm_Prfx & "Sum_Declared_Value"), 0) * 100
    PostData = PostData & ",""postoffice-code"":""" & 111033 & """"
    PostData = PostData & ",""region-to"":""" & GET_RegionName_By_AddressDatas(tClientAddress_Datas) & """"
    PostData = PostData & ",""street-to"":""" & GET_Street_By_AddressDatas(tClientAddress_Datas) & """"
    PostData = PostData & ",""surname"":""" & GET_PersonalName_By_Type(tFirmContragent, "S") & """"
    PostData = PostData & ",""tel-address"":" & tFirmContragent_Phone
    PostData = PostData & ",""fragile"":false"
    PostData = PostData & "}"
    
    bPOST = StrConv(PostData, vbFromUnicode)
    http.send (bPOST)

    
    GetText = GET_JSON_decode(http.ResponseText)
    Set http = Nothing
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.04.2017, 09:40
    #39445875
UTF-8,
UTF-8,
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PUT json
style1,

пишешь, что будешь передавать данные в
Код: vbnet
1.
charset=UTF-8"


а по факту, передаёшь в "default code page of the system" (который наверняка не UTF-8)
Код: vbnet
1.
bPOST = StrConv(PostData, vbFromUnicode)


это как минимум
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.04.2017, 11:19
    #39445951
style1
style1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PUT json
UTF-8,,
в UTF-8 строку тоже переводил... такой же ответ
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.04.2017, 12:12
    #39446008
aleks2
aleks2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PUT json
Есть такая хрень Telerik Fiddler Web Debugger. Бесплатная.

Позволяет увидеть любой вебзапрос с вашего компутера.

1. Можно увидеть.
2. Если есть возможность отправить правильный запрос "другими средствами" - можно сравнить.
3. И починить.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.04.2017, 17:41
    #39446286
style1
style1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PUT json
aleks2,

Удобная программка, спасибо.
Ничем она мне правда не помогла.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.04.2017, 09:07
    #39446450
UTF-8,
UTF-8,
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PUT json
style1UTF-8,,
в UTF-8 строку тоже переводил... такой же ответпоказывай, как "переводил"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.04.2017, 10:06
    #39446471
style1
style1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PUT json
UTF-8,,
вот здесь взял функцию http://www.sql.ru/forum/1004364/opentextfile-utf-8?hl=encodeutf8
EncodeUTF8()

запрос
Код: java
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
{
"address-type-to":"DEFAULT",
"given-name":"Александр",
"house-to":"123",
"index-to":236010,
"mail-category":"SIMPLE",
"mail-direct":643,
"mail-type":"POSTAL_PARCEL",
"mass":120,
"middle-name":"",
"order-num":"000210",
"place-to":"Калининград г",
"postoffice-code":"111033",
"region-to":"Калининградская обл",
"street-to":"Красносельская ул",
"surname":"Качинский",
"tel-address":89161234567,
"fragile":false
}
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / PUT json / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 451ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1612488]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 30ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 48ms
get tp. blocked users:
 2ms
others: 324ms
total:  451ms
x
x
Закрыть


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