Systemvariable an eine zweite CCU senden

[MarkusSchickaneder]

Leider finde ich keinen Ansatz wie ich hier weiter kommen soll.
Ich möchte Systemvariablen von einer CCU zur andern schicken.
Beide befinden sich im selben Netzwerk. Hat von euch schon mal Jemand sowas Gemacht?
Gruß Markus

[MichaelN]

Versuch es mit :

Code: Alles auswählen

http://IP.der.CCU.2:8181/x.exe?senden=dom.GetObject("SV-Name").State("String")
http://IP.der.CCU.2:8181/x.exe?senden=dom.GetObject("SV-Name").State(Zahl)

[Tyfys]

sollte man sich das nicht gleich besser so angewöhnen:

Code: Alles auswählen

http://IP.der.CCU.2:8181/x.exe?senden=dom.GetObject (ID_SYSTEM_VARIABLES).Get("SV-Name").State("String");
http://IP.der.CCU.2:8181/x.exe?senden=dom.GetObject (ID_SYSTEM_VARIABLES).Get("SV-Name").State(Zahl);

[MarkusSchickaneder]

Sorry funzt nicht:

Error 1 at row 2 col 5 near ^://30.4.78.245:8181/x.exe?senden=dom.GetObject("PV-Test").State("String")
http:/
Parse following code failed:

http://30.4.78.245:8181/x.exe?senden=do ... te("String")
http://30.4.78.245:8181/x.exe?senden=do ... tate(Zahl)

Gruß Markus

[MarkusSchickaneder]

sollte man sich das nicht gleich besser so angewöhnen:

Code: Alles auswählen

http://IP.der.CCU.2:8181/x.exe?senden=dom.GetObject (ID_SYSTEM_VARIABLES).Get("SV-Name").State("String");
http://IP.der.CCU.2:8181/x.exe?senden=dom.GetObject (ID_SYSTEM_VARIABLES).Get("SV-Name").State(Zahl);

Hallo Tyfys

Kommt leider die selbe Fehlermeldung

[Roland M.]

Hallo!

Sorry funzt nicht:

Error 1 at row 2 col 5 near ^://30.4.78.245:8181/x.exe?senden=dom.GetObject("PV-Test").State("String")

Du musst den Befehl natürlich als Script noch in ein system.Exec() "verpacken", zum Test kannst du den Befehl aber direkt in einem Browser ausführen.

Allerdings habe ich meine Zweifel an der IP! Das ist eine öffentliche IP (30.0.0.0/8 DoD Network Information Center, Columbus, Ohio), ich hoffe, du hast deine CCU nicht per Portforwarding exponiert - wenn ja, dann sofort löschen!. Nimm da die IP-Adresse im lokalen Netzwerk.


Roland

[Baxxy]

Sorry funzt nicht:

als Script noch in ein system.Exec() "verpacken"

Na dann machen wir doch mal Nägel mit Köpfen...

Code: Alles auswählen

!- SysVar-Inhalt von Zentrale A auf Zentrale B "kopieren"
!- v1.1 by Baxxy 14.06.23
!- https://homematic-forum.de/forum/viewtopic.php?f=19&t=74606#p722724

string remote_user_name	  = "Admin";
string remote_user_pw	  = "admin";
string local_sysvar_name  = "A_Test_SysVar_Text"; !- Name der lokalen SysVar
string remote_sysvar_name = "SysVar_Remote_Text"; !- Name der remote SysVar
string remote_ip_addr     = "192.168.1.96";     !- IP-Adresse remote Zentrale
boolean write_remote      = true;                 !- Daten übertragen ja (true) / nein (false)

!- Testdaten falls die lokale SysVar nicht existent ist
var data_value            = "test123";            !- Testdaten als String: "test123" / Zahl: 123.45 / Logik: true | false

!- ####################################################
object source_sysvar = dom.GetObject (ID_SYSTEM_VARIABLES).Get (local_sysvar_name);
boolean use_basic_auth; string url; var vartype; string auth_string;

if (( remote_user_name ) && ( remote_user_pw )) { auth_string = remote_user_name #":"# remote_user_pw #"@"; }
 if ( source_sysvar ) { data_value = source_sysvar.Value(); }
      vartype = data_value.Type();
  if ( vartype == "string" ) { data_value = '"'# data_value #'"'; }
      url = 'http://'# auth_string # remote_ip_addr #':8181/bx.exe?y=dom.GetObject("'# remote_sysvar_name #'").State('# data_value #')';
      WriteLine("Daten-Format: "# vartype #"\nAusgabe-URL -kann im Browser getestet werden- : "# url);
   if ( write_remote ) { system.Exec("wget --tries=2 --timeout=2 -q '" # url # "' &"); WriteLine("Daten gesendet!"); }

Sollte soweit selbsterklärend sein.
Getestet nur mit Text/Zahl/Logik - SysVars.
Die "Remote-SysVar" wird nicht auf Vorhandensein und Typ geprüft!
Wer z.B. eine Zahl in eine Text-SysVar schreibt ist selbst schuld.

[Tyfys]

Hallo Baxxy


Wer eine schliessende Klammer verbummelt ist auch selbst Schuld.....

Code: Alles auswählen

WriteLine("Daten-Format: "# vartype #"\nAusgabe-URL: "# url;

Hast du nicht sogar den SDV ?

[Black]

Joah, so ein WriteLine braucht auch eine schliessende Klammer.

der SDV zeigt den Fehler übrigens an ^^

Black

[Baxxy]

Ja sowas aber auch... wer hat die Klammer gemopst?
Habe das Script korrigiert.

Ja, wurde mit dem SDV produziert. Aber im "Hardcore-Modus" ohne jegliche Hilfsfunktionen.

Grüße, Baxxy