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
(Visual FoxPro) ETrade Get QuoteShows how to send a GET for a stock quote using ETrade with OAuth1 authorization.
LOCAL loHttp LOCAL loJson LOCAL lnSuccess LOCAL lcRespStr * This example assumes the Chilkat HTTP API to have been previously unlocked. * See Global Unlock Sample for sample code. loHttp = CreateObject('Chilkat_9_5_0.Http') loHttp.OAuth1 = 1 loHttp.OAuthVerifier = "" loHttp.OAuthConsumerKey = "ETRADE_CONSUMER_KEY" loHttp.OAuthConsumerSecret = "ETRADE_CONSUMER_SECRET" * Load the access token previously obtained via the OAuth1 3-Legged Authorization loJson = CreateObject('Chilkat_9_5_0.JsonObject') lnSuccess = loJson.LoadFile("qa_data/tokens/etrade.json") IF (lnSuccess <> 1) THEN ? "Failed to load OAuth1 token" RELEASE loHttp RELEASE loJson CANCEL ENDIF loHttp.OAuthToken = loJson.StringOf("oauth_token") loHttp.OAuthTokenSecret = loJson.StringOf("oauth_token_secret") lcRespStr = loHttp.QuickGetStr("https://etwssandbox.etrade.com/market/sandbox/rest/quote/MSFT?detailFlag=ALL") IF (loHttp.LastMethodSuccess <> 1) THEN ? loHttp.LastErrorText RELEASE loHttp RELEASE loJson CANCEL ENDIF * The response is XML. A sample response is shown below. ? lcRespStr ? "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> RELEASE loHttp RELEASE loJson |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.