Mit VBA Dateien von einem PC auf einen anderen PC kopieren

[mst]

Kurz: Das betriff nur zenon Variablen wenn du value abfragst. Man kann es nicht aktiv nutzen

Hintergrund: zenon liest nicht immer alle Variablen vom Treiber, sondern nur die welche aktuell benötigt werden. Das sind die Variablen die in aktuell aufgeschalteten Bildern verwendet werden, Variablen mit Alarmen, Variablen mit Grenzwertfunktionen usw. Eine Variable die aus Sicht von zenon aktuell nicht benötigt wird, wird auch nicht vom Treiber abgefragt und hat somit keinen Wert für value. Um das zu verhindern gibt es unterschiedliche Möglichkeiten: entweder man setzt die Eigenschaft 'ständig lesen' der Variable im zenon Editor, oder man verwendet einen Onlinecontainer (=Onlinevariable) im VBA (bzw VSTA/AddIn). Dazu findest Du einiges im Forum.
Zusätzlich wird empfohlen, vor Zugriff auf das value im Code mit der Abfrage Variable.IsOnline zu prüfen, ob die Variable Online ist/also einen gültigen Wert hat.
Ich hoffe jetzt wirds klarer.

[Tommylik]

Hallo mst,

Vielen Dank für deine Antwort und ja jetzt ist es mir klarer. 

Also brauche ich die Option ständig Lesen nicht, da ich im Project_Active Event einen Online Container erstellt habe.
Ich habe hier im Forum gelesen das es wichtig ist im Project_Inactive Event die Online Container wieder ordentlich abzumelden.

Bedeutet Projekt_Inactive das die Runtime nicht gestartet ist?


Vielen Dank nochmal für deine Hilfe

Mfg Tommylik

[mst]

Das Event Project_Inactive wird beim Beenden und auch vor dem Nachladen der Runtime ausgelöst. Vgl. mit Project_Active: das wird beim Starten und nach dem Nachladen der Runtime gefeuert.
Deshalb nutzt man oft Project_active zum erzeugen eines Onlinecontainers (und natürlich hinzufügen der benötigten Variablen + aktivieren mit .Define) und Project_Inactiv zum Zerstören des Onlinecontainers und freigeben von Verweisen.

[Tommylik]

Hallo mst,

Vielen Dank für deine Antwort.

Beim Online Nachladen bekomme ich einen Runtime Error 91.
Jetzt weiß ich warum, weil ich den Onlinecontainer nicht in das Event Project_Inactive eingetragen habe.

Das werde ich mal ausprobieren. Da ich das Online Nachladen nicht nutze habe ich nie einen Fehler bekommen.

Vielen Dank noch mal für deine Hilfe.

Mfg Tommylik

[Tommylik]

Hallo an alle,

Ich könnte nochmal Eure Hilfe gebrauchen zu diesem Thema.

Das verschieben des Ordner mit der folgenden Zeile funktioniert.

Variable ist Online.

oFSO.MoveFolder "D:\S7_Export\AppData\" & strOrdner & "", "D:\S7_Export\"

Ich bekomme es aber nicht hin das ich den Ordner auf einen anderen PC verschiebe. 

oFSO.MoveFolder "D:\S7_Export\AppData\" & strOrdner & "", "\\3TH5MBG2200B01\AppData"

Kopieren funktioniert auch nicht. Ich habe Extra beide Zeilen untereinander geschrieben um zu Testen das es nicht an der Variable liegt.

Also muss es an dem Pfad ("\\3TH5MBG2200B01\AppData") liegen. Ist Euer Meinung nach meine Schreibweise richtig oder falsch??

Verbindung ist da. Ich kann von beiden PCs aus in beide Richtungen alles machen.

Meine Vermutung ist das Zenon/VBA diese Computer Freigabe nicht erkennt.

Für Eure Meinungen vielen Dank im voraus.


Mfg Tommylik

 

[mst]

Könnte es am fehlenden Backslash nach "AppData" liegen?

[Tommylik]

Hallo mst,

Vielen Dank für deine Idee. Leider nein.

Ich habe schon einiges getestet.

Kann man auch die IP-Adresse nutzen anstatt des Computernamen?

Mfg Tommylik