VBScript / EDS API / Pārskats par taksometru datu saņemšanu tiešsaistē.
Back to Collection Items
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http")
set http = CreateObject("Chilkat.Http")
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set queryParams = CreateObject("Chilkat.JsonObject")
success = queryParams.UpdateString("parSevi","true")
success = queryParams.UpdateString("parvadatajaRegNr","est i")
success = queryParams.UpdateString("autovaditajaPersonasKods","consectet")
success = queryParams.UpdateString("transportlidzeklaNr","ut su")
success = queryParams.UpdateString("periodsNo","nisi cillum sed")
success = queryParams.UpdateString("periodsLidz","nisi cillum sed")
success = queryParams.UpdateInt("izlaistIerakstus",25210683)
success = queryParams.UpdateInt("atgrieztIerakstus",25210683)
http.SetRequestHeader "Accept","application/json"
' resp is a Chilkat.HttpResponse
Set resp = http.QuickRequestParams("GET","https://eds.vid.gov.lv/api/reports/taxicarriages",queryParams)
If (http.LastMethodSuccess = 0) Then
outFile.WriteLine(http.LastErrorText)
WScript.Quit
End If
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder")
set sbResponseBody = CreateObject("Chilkat.StringBuilder")
success = resp.GetBodySb(sbResponseBody)
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set jResp = CreateObject("Chilkat.JsonObject")
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = 0
outFile.WriteLine("Response Body:")
outFile.WriteLine(jResp.Emit())
respStatusCode = resp.StatusCode
outFile.WriteLine("Response Status Code = " & respStatusCode)
If (respStatusCode >= 400) Then
outFile.WriteLine("Response Header:")
outFile.WriteLine(resp.Header)
outFile.WriteLine("Failed.")
WScript.Quit
End If
' Sample JSON response:
' (Sample code for parsing the JSON response is shown below)
' {
' "Parvadajumi": [
' {
' "ParvadatajaRegNr": "sunt sit",
' "AutovaditajaPersonasKods": "quis consectetur D",
' "TransportlidzeklaNr": "anim eu tempor",
' "SakumaLaiks": "2000-01-31T00:00:00",
' "BeiguLaiks": "2000-01-31T00:00:00",
' "Attalums": -56070425.264373556,
' "BrauksanasMaksa": -9970289.412923485,
' "NorekinuVeids": "paymentCard",
' "NorekinuVeidsTeksts": "dolor aliqua",
' "SasijasNumurs": "repre",
' "AbsolutaSummatoraStavoklis": -13456102.902620822,
' "Komisija": 20507354.215314552,
' "Izveidots": "2000-01-31T00:00:00"
' },
' {
' "ParvadatajaRegNr": "dolor",
' "AutovaditajaPersonasKods": "dolor do tempor molli",
' "TransportlidzeklaNr": "do eu id veniam cupidatat",
' "SakumaLaiks": "2000-01-31T00:00:00",
' "BeiguLaiks": "2000-01-31T00:00:00",
' "Attalums": 21856677.822087795,
' "BrauksanasMaksa": -65166643.49096808,
' "NorekinuVeids": "giftCard",
' "NorekinuVeidsTeksts": "co",
' "SasijasNumurs": "sint fugiat ea",
' "AbsolutaSummatoraStavoklis": -73926198.93205424,
' "Komisija": -8627515.159022048,
' "Izveidots": "2000-01-31T00:00:00"
' }
' ]
' }
' Sample code for parsing the JSON response...
' Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code
i = 0
count_i = jResp.SizeOfArray("Parvadajumi")
Do While i < count_i
jResp.I = i
ParvadatajaRegNr = jResp.StringOf("Parvadajumi[i].ParvadatajaRegNr")
AutovaditajaPersonasKods = jResp.StringOf("Parvadajumi[i].AutovaditajaPersonasKods")
TransportlidzeklaNr = jResp.StringOf("Parvadajumi[i].TransportlidzeklaNr")
SakumaLaiks = jResp.StringOf("Parvadajumi[i].SakumaLaiks")
BeiguLaiks = jResp.StringOf("Parvadajumi[i].BeiguLaiks")
Attalums = jResp.StringOf("Parvadajumi[i].Attalums")
BrauksanasMaksa = jResp.StringOf("Parvadajumi[i].BrauksanasMaksa")
NorekinuVeids = jResp.StringOf("Parvadajumi[i].NorekinuVeids")
NorekinuVeidsTeksts = jResp.StringOf("Parvadajumi[i].NorekinuVeidsTeksts")
SasijasNumurs = jResp.StringOf("Parvadajumi[i].SasijasNumurs")
AbsolutaSummatoraStavoklis = jResp.StringOf("Parvadajumi[i].AbsolutaSummatoraStavoklis")
Komisija = jResp.StringOf("Parvadajumi[i].Komisija")
Izveidots = jResp.StringOf("Parvadajumi[i].Izveidots")
i = i + 1
Loop
outFile.Close
Curl Command
curl -G -d "parSevi=true"
-d "parvadatajaRegNr=est%20i"
-d "autovaditajaPersonasKods=consectet"
-d "transportlidzeklaNr=ut%20su"
-d "periodsNo=nisi%20cillum%20sed"
-d "periodsLidz=nisi%20cillum%20sed"
-d "izlaistIerakstus=25210683"
-d "atgrieztIerakstus=25210683"
-H "Accept: application/json"
https://eds.vid.gov.lv/api/reports/taxicarriages
Postman Collection Item JSON
{
"name": "Pārskats par taksometru datu saņemšanu tiešsaistē.",
"request": {
"method": "GET",
"header": [
{
"key": "Accept",
"value": "application/json"
}
],
"url": {
"raw": "{{baseUrl}}/api/reports/taxicarriages?parSevi=true&parvadatajaRegNr=est i&autovaditajaPersonasKods=consectet&transportlidzeklaNr=ut su&periodsNo=nisi cillum sed&periodsLidz=nisi cillum sed&izlaistIerakstus=25210683&atgrieztIerakstus=25210683",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"reports",
"taxicarriages"
],
"query": [
{
"key": "parSevi",
"value": "true",
"description": "Vai atlasīt nodokļu maksātāja vārdā saņemto informāciju."
},
{
"key": "parvadatajaRegNr",
"value": "est i",
"description": "Pārvadātāja reģistrācijas numurs komercreģistrā."
},
{
"key": "autovaditajaPersonasKods",
"value": "consectet",
"description": "Autovadītāja personas kods."
},
{
"key": "transportlidzeklaNr",
"value": "ut su",
"description": "Autotransporta līdzekļa valsts reģistrācijas numurs."
},
{
"key": "periodsNo",
"value": "nisi cillum sed",
"description": "(Required) Periods no."
},
{
"key": "periodsLidz",
"value": "nisi cillum sed",
"description": "(Required) Periods līdz."
},
{
"key": "izlaistIerakstus",
"value": "25210683",
"description": "(Required) No rezultāta izlaižamo ierakstu skaits."
},
{
"key": "atgrieztIerakstus",
"value": "25210683",
"description": "(Required) Atgriežamo ierakstu skaits."
}
]
}
},
"response": [
{
"name": "OK",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/reports/taxicarriages?parSevi=true&parvadatajaRegNr=est i&autovaditajaPersonasKods=consectet&transportlidzeklaNr=ut su&periodsNo=nisi cillum sed&periodsLidz=nisi cillum sed&izlaistIerakstus=25210683&atgrieztIerakstus=25210683",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"reports",
"taxicarriages"
],
"query": [
{
"key": "parSevi",
"value": "true"
},
{
"key": "parvadatajaRegNr",
"value": "est i"
},
{
"key": "autovaditajaPersonasKods",
"value": "consectet"
},
{
"key": "transportlidzeklaNr",
"value": "ut su"
},
{
"key": "periodsNo",
"value": "nisi cillum sed"
},
{
"key": "periodsLidz",
"value": "nisi cillum sed"
},
{
"key": "izlaistIerakstus",
"value": "25210683"
},
{
"key": "atgrieztIerakstus",
"value": "25210683"
}
]
}
},
"status": "OK",
"code": 200,
"_postman_previewlanguage": "json",
"header": [
{
"key": "Content-Type",
"value": "application/json"
}
],
"cookie": [
],
"body": "{\n \"Parvadajumi\": [\n {\n \"ParvadatajaRegNr\": \"sunt sit\",\n \"AutovaditajaPersonasKods\": \"quis consectetur D\",\n \"TransportlidzeklaNr\": \"anim eu tempor\",\n \"SakumaLaiks\": \"2000-01-31T00:00:00\",\n \"BeiguLaiks\": \"2000-01-31T00:00:00\",\n \"Attalums\": -56070425.264373556,\n \"BrauksanasMaksa\": -9970289.412923485,\n \"NorekinuVeids\": \"paymentCard\",\n \"NorekinuVeidsTeksts\": \"dolor aliqua\",\n \"SasijasNumurs\": \"repre\",\n \"AbsolutaSummatoraStavoklis\": -13456102.902620822,\n \"Komisija\": 20507354.215314552,\n \"Izveidots\": \"2000-01-31T00:00:00\"\n },\n {\n \"ParvadatajaRegNr\": \"dolor\",\n \"AutovaditajaPersonasKods\": \"dolor do tempor molli\",\n \"TransportlidzeklaNr\": \"do eu id veniam cupidatat\",\n \"SakumaLaiks\": \"2000-01-31T00:00:00\",\n \"BeiguLaiks\": \"2000-01-31T00:00:00\",\n \"Attalums\": 21856677.822087795,\n \"BrauksanasMaksa\": -65166643.49096808,\n \"NorekinuVeids\": \"giftCard\",\n \"NorekinuVeidsTeksts\": \"co\",\n \"SasijasNumurs\": \"sint fugiat ea\",\n \"AbsolutaSummatoraStavoklis\": -73926198.93205424,\n \"Komisija\": -8627515.159022048,\n \"Izveidots\": \"2000-01-31T00:00:00\"\n }\n ]\n}"
},
{
"name": "Lietotājs nav autentificēts.",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/reports/taxicarriages?parSevi=true&parvadatajaRegNr=est i&autovaditajaPersonasKods=consectet&transportlidzeklaNr=ut su&periodsNo=nisi cillum sed&periodsLidz=nisi cillum sed&izlaistIerakstus=25210683&atgrieztIerakstus=25210683",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"reports",
"taxicarriages"
],
"query": [
{
"key": "parSevi",
"value": "true"
},
{
"key": "parvadatajaRegNr",
"value": "est i"
},
{
"key": "autovaditajaPersonasKods",
"value": "consectet"
},
{
"key": "transportlidzeklaNr",
"value": "ut su"
},
{
"key": "periodsNo",
"value": "nisi cillum sed"
},
{
"key": "periodsLidz",
"value": "nisi cillum sed"
},
{
"key": "izlaistIerakstus",
"value": "25210683"
},
{
"key": "atgrieztIerakstus",
"value": "25210683"
}
]
}
},
"status": "Unauthorized",
"code": 401,
"_postman_previewlanguage": "text",
"header": [
{
"key": "Content-Type",
"value": "text/plain"
}
],
"cookie": [
],
"body": ""
},
{
"name": "Lietotājam nav tiesību veikt šo darbību.",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/reports/taxicarriages?parSevi=true&parvadatajaRegNr=est i&autovaditajaPersonasKods=consectet&transportlidzeklaNr=ut su&periodsNo=nisi cillum sed&periodsLidz=nisi cillum sed&izlaistIerakstus=25210683&atgrieztIerakstus=25210683",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"reports",
"taxicarriages"
],
"query": [
{
"key": "parSevi",
"value": "true"
},
{
"key": "parvadatajaRegNr",
"value": "est i"
},
{
"key": "autovaditajaPersonasKods",
"value": "consectet"
},
{
"key": "transportlidzeklaNr",
"value": "ut su"
},
{
"key": "periodsNo",
"value": "nisi cillum sed"
},
{
"key": "periodsLidz",
"value": "nisi cillum sed"
},
{
"key": "izlaistIerakstus",
"value": "25210683"
},
{
"key": "atgrieztIerakstus",
"value": "25210683"
}
]
}
},
"status": "Forbidden",
"code": 403,
"_postman_previewlanguage": "text",
"header": [
{
"key": "Content-Type",
"value": "text/plain"
}
],
"cookie": [
],
"body": ""
},
{
"name": "Pārsniegts izsaukumu skaita ierobežojums.",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/reports/taxicarriages?parSevi=true&parvadatajaRegNr=est i&autovaditajaPersonasKods=consectet&transportlidzeklaNr=ut su&periodsNo=nisi cillum sed&periodsLidz=nisi cillum sed&izlaistIerakstus=25210683&atgrieztIerakstus=25210683",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"reports",
"taxicarriages"
],
"query": [
{
"key": "parSevi",
"value": "true"
},
{
"key": "parvadatajaRegNr",
"value": "est i"
},
{
"key": "autovaditajaPersonasKods",
"value": "consectet"
},
{
"key": "transportlidzeklaNr",
"value": "ut su"
},
{
"key": "periodsNo",
"value": "nisi cillum sed"
},
{
"key": "periodsLidz",
"value": "nisi cillum sed"
},
{
"key": "izlaistIerakstus",
"value": "25210683"
},
{
"key": "atgrieztIerakstus",
"value": "25210683"
}
]
}
},
"status": "Too Many Requests",
"code": 429,
"_postman_previewlanguage": "text",
"header": [
{
"key": "Content-Type",
"value": "text/plain"
}
],
"cookie": [
],
"body": ""
}
]
}
