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