PostJSON

Syntax

Internet.PostJSON( URLName, jsonRequest, jsonResponse[, Headers])

Description

Send a POST-request formatted in JSON format to the specified URL. If the request was handled successfully, the function returns True, otherwise False.

Parameter	Description
UrlName	A variable or expression that evaluates to the Web server's URL.
jsonRequest	The data record(s) formatted in JSON format.
jsonResponse	The reply from the Web server, formatted in JSON.
Headers	Optional. This is a set of field-value combinations that can be included as additional headers.

See Also

StoreURL.

Example

Sub Main
 
   Dim MyURL As String, Request As String, Response As String
 
   MyURL = "https://api.fiscallog.eu/sign/v1"
 
   Request = EncodeJSON("Amount", 123.45, "VAT", 31.57)
 
   If Internet.PostJSON(MyURL, Request, Response, "Client-ID", "my_client_id", "Client-Token", "my_client_token") Then
   	   Msgbox Response
   Else
   	   Msgbox "No Success..."
   End If
 
End Sub