![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(VBScript) Datev - Upload File (Transfer a file to DATEV data center)See more Datev ExamplesDemonstrates how to transfer a file to the DATEV data center.Note: This example requires Chilkat v10.1.3 or greater. For more information, see https://developer.datev.de/en/product-detail/accounting-extf-files/2.0/reference/reference-api-overview/accountingextffiles/clients-client-id-extf-files-import-post
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") ' Implements the following CURL command: ' curl --request POST \ ' --url "https://accounting-extf-files.api.datev.de/platform-sandbox/v3/clients/REPLACE_CLIENT-ID/extf-files/import" \ ' --header "Authorization: Bearer REPLACE_BEARER_TOKEN" \ ' --header "X-Datev-Client-ID: clientId" \ ' --header "accept: application/json;charset=utf-8" \ ' --header "content-type: application/octet-stream" \ ' --header "Filename: EXTF_BS_20200101_1.csv" \ ' --header "Reference-Id: Buchungsstapel_Verkäufe_2020_01_Nr_001" \ ' --header "Client-Application-Version: 2.0c" \ ' --data-binary "@REPLACE_BODY" ' Use the following online tool to generate HTTP code from a CURL command ' Convert a cURL Command to HTTP Source Code ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.BinData") set bdRequestBody = CreateObject("Chilkat.BinData") success = bdRequestBody.LoadFile("c:/temp/EXTF_BS_20200101_1.csv") If (success <> 1) Then outFile.WriteLine("Failed to load the csv file.") WScript.Quit End If http.SetRequestHeader "accept","application/json;charset=utf-8" http.SetRequestHeader "X-Datev-Client-ID","clientId" http.SetRequestHeader "Client-Application-Version","2.0c" http.SetRequestHeader "Filename","EXTF_BS_20200101_1.csv" http.SetRequestHeader "Reference-Id","Buchungsstapel_Verkäufe_2020_01_Nr_001" ' Adds the "Authorization: Bearer REPLACE_BEARER_TOKEN" header. http.AuthToken = "REPLACE_BEARER_TOKEN" ' resp is a Chilkat.HttpResponse Set resp = http.PBinaryBd("POST","https://accounting-extf-files.api.datev.de/platform-sandbox/v3/clients/DATEV_USER_ID/extf-files/import",bdRequestBody,"application/octet-stream",0,0) If (http.LastMethodSuccess = 0) Then outFile.WriteLine(http.LastErrorText) WScript.Quit End If outFile.WriteLine(resp.StatusCode) outFile.WriteLine(resp.BodyStr) outFile.Close |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.