|
Hallo,
ich scheitere gerade an einer simplen Aufgabe und verstehe nicht warum: Vielleicht kann mir einer von euch sagen warum ich auf dem Schlauch stehe???
Also ich habe folgenden Snippet Code, welcher funktioniert:
Formula1 = getdata(apexserver() + "/detectordata/" + CStr(detectorid))
Dim Parsed As Object
Set Parsed = JsonConverter.ParseJson(Formula1)
jetzt wollte ich daraus eine Funktion machen, welche nicht funktioniert:
Public Function getjson(url) As Object
formula1 = getdata(url)
Set getjson = JsonConverter.ParseJson(formula1)
End Function
Wenn ich jetzt die Funktion mit:
url= apexserver() + "/detectordata/" + CStr(detectorid)
Parsed = getjson(url)
aufrufe, dann bekomme ich "Argument ist nicht optional" als Fehler zurück in der Zeile Set getjson = JsonConverter.ParseJson(formula1)
Warum?
|