Json Datei prüfen und Werte anpassen

Das sind zu wenig Infos und eine Frage, welche man beantworten könnte ist auch nicht vorhanden.

Was genau verstehst du unter "prüfen"?
Ob die Datei Syntaxkonform mit dem JSON-Standard ist oder ob bestimmte Attribute bestimmte Werte (welche genau?) aufweisen?

Es gibt verschiedene UDFs die einem die Arbeit mit JSON in AutoIt erleichtern.
Eine davon ist meine: JSON-UDF

Mit dieser würde das ganze exemplarisch so aussehen:

#include <JSON.au3>

; JSON-Datei als String einlesen:
Global $s_String = FileRead("test.json")

; JSON-String in AutoIt-Datenstrukturen parsen:
$oJSON = _JSON_Parse($s_String) 

;  einzelne Objekte extrahieren:
$nPort = _JSON_Get($oJSON, "Port")
$nQueryPort = _JSON_Get($oJSON, "QueryPort")
$nMaxConnectedUsers = _JSON_Get($oJSON, "MaxConnectedUsers")

; Werte auf der Konsole ausgeben:
ConsoleWrite("Port: " & $nPort & @CRLF & _
    "QueryPort: " & $nQueryPort & @CRLF & _
    "MaxConnectedUsers: " & $nMaxConnectedUsers & @CRLF)

; Werte im Objekt selbst verändern (hier wurde Objekt als Scripting.Dictionary geparsed)
$oJSON("QueryPort") = 1234

; Das ganze wieder in eine JSON-Datei schreiben:
FileDelete("test.json")
FileWrite("test.json", _JSON_Generate($oJSON) )

Btw: momentan bastelt er standardmäßig JSON-Objekte in Scripting.Dictionary-Objekte um.
Da Maps ja mittlerweile so gut wie stable sind, werde ich wohl die UDF nochmal so anpassen, dass standardmäßig AutoIt-Maps verwendet werden.

Und wieder: Nur mit "funktioniert nicht" kann hier keiner weiterhelfen.
Minimum wäre das Skript mit dem es "nicht funktioniert" (auch hier fehlt es an einer Beschreibung wie genau sich dies äußert)

Zitat von schlawiner

Dann wurde ein weiteres Problem entdeckt, das einige Json Werte mit Zahlenwerten von Der Anwendung nicht übernommen wurden, weil diese in "" eingebettet waren.

Waren diese Werte bereits in der Eingabedatei vom Datentyp String (also in Anführungszeichen gesetzt) oder geht es um Werte, welche du erst zugewiesen hast?

Zitat von schlawiner

sobald die Werte geändert werden werden diese mit den "" versehen, auch wenn vorher keine "" vorhanden waren.

Dann enthält deine Änderung eine (implizite) Konvertierung in einen String. Also irgendeine Operation die aus dem vorherigen Zahlentyp eine Zeichenkette macht.

Wenn du uns ein Beispiel deiner Änderung zeigtst können wir mehr sagen.

Zitat von schlawiner

Kannst Du mir noch ein Beispiel geben wie ich jetzt werde in einem untergeordneten Array in einem Json anpassen. Z.b. unten nun zusätzlich Rcon - Port

Im Beispiel fehlt noch ein Komma hinter "StandardPvE".

Zum besseren Verständnis was genau gemacht wird:

• Die JSON-Datei wird in AutoIt-Datenstrukturen geparsed. Im Beispielfall wird die Variable $oJSON ein Dictionary (oder Map - je nach Einstellung) werden. Dieses hat Key-Value-Elemente. Als Value für den Key "Port" wird also ein Integer mit dem Wert 27015 eingetragen. Beim Key "RCON" wiederrum wird der Wert selbst wieder ein eigenes Dictionary/Map. Unter anderem mit dem Key "Password" mit dem dazugehörigen Wert "SecretPassword" als Stringtyp.
• Dann passt man seine Werte innerhalb der AutoIt-Strukturen an. Man greift sich also erst das Dictionary, welches im Dictionary $oJSON unter dem Key "RCON" steht. In diesem Dictionary schnappt man sich den Wert der dort unter "Port" steht und ändert diesen.
• Wir haben also Werte in der verschachtelten AutoIt-Datenstruktur verändert. Vom Grundaufbau ist dies immer noch genauso aufgebaut wie vorher - nur ein Wert wurde geändert. Diese AutoIt-Struktur können wir mit der Funktion _JSON_Generate dann in einen String konvertieren (man sagt "serialisieren" hierzu) welcher die Datenstruktur im Format JSON abbildet.

Also was wichtig ist: JSON spielt nur eine Rolle beim Einlesen der Daten und am Ende beim wieder ausgeben. Alles was dazwischen passiert sind reine AutoIt-Typen und entsprechend müssen sie auch behandelt werden.
Um nun also z.B. deinen Port im Subobjekt "RCON" zu ändern könnte man dies folgendermaßen durchführen:

    #include <JSON.au3>

    ; JSON-Datei als String einlesen:
    Global $s_String = FileRead("text.json")

    ; JSON-String in AutoIt-Datenstrukturen parsen:
    $oJSON = _JSON_Parse($s_String)

    ; Den Wert "Port" im Sub-Object "RCON" ändern
    $oJSON("RCON")("Port") = 27016

    ; verschachtelte AutoIt-Daten wieder in JSON konvertieren:
    Consolewrite(_JSON_Generate($oJSON))

Zitat von schlawiner

das mit den "" scheint daran zu liegen das die Werte via Launchparameter übergeben werden.

Klar - dann sind es Strings und keine Zahlentypen.
Musst also noch in einen Zahlentyp per Number() konvertieren.

Zitat von schlawiner

kann ich das Vorhandensein der 4 Werte prüfen, und bei Bedarf einfügen?

Wenn du mit _JSON_Get arbeitest, dann gibt diese im Falle der Nichtexistenz einen Leerstring zurück und setzt @error auf 3.

Im konkreten Fall hast du jedoch das Dictionary bereits in $oJSON vorliegen. Daher sollte hier auch ein $oJSON.Exists("Port") reichen. Bzw. ein MapExists wenn du Maps einsetzt.