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
(DataFlex) ETrade Get QuoteShows how to send a GET for a stock quote using ETrade with OAuth1 authorization.
Use ChilkatAx-9.5.0-win32.pkg Procedure Test Handle hoHttp Handle hoJson Boolean iSuccess String sRespStr String sTemp1 Boolean bTemp1 // This example assumes the Chilkat HTTP API to have been previously unlocked. // See Global Unlock Sample for sample code. Get Create (RefClass(cComChilkatHttp)) To hoHttp If (Not(IsComObjectCreated(hoHttp))) Begin Send CreateComObject of hoHttp End Set ComOAuth1 Of hoHttp To True Set ComOAuthVerifier Of hoHttp To "" Set ComOAuthConsumerKey Of hoHttp To "ETRADE_CONSUMER_KEY" Set ComOAuthConsumerSecret Of hoHttp To "ETRADE_CONSUMER_SECRET" // Load the access token previously obtained via the OAuth1 3-Legged Authorization Get Create (RefClass(cComChilkatJsonObject)) To hoJson If (Not(IsComObjectCreated(hoJson))) Begin Send CreateComObject of hoJson End Get ComLoadFile Of hoJson "qa_data/tokens/etrade.json" To iSuccess If (iSuccess <> True) Begin Showln "Failed to load OAuth1 token" Procedure_Return End Get ComStringOf Of hoJson "oauth_token" To sTemp1 Set ComOAuthToken Of hoHttp To sTemp1 Get ComStringOf Of hoJson "oauth_token_secret" To sTemp1 Set ComOAuthTokenSecret Of hoHttp To sTemp1 Get ComQuickGetStr Of hoHttp "https://etwssandbox.etrade.com/market/sandbox/rest/quote/MSFT?detailFlag=ALL" To sRespStr Get ComLastMethodSuccess Of hoHttp To bTemp1 If (bTemp1 <> True) Begin Get ComLastErrorText Of hoHttp To sTemp1 Showln sTemp1 Procedure_Return End // The response is XML. A sample response is shown below. Showln sRespStr Showln "success." // Sample XML response: // <QuoteResponse> // <QuoteData> // <all> // <adjNonAdjFlag>false</adjNonAdjFlag> // <annualDividend>0.52</annualDividend> // <ask>28.71</ask> // <askExchange>NASDAQ National Market Sys (NMS)</askExchange> // <askSize>15600</askSize> // <askTime>12:14:22 EST 02-24-2010</askTime> // <bid>28.7</bid> // <bidExchange></bidExchange> // <bidSize>15600</bidSize> // <bidTime>12:14:22 EST 02-24-2010</bidTime> // <chgClose>-0.3400000000000001</chgClose> // <chgClosePrcn>-15.11</chgClosePrcn> // <companyName>MICROSOFT CORP</companyName> // <daysToExpiration>0</daysToExpiration> // <dirLast>U</dirLast> // <dividend>0.13</dividend> // <eps>1.81</eps> // <estEarnings>1.811</estEarnings> // <exDivDate>11/17/2009</exDivDate> // <exchgLastTrade>Pacific</exchgLastTrade> // <fsi>N</fsi> // <high>28.77</high> // <high52>31.5</high52> // <highAsk>28.77</highAsk> // <highBid>28.76</highBid> // <lastTrade>28.705</lastTrade> // <low>28.38</low> // <low52>14.87</low52> // <lowAsk>28.39</lowAsk> // <lowBid>28.0</lowBid> // <numTrades>61376</numTrades> // <open>28.52</open> // <openInterest>0</openInterest> // <optionStyle></optionStyle> // <optionUnderlier></optionUnderlier> // <prevClose>28.73</prevClose> // <prevDayVolume>75648887</prevDayVolume> // <primaryExchange>Q</primaryExchange> // <symbolDesc>MICROSOFT CORP</symbolDesc> // <todayClose>0.0</todayClose> // <totalVolume>22403011</totalVolume> // <upc>0</upc> // <volume10Day>56676460</volume10Day> // </all> // <dateTime>12:14:22 EST 02-24-2010</dateTime> // <product> // <symbol>MSFT</symbol> // <type>EQ</type> // <exchange>Q</exchange> // </product> // </QuoteData> // </QuoteResponse> End_Procedure |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.