Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Xojo Plugin) BrickLink OAuth1 using Chilkat RESTSee more BrickLink ExamplesDemonstrates sending an api.bricklink.com request with OAuth1 authentication using Chilkat REST. Note: This example requires Chilkat v9.5.0.91 or greater (due to adjustments made within Chilkat to support bricklink OAuth1 needs). For more information, see https://www.bricklink.com/v3/api.page?page=auth
// This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. Dim oauth1 As New Chilkat.OAuth1 oauth1.ConsumerKey = "Your Consumer Key" oauth1.ConsumerSecret = "Your Consumer Secret" oauth1.Token = "Your OAuth1 Token" oauth1.TokenSecret = "Your Token Secret" oauth1.SignatureMethod = "HMAC-SHA1" Dim success As Boolean Dim rest As New Chilkat.Rest success = rest.SetAuthOAuth1(oauth1,False) success = rest.Connect("api.bricklink.com",443,True,True) If (success = False) Then System.DebugLog(rest.LastErrorText) Return End If Dim sbResponse As New Chilkat.StringBuilder success = rest.FullRequestNoBodySb("GET","/api/store/v1/orders?direction=in",sbResponse) If (success = False) Then System.DebugLog(rest.LastErrorText) Return End If System.DebugLog("Response status code = " + Str(rest.ResponseStatusCode)) Dim json As New Chilkat.JsonObject success = json.LoadSb(sbResponse) json.EmitCompact = False System.DebugLog(json.Emit()) |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.