1、首页上页下页末页结束第三章OPC数据访问首页上页下页末页结束基于驱动程序的访问SoftwareDriverSoftwareDriverSoftwareDriverSoftwareDriverDisplayApplicationTrendApplicationReportApplication首页上页下页末页结束驱动访问的缺陷 问题的提出：如何读取设备中数据 工业应用中，由于各应用系统的数据接口不标准，使得专用系统之间不能相互通信的现象相当普遍。由于应用程序提供者仅提供了有限的连接性，因而大大地缩小了过程和工业制造厂商对硬件和软件的选择范围。在缺少任何标准的情况下，设备供应商不得不各自开发自己专
2、用的硬件和软件解决方案。首页上页下页末页结束驱动访问的缺陷 问题的提出：对于开发典型监控程序软件的技术人员来说，有20%-30%的时间用于编写通讯驱动程序。而且每次，一个供应商需要将一个新的控制器投入市场销售时，所有的软件开发人员就不得不重新编写一个新的驱动程序。首页上页下页末页结束 应用软件的提供者花费太多的资金开发和维护专用接口，这不仅增加了用户的负担，而且在实际上并不能真正解决不同系统的互操作性。在某种意义上，用户被他们的软件提供者所控制。首页上页下页末页结束首页上页下页末页结束OPC的解决方案SoftwareDriverSoftwareDriverSoftwareDriverSoftw
3、areDriverOPCOPCOPCOPCDisplayApplicationTrendApplicationReportApplicationOPCOPCOPC首页上页下页末页结束概述 OLE for Process Control(Object linking and embedding)now:Open Process Control Openess Productivity and Conectivity OPC（用于过程控制的OLE）是一个工业标准。OPC由一些世界上占领先地位的自动化系统和硬件、软件公司与微软（Microsoft）紧密合作而建立的。OPC定义了应用Microsoft
4、操作系统在基于PC 的客户机之间交换自动化实时数据的方法。管理这个标准的国际组织是OPC基金会。首页上页下页末页结束架构实例：Before OPCABB PLCsTlmcanique PLCsSiemens PLCsMasterBusMMS driverXWAY driverProfinetdrivervisualizationhistorydata base首页上页下页末页结束架构实例With OPC:ABB Operator Workplace ConnectionABB AC800MTlmcanique TSXSiemens S7AC800MOPC serverSchneiderOPC
5、serverSiemensOPC serverOperatorITapplication software is written independently from the type of controllerHistorian(Information Manager)MMSXWAYProfiNetthe drivers still exist,but the clients do notsee them anymore首页上页下页末页结束OPC技术基础 OPC技术基于微软的OLE(现在的Active X)、COM(部件对象模型)和DCOM(分布式部件对象模型)技术。OPC包括一整套接口、属
6、性和方法的标准集，用于过程控制和制造业自动化系统。Active X/COM技术定义各种不同的软件部件如何交互使用和分享数据。不论过程中采用什么软件或设备，OPC为多种多样的过程控制设备之间进行通信提供了公用的接口。首页上页下页末页结束OPC技术基础构成Transport(TCP-IP,UDP,Queued)(Distributed)Component Object Model(COM/DCOM)Object Linking and Embedding(OLE)EthernetOLE for ProcessControl(OPC)only betweennodes首页上页下页末页结束OPC技术简
7、介 OPC对象属性 服务器(OPC Server)组(OPC Group)项(OPC Item)OPC变量标签中要体现以上三个属性，如 SaabTankradar.Tankserver.1.T-1000.LL.CVOPC服务器名OPC组名 数据项名首页上页下页末页结束对象及接口概述 OPC对象 OPC对象有三个：服务器(OPC Server)、组(OPC Group)和项(OPC Item)OPC接口首页上页下页末页结束必需的接口定义 OPC服务器必需的接口有IunknownIOPCServer IOPCCommerIConnectionPointContainer首页上页下页末页结束OPC
8、Server对象接口IUnknownIOPCServerIOPCServerPublicGroupsIOPCServerBrowseServerAddressSpaceIPersistFileIOPCServerDispIOPCServerPublicGroupsDispIOPCServerBrowseServerAddressSpaceDispStandardOPC Server Object1、开发者必须完成非选项的接口实现！2、OPC标准仅仅提供接口的定义！3、客户端调用这些接口完成与OPC Server的连接！首页上页下页末页结束OPC Group对象接口IUnknownIOPCIte
9、mMgtIOPCGroupStateMgtIOPCPublicGroupStateMgtIOPCSyncIOIOPCItemMgtDispIOPCGroupStateMgtDispIOPCPublicGroupStateMgtDispStandardOPC Group ObjectIOPCAsyncIOIOPCAsyncIODispIOPCSyncIODispIDataObject首页上页下页末页结束OPC的访问方式-同步访问OPC应用程序OPC服务器调用开始等待状态调用同步访问方法调用结束时间时间1、读取指定OPC标签，应用程序一直等待到读取完成为止！2、写入指定OPC标签，应用程序一直等待
10、到写入完成为止！3、开发简单，但是大批量数据处理则访问性能影响大！首页上页下页末页结束OPC的访问方式-异步访问OPC应用程序OPC服务器调用开始其他处理调用异步访问方法调用结束时间时间异步访问完成事件通信事件结束事件发生1、读取/写入指定OPC标签，应用程序发出更新请求后立即返回，更新数据完成后发生数据变化事件！2、发出请求与访问完成事件处理是独立完成，因此需要使用事务管理，开发较难！首页上页下页末页结束OPC的访问方式-订阅方式OPC应用程序OPC服务器事件发生其他处理数据变化事件事件处理结束时间时间数据变化事件通知事件结束事件发生通知1、服务器定时更新OPC服务器的数据缓冲区。如果数据超
11、出敏感区DeadBand则发生数据变化事件！2、降低数据精度！首页上页下页末页结束OPC数据访问对象模型服务器(OPC Server)组集合(OPC Groups)浏览器(OPC Browser)OPC Group项集合(OPC Items)OPC ItemOPC Group组(OPC Group)OPC Item项(OPC Item)1、组织管理项2、客户据此决定刷新时间3、激活/禁止OPC4、分为PUBLIC和LOCAL。1、代表和数据源的连接关系/DCS点在OPC SERVER中的地址。2、必须通过OPC Group进行访问3、其数据类型为VARIANT4、一般包括Value、TimeS
12、tamp、Quality首页上页下页末页结束OPC数据访问对象模型名称对象名说明OPC服务器OPCServer必须生成opcserver。其自动包含一个opc组集合以及opc浏览器对象OPC组集合OPCroupsOPC服务器中添加的所有OPC组的集合OPC组OPCGroupOPC组对象是用于组的状态管理以及利用项集合为单位的数据访问。OPC项集合OPCItems在对应OPC组中添加的所有的OPC项的集合OPC项OPCItem含有项的定义，当前值，状态以及最后更新时间信息的对象。首页上页下页末页结束开发OPC应用程序的几种模式 第三方HMI软件 自动化接口(VB、Delphi、Pb、Bc)第三方
13、提供的RDK 定制接口（VC）FacView支持 OPC.H文件 OPC_I.C文件1、对于OPC服务器而言，其应该提供定制接口，自动化接口则可选2、FacView中的OPCServer只支持定制接口首页上页下页末页结束VB开发OPC应用程序的基本步骤 连接OPC服务器和建立OPC组 添加OPC标签 同步读写数据 断开OPC服务器连接首页上页下页末页结束连接OPC服务器和建立OPC组变量声明Option ExplicitOption Base 1opc对象的申明Dim WithEvents MyOPCServer As OPCServerDim MyOPCGroups As OPCGroups
14、Dim MyOPCTestgrp As OPCGroupDim MyOPCItems As OPCItemsDim MyOPCItem As OPCItemDim iServerhandles()As LongDim MyOPCBrowse As OPCBrowserConst strProgID=OPCJ.SAMPLESERVER.1Const strNode=“xionghui”首页上页下页末页结束连接OPC服务器和建立OPC组Private Sub Command1_Click()If MyOPCServer Is Nothing ThenSet MyOPCServer=New OPCS
15、erverEnd IfIf MyOPCServer.ServerState=OPCDisconnected Then MyOPCServer.Connect strProgID,strNode End IfIf MyOPCGroups Is Nothing Then Set MyOPCGroups=MyOPCServer.OPCGroupsEnd IfIf MyOPCTestgrp Is Nothing ThenSet MyOPCTestgrp=MyOPCGroups.Add(TESTGRP)End IfEnd Sub首页上页下页末页结束添加OPC标签Private Sub Command2_
16、Click()Dim stritemids(8)As StringDim iclienthandles(8)As LongDim ierror()As LongDim i As IntegerIf MyOPCTestgrp Is Nothing ThenExit SubEnd IfIf Not MyOPCItems Is Nothing Then If MyOPCItems.Count 0 Then Exit Sub End IfEnd IfMyOPCTestgrp.IsSubscribed=FalseMyOPCTestgrp.IsActive=TrueSet MyOPCItems=MyOPC
17、Testgrp.OPCItemsFor i=1 To 8strItemids(i)=MyTAG&iiClienthandles(i)=iNextCall MyOPCItems.AddItems(8,strItemids,iClienthandles,iServerhandles,ierror)End Sub首页上页下页末页结束同步读写数据/同步读取Private Sub Timer1_Timer()Dim ierrors()As LongDim VtItemValues()As VariantobjTestgrp.SyncRead OPCCache,8,iServerhandles,VtIte
18、mValues,ierrorsText2.Text=Format(VtItemValues(1),#.000)End Sub/同步写入Dim ierrors()As LongDim ivalue()As VariantDim i As IntegerReDim ivalue(8)For i=1 To 8ivalue(i)=iNextobjtestgrp.SyncWrite 1,iserverhandles(),ivalue(),ierrors()Text2.Text=ivalue(5)首页上页下页末页结束断开与OPC服务器的连接Private Sub Command3_Click()Dim i
19、error()As LongIf Not MyOPCItems Is Nothing Then MyOPCItems.Remove 8,iServerhandles,ierror End If Set MyOPCItems=Nothing If Not MyOPCTestgrp Is Nothing Then MyOPCGroups.RemoveAll Set objTestgrp=Nothing End IfIf Not MyOPCGroups Is Nothing Then Set MyOPCGroups=NothingEnd IfIf Not MyOPCServer Is Nothing Then If MyOPCServer.ServerState OPCDisconnected Then MyOPCServer.Disconnect End IfSet MyOPCServer=NothingEnd IfEnd Sub首页上页下页末页结束此课件下载可自行编辑修改，仅供参考！此课件下载可自行编辑修改，仅供参考！感谢您的支持，我们努力做得更好！谢谢感谢您的支持，我们努力做得更好！谢谢
