请教：有关OPC客户端读写问题 点击：6873 | 回复：16
发表于：2004-09-24 20:16:00
楼主
可否请版主或哪位大侠解释一下OPCGroup的ASyncWrite、ASyncRead、SyncWrite、SyncRead四个函数的用法？ 尤其是ASyncWrite中 TransactionID及CancelID两个参数的含义及设置方法。
我编写客户端程序是通过一个简单的例程上路的，很多地方都不太明白。
（1）我在创建服务器对象，并添加完Group及Item后，只需要定期查看各Item项的Value值就可以读取服务器内的数据了，这样读取数据与调用ASyncRead或SyncRead函数来读取数据有什么优缺点吗？
（2）我在调用ASyncWrite时，参数设置如下：mygroup.AsyncWrite（MyItemNum, ServerHandle, Itemvalue, ItemError, 1, 12）， 最后两个参数因不知何用，只简单设置为1和12，程序执行时并不报错，但数据却无法写入到服务器内的变量里。
（3）mygroup.OPCItems(ItemSpecifier)也有Write和Read函数，似乎是只读写有关Item,用法较简单，Write只需要Value参数，但我如下调用后：MyOPCGroupIn.OPCItems(1).Write (3) 却有如下错误显示：Automation error. 不知何故。
以上问题已经困扰多时，还请指教。
发表于：2004-09-26 18:54:00
2楼
哎，还是自问自答。
写不进数的原因基本可以肯定是所用EMULATOR的缺陷所致。
刚找到的资料：TransactionID——The client specified transaction ID. This is included in the‘completion’ information provided in the Corresponding Event. CancelID——A Server generated transaction ID. This is provided to enable the client to cancel the “transaction”. 就我的理解，一个是用来标志启动写操作的Client的ID，一个是用来标志取消写操作的SERVER的ID。 这两个参数是必须有的，但不论我怎么设置这两个的值，AsynWrite操作都能正确执行，感觉不出有什么不同，还请哪位高手指点一下。
第三个问题也是因为仿真软件仿真的变量只能读的缘故，才造成的AUTOMATION ERROR。用其他的仿真软件，都读写正常，看起来这两个函数的确是只针对ITEM的读写操作。
第一个问题还没怎么摸索清楚，反正值都能读出，只是操作麻烦程度不太一样，估计跟订阅方式有关，如果哪位清楚还请指点！
发表于：2004-09-28 09:37:00
3楼
还是自问自答：
TransactionID:在客户端程序内指定，用来标志此次调用操作
CancelID:只需在客户端程序声明，赋值则在调用时由服务器端自动完成，据说可用来取消操作，但不知道该怎么用。
顺便说一句：OPCGroup的syncread , syncwrite及OPCItem的write,read均需等到调用结束才返回主程序，容易造成程序堵塞。 asnyread及asncwrite则不必。
再问一个： 是不是各家公司的OPC AUTOMATION都添加了自己的东西呢？在调试中，感觉各家都有点不太一样。 如果是这样的话，那怎么还能称之为标准呢？ 不太明白，还请大侠指教。
如果引用的是opc automation 2.0，是不是理论上各家的都应该能连通呢？ 但用这个引用后，调用OPCItems.Setactive设置kepware的仿真SERVER就没动静（并不报错），如果引用他们公司自己的AUTOMATION就可以。 奇怪，是不是也是因为是仿真软件的缘故的啊？
发表于：2004-11-16 15:31:00
10楼
//写点的部分代码
OPCAsyncIO2 opcAsyncIO2;
if( opcAsyncIO2.Attach( opcGroup ) == S_OK )
{
transactionID = 2; // any number the client wants
COleVariant vt( dlg.m_value ); // initialize as a string
vt.ChangeType( pCurrentItem->value.vt ); // let COleVariant convert!
HRESULT hr = opcAsyncIO2.Write(1, &pCurrentItem->hServerHandle,
vt, transactionID, &transactionID, &pErrors);
if( SUCCEEDED(hr) )
{
if( FAILED(pErrors[0]) )
{
ReportError( _T("ASync Write: "), pErrors[0] );
}
CoTaskMemFree( pErrors );
}
else
{
ReportError( _T("ASync Write: "), hr );
}
}
发表于：2004-11-21 20:00:00
11楼
Private Sub additem_Click()
Dim Browser As OPCBrowser
Dim SomeName As Variant
Dim i As Integer
Dim flat As Boolean
flat = True
ARealOPCServer = servername
Call connect(ARealOPCServer, ARealOPCNodeName)
Set Browser = AnOPCServer.CreateBrowser
Set AnOPCServerBrowser = Browser
AnOPCServerBrowser.ShowLeafs (flat) '显示叶
'AnOPCServerBrowser.ShowBranches'显示枝
For i = 1 To AnOPCServerBrowser.Count
SomeName = AnOPCServerBrowser.Item(i)
List4.additem SomeName
Next i
End Sub
可以实现遍历opc server中的Item
热门招聘
相关主题
- VB.NET编写上位机程序如何与...
[2242] - OPCJ.SampleServer.1下载[4926]
- 真诚求助：用Delphi导入opcda...[2777]
- 请教高手：SyncRead的问题[1612]
- OPC Server重启后，Client不能...[1373]
- OPC通讯协议介绍[10145]
- OPC中的质量戳是有什么作用的...[4756]
- 有人用过cogent opc datahub...[1751]
- OPC远程通讯在不同网段（探讨...[7651]
- 求助：连接OPCserver，系统报错...[3096]
官方公众号
智造工程师
-
客服
-
小程序
-
公众号
工控网智造工程师好文精选
