WooComerce API Autenticação - JOB

[intelmib]

Olá

Preciso realizar autenticação na API do woocomerce, já fiz o DEMO só falta corrigir detalhes

Quem tiver interessado pago pelo JOB.

Obrigado

 

Uses REST.Consts
      ,REST.Types
      ,REST.BindSource
      ,REST.HttpClient
      ,REST.Utils
      ,REST.Json.Types
      ,REST.Json.Interceptors
      ,REST.JsonReflect
      ,REST.Json
      ,REST.Client;

 

procedure TForm1.btnTeste02Click(Sender: TObject);
begin
  WOO_OAuth1Authenticator1.ConsumerKey := '';
  WOO_OAuth1Authenticator1.ConsumerSecret := '';
  WOO_OAuth1Authenticator1.SigningClassName := 'TOAuth1SignatureMethod_HMAC_SHA1';
  WOO_OAuth1Authenticator1.CallbackEndpoint := '';
  //oauth1.Authenticate(RESTRequest1);

  WOO_RESTClient1.Authenticator := WOO_OAuth1Authenticator1;

  WOO_RESTClient1.BaseURL := 'http://SITE.com.br/wc-api/v3';

  WOO_RESTRequest1.Client := WOO_RESTClient1;

  WOO_RESTRequest1.Resource := 'products';

  WOO_RESTRequest1.Method := TRESTRequestMethod.rmPOST;
  WOO_RESTRequest1.Params.AddItem('title', 'produto teste', TRESTRequestParameterKind.pkGETorPOST);

  WOO_RESTRequest1.Execute;

  if assigned(WOO_RESTResponse1.JSONValue) then
  begin
    Memo1.Lines.Text := TJson.Format(WOO_RESTResponse1.JSONValue)
  end
  else
  begin
    Memo1.Lines.Add(WOO_RESTResponse1.Content);
  end;
end;

 

[ecreativus]

Olá, qual seu e-mail para te enviar uma proposta?

[xyberx]

 Eu já fiz algumas coisas da integração com woocomerce , manda um mail para [email protected] VLW.

[intelmib]

[email protected]