자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Delphi RESTClient에서 POST가 안되요!!!

2016.01.27 15:11

카이로스 조회 수:1288

본 게시판 사용시 당부 사항
* 이 게시판은 자유롭게 질문을 올리고 자발적으로 답변을 공유하는 게시판입니다.
* 어느 누구도 답변을 달아야만 하는 책임은 없습니다.
* 따라서 질문을 올리실 때에는 최대한 자세하고 정중하게 질문을 올려 주세요.
* 최대한 질문을 자세히 올려야 답변도 자세히 올라 옵니다.
* 본 질문에 답변을 주시는 여러 개발자님들께 미리 감사드립니다.
-----------------------------------------------------------------------------------------------
 

==>요청 Json

 

bibliotheca.kr:8080/api/itif/saleInfo.json

{ "AuthKey" : "AD09FASD9F7A9S8D7F98AS7D",

  "Count" : 1,

  "Sales" : [

     {

      "PosNo" : "2015000001",

      "SaleNo" : "2015102100001",

      "SaleSeq" : "1",

      "SaleDate" : "2015-10-21 13:23:34",

      "No" : "1",

      "Isbn" : "9788901234568",

      "Serial" : "",

      "MappKey" : "",

      "Title" : "테스트서명2",

      "Author" : "테스트저자2",

      "Publisher" : "테스트출판사2",

      "PublicationDate" : "2015-10-22",

      "Price" : 10000,

      "SaleCount" : 1,

      "SaleRate" : 90.0,

      "Division" : "판매구분",

      "StockCount" : 9,

      "Comment" : "비고"

   }

]

}

 

==> 응답

{ "Response": {"Result": {"Message": "정상",

                                        "Code": "OK"

      }

  }

}

 

  RESTClient1.BaseURL := 'bibliotheca.kr:8080/api/itif/saleInfo.json';
  RESTRequest1.Accept := 'application/json';
  RESTRequest1.Method := TRESTRequestMethod.rmPOST;
  RESTRequest1.Resource := '';

 

  RESTRequest1.Params.Clear;

  RESTRequest1.Params.AddItem('AuthKey', "AD09FASD9F7A9S8D7F98AS7D", TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('Count', '1' TRESTRequestParameterKind.pkGETorPOST);

 

  RESTRequest1.Params.AddItem('posno', edtSalePosNo.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('saleno', edtSalesaleNo.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('saleseq', edtSaleSaleSeq.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('saledate', edtSaleSaleDate.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('no', edtSaleNo.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('isbn', edtSaleIsbn.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('serial', edtSaleSerial.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('mappkey', edtSaleMappKey.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('title', edtSaleTitle.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('author', edtSaleAuthor.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('publisher', edtSalePublisher.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('publicationdate', edtPublicationDate.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('price', edtSalePrice.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('salerate', edtSaleSaleRate.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('salecount', edtSaleSaleCount.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('division', edtSaleDivision.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('stockcount', edtSaleStockCount.Text, TRESTRequestParameterKind.pkGETorPOST);
  RESTRequest1.Params.AddItem('comment', edtSaleComment.Text, TRESTRequestParameterKind.pkGETorPOST);

 

  RESTRequest1.Execute;

 

위처럼 하면

HTTP/1.1 415 Unsupported Media Type

에러 메시지가 나타납니다.

 

더 진행이 안되요^^

조언 부탁드립니다~~~

 

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 19438
공지 유용한 관련 사이트 관리자2 2014.03.20 58352
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 101858
413 델파이 프로그램 배포 후 오류 [4] file gent 2019.09.17 895
412 Delphi 10.2 Tokyo dbExpress 및 FireDAC 문의 [4] file 엘트 2019.09.19 263
411 폼 생성과 해제 [1] 엽기토끼이요 2019.09.20 6643
410 delphi 10.3.2 TRestClient 구조가 변경된듯 [1] 미스터몽키 2019.09.22 346
409 firedac에서 alias사용한 쿼리를 edit하면 에러가 나네요. [1] fraha 2019.09.25 220
408 firedac으로 mssql 쿼리시 속도 [1] 빅비스 2019.09.27 177
407 NFC 관련 태블릿 안드로이드 개발 관련 자료 [1] file 미스터몽키 2019.09.28 595
406 폼 생성과 해제. [2] 엽기토끼이요 2019.09.29 505
405 StringGrid 의 이미지 넣은 후 해제 하는 질문 입니다. [4] 초보델팡이 2019.09.30 153
404 10.3 Starter Edition 관련 Overload 문제건 [2] 한태수 2019.09.30 121
403 Delphi 10.2 Indy Client Component 문의드립니다. [1] 엘트 2019.09.30 471
402 TParallel.For 코어 사용 이게 맞나요? [2] file 아크나톤 2019.09.30 313
401 핸드폰에서 이미지를 불러서 저장하는 부분을 잘몰라서요 [4] 종결자 2019.10.01 495
400 Byte value와 Hex Byte의 계산 문제 [2] 한태수 2019.10.02 390
399 rest api 사용해서 할때. [4] 종결자 2019.10.03 428
398 [긴급]안녕하세요 컴포넌트 오류에 대하여 질문을 드립니다. [3] file 소선 2019.10.04 408
397 array of byte를 TByte형으로 변환은 어떻게 하나요? [1] 한태수 2019.10.04 1057
396 Delphi5 oracle 18c 호환 [2] file 비니 2019.10.07 512
395 바탕화면 bds 실행 아이콘 이미지가 안보입니다. [1] file 거북선생 2019.10.07 245
394 Delphi7 횟수재한 [1] 모든길 2019.10.08 186