VB.NET

REST Auto Reconnect for Multiple Requests (dev.markitondemand.com)

See more REST Examples

Demonstrates how the autoReconnect argument to the Connect method is used. VB.NET

Dim success As Boolean = False

' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim rest As New Chilkat.Rest

' This example demonstrates the usage of the autoReconnect argument to the Connect method.
' When autoReconnect is on, subsequent REST method calls will automatically re-connect
' if necessary, using the same information (domain/IP address, port number, and TLS).
Dim bTls As Boolean = False
Dim port As Integer = 80
Dim bAutoReconnect As Boolean = True
success = rest.Connect("dev.markitondemand.com",port,bTls,bAutoReconnect)

' Get a stock quote:
success = rest.AddQueryParam("symbol","AAPL")
Dim responseXml As String = rest.FullRequestNoBody("GET","/MODApis/Api/v2/Quote")
If (rest.LastMethodSuccess <> True) Then
    Debug.WriteLine(rest.LastErrorText)
    Exit Sub
End If


Dim xml As New Chilkat.Xml
success = xml.LoadXml(responseXml)
Debug.WriteLine("AAPL LastPrice: " & xml.GetChildContent("LastPrice"))

' Get another stock quote.  If a new HTTP connection is required,
' the REST object will automatically connect using the same parameters.
success = rest.AddQueryParam("symbol","AMZN")
responseXml = rest.FullRequestNoBody("GET","/MODApis/Api/v2/Quote")
If (rest.LastMethodSuccess <> True) Then
    Debug.WriteLine(rest.LastErrorText)
    Exit Sub
End If


success = xml.LoadXml(responseXml)
Debug.WriteLine("AMZN LastPrice: " & xml.GetChildContent("LastPrice"))