Einfaches Beispiel gesucht für VBA und EXCEL mit API-Zugriff auf Shopware

Shopware 6 (German) Programmierung
1

Guten Abend! Ich möchte nur ungern über die Datenbank direkt auf Shopware 6 zugreifen. Kann mir jemand ein Minimalbeispiel schicken mit VBA + EXCEL + API-Zugriff über API-Key? Ein Minibeispiel mit Auslesen aller Artikelnummern? MfG. Uhren-Zietz

2

Hallo Uhren-Zietz,

ich kenne mich leider weder mit der Api, noch mit VBA oder Excel aus, aber vielleicht kommst du ja mit den Verkaufskanälen weiter.

Dazu musst du als Erstes eine dynamische Produktgruppe anlegen, in deinem Fall vielleicht mit Kategorie = deine Root Kategorie, um alle Produkte zu bekommen.

image
image1303×220 10.6 KB

Dann legst du einen neuen Verkaufskanal als Produktvergleich an und passt das XML Template an so wie du es brauchst, vielleicht kannst du dann mit Excel/VBA über die Export-URL auf die Daten zugreifen und weiterverarbeiten.

Viele Grüße
Tom

3

habe Shopware 6 API über VBA Excel bzw. MS Access angezapft der Schlüssel zur API ist
dieser json Body String

{
„client_id“: „administration“,
„grant_type“: „password“,
„scopes“: „write“,
„username“: „“,
„password“: „“
}

4

so kannst Du starten

Dim http As Object
Dim url As String
Dim response As String
Dim akey As String
url = „http://domain.de/api/oauth/token“
jsonBody = …

’ HTTP-Anfrage erstellen
Set http = CreateObject(„MSXML2.XMLHTTP“)
http.Open „POST“, url, False
http.setRequestHeader „Content-Type:“, „application/json“
http.setRequestHeader „Accept:“, „application/json“

http.send jsonBody