Showing results 1 to 5 of 5

Thread: Online Variables (bei Wertänderung - VBA code ausführen)

  1. #1
    Join Date
    02.02.2012
    Posts
    4

    Rotes Gesicht Online Variables (bei Wertänderung - VBA code ausführen)

    Guten Morgen,

    bin neu im Forum und hoffe meine Frage ist nicht zu trivial
    Hätte eine kurze Verständnisfrage zu den OnlineVariablen & "With Event".

    Mein Problem:
    - ich habe im ZenOn 12 INT Variablen (mit Treiberverweis auf einen DB der S7-SPS)
    - falls sich der Wert einer dieser 12 Variablen ändert, müsste ich einen VBA code ausführen.
    - (im Moment lasse ich jede Sekunde einen Timer in ZenOn meinen Code ausführen, was nicht gerade die eleganteste Lösung ist...)

    Meine Frage:
    - Bin ich auf den richtigen Weg, einen OnlineContainer anzulegen und anschließend mit "With Events" meine Funktion aufrufe? (Habe soetwas noch nicht gemacht...)
    - Falls ja, kann ich einfach ein neues Modul erstellen und alles darin rein packen?

    Mit freundlichen Grüßen,
    dog5
    Last edited by dog5 : 22nd February 2012 at 09:03

  2. #2
    Join Date
    02.02.2012
    Posts
    4

    Default AW: Online Variables (bei Wertänderung - VBA code ausführen)

    good morning

    I have a short question about OnlineVariables & "With Event".

    my problem:
    - in ZenOn i have 12 INT variables (which are linked to a DB in the S7-SPS)
    - if the value of one of theese 12 variables changes, i want to run a VBA-code
    - (@ the moment I run my code every second with a fixed timer in ZenOn...)

    my question:
    - Can i create a OnlineContainer with online variables (12) and use "With Events" to run my code? (i never done this before...)
    - If yes, can i put the container code and the rest in one new modul?

    with best regards,
    dog5

  3. #3
    martins Gast

    Default Re: Online Variables (bei Wertänderung - VBA code ausführen)

    Quote Originally Posted by dog5 View Post
    Guten Morgen,

    bin neu im Forum und hoffe meine Frage ist nicht zu trivial
    Hätte eine kurze Verständnisfrage zu den OnlineVariablen & "With Event".

    Mein Problem:
    - ich habe im ZenOn 12 INT Variablen (mit Treiberverweis auf einen DB der S7-SPS)
    - falls sich der Wert einer dieser 12 Variablen ändert, müsste ich einen VBA code ausführen.
    - (im Moment lasse ich jede Sekunde einen Timer in ZenOn meinen Code ausführen, was nicht gerade die eleganteste Lösung ist...)

    Meine Frage:
    - Bin ich auf den richtigen Weg, einen OnlineContainer anzulegen und anschließend mit "With Events" meine Funktion aufrufe? (Habe soetwas noch nicht gemacht...)
    - Falls ja, kann ich einfach ein neues Modul erstellen und alles darin rein packen?

    Mit freundlichen Grüßen,
    dog5
    hallo!

    Hier ist ein Beispiel, wie man einen Online Container in zenon verwendet:
    http://www.copadata.com/forums/showthread.php?t=41

    In dem Sample Code befindet sich ein Event Handler:

    Private Sub zOLV_VariableChange(ByVal obVar As IVariable)

    Hierbei wird ein Parameter mit übergeben: obVar - dieser beinhaltet die Variable welche sich geändert hat. Hier einfach dann den Call auf deine Funktion einfügen, welche du aufrufen möchtest.

    Weiters gibt es auch die Möglichkeit des Bulk-Modes. Das normale Change-Event wird für jede Variable getriggert, welche sich ändert. Im Bulk Mode gibt es zusätzlich die Möglichkeit, ein Event für ein Array von Variablen zu bekommen. Das hat den Vorteil, wenn viele Änderungen passieren, nicht von dutzenden Events vollgespammt zu werden - sondern eben gezielt nur ein Event für eine Sammlung von Variablen zu werfen.

    Wenn du noch weitere Fragen hast, dann immer her damit
    lg
    Martin

  4. #4
    Join Date
    02.02.2012
    Posts
    4

    Default AW: Online Variables (bei Wertänderung - VBA code ausführen)

    Hallo,
    vielen Dank für die schnelle Antwort!
    Hoffe ich kanns im Laufe des Nachmittags implementieren.
    Werde dann noch Rückmeldung geben.
    MfG

  5. #5
    Join Date
    02.02.2012
    Posts
    4

    Daumen hoch Re: Online Variables (bei Wertänderung - VBA code ausführen)

    Hallo nochmal,

    hat bestens funktioniert!
    In "ThisProject" rein & die entsprechende Funktion aufgerufen...
    Vielen Dank!
    MfG

Similar Threads

  1. Replies: 3
    Last Post: 17th September 2010, 10:22
  2. Replies: 0
    Last Post: 22nd June 2010, 09:02
  3. Replies: 0
    Last Post: 10th February 2009, 13:54
  4. Read Real variables in VBA
    By joulz in forum VBA
    Replies: 4
    Last Post: 5th February 2009, 13:29
  5. Replies: 0
    Last Post: 19th September 2007, 11:06

Posting Rules

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •