edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

offeneAntraege. CreditsafeAPI

Browse Source
This commit is contained in:
d.breimaier
2025-10-08 17:33:47 +02:00
parent ce29fa679d
commit 89354f7739
3 changed files with 7 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
VERAG_PROG_ALLGEMEIN/Schnittstellen/Creditsafe/cCreditSafeAPI.vb
View File

@@ -136,7 +136,7 @@ Public Class cCreditSafeAPI
If type = "addCompanyToPortfolio_CSV" Then
rest.PartSelector = "0"
rest.AddHeader("Content-Type", "multipart/form-data")
rest.AddHeader("Content-Type", "multipart/form-data") 'nicht notwendig!!! - wird automatisch gesetzt
rest.AddHeader("Expect", "100-continue")
Else
rest.AddHeader("Content-Type", "application/json")
@@ -163,12 +163,11 @@ Public Class cCreditSafeAPI
rest.PartSelector = "2"
rest.AddHeader("Content-Disposition", "form-data; name=""email""")
rest.AddHeader("Content-Type", "text")
rest.SetMultipartBodyString("d.breimaier@verag.ag") ';as@verag.ag;Viktoria.Leirich@imex-group.at
rest.SetMultipartBodyString("d.breimaier@verag.ag;as@verag.ag;Viktoria.Leirich@imex-group.at")
rest.PartSelector = "0"
Dim strResponseBody As String = rest.FullRequestMultipart(method, url.Replace(API_STRING, ""))
If (rest.LastMethodSuccess <> True) Then
Debug.WriteLine(rest.LastErrorText)