22.10.2010 10:41 | |
Beigetreten: 17.09.2007 Letzter Bes: 17.04.2023 Beiträge: 799 Bewertung: (82) |
Hallo, |
VG / regards vanDyk |
|
22.10.2010 13:17 | |
Beigetreten: 16.01.2006 Letzter Bes: 02.08.2024 Beiträge: 125 Bewertung: (51) |
Hallo, WinCC ist nicht nur OPC-Server, sondern auch OLE-Server mit einer sehr einfachen Schnittstelle. Es muss nur unter Verweise die Bibiothek "CCMcpAutServer 1.0 Type Library" eingebunden werden. Dann stehen die beiden Methoden SetValue und GetValue zur Verfügung. Damit kannst du auf WinCC-Variablen zugreifen (die dann per Trigger die gewünschte Aktion ausführen). Sub MCPTest_Local() ' geht nur vom WinCC-PC aus Dim WinCC As CCMcpAut Dim DSN As String Dim strWert As String Dim iWert As Long Set WinCC = New CCMcpAut DSN = WinCC.RuntimeProject strWert = WinCC.GetValue("StringVariable1") iWert = WinCC.GetValue("IntegerVariable1") End Sub Obiges Beipsiel muss auf dem WinCC-Server laufen. Im Anhang hat es noch ein Beispiel, wenn die Application auf einem anderen PC läuft (und WinCC installiert hat). mfg Cookie DateianhangWinCC_OLE.zip (152 Downloads) |
Zuletzt bearbeitet von: Cookie am: 22.10.2010 13:18 |
|
Für diesen Beitrag bedanken sich2 Benutzer |
Folgen Sie uns auf