求助WINCC，连接PLC监控

北京三维力控有限公司广州办将在2011.9.22-23号为大家举办组态软件6.1的培训
培训内容：
力控软件的结构，工程管理器的使用；创建一个力控应用项目的实例；力控软件的开发环境；变量的使用；实时数据库组态；动画连接的组态；编写动作脚本；报警与事件；实时趋势与历史趋势曲线；历史报表与万能报表；力控控制策略生成器的组态；运行系统的安全管理，工程加密。
地址：广州天河区大观南路12号润农商务中心2409
联系电话：02087573896  15013240652

在全局脚本里面编写定时刷新脚本，每次刷新都去读取远程OPC一个变量的质量状态。
当通讯质量状态值<192时就表示通讯异常了。

Dim IOSte
Dim objTag
Dim objTagComm

Set objTag = HMIRuntime.Tags("Device1.Status") ''设备外部变量
Set objTagComm = HMIRuntime.Tags("Device1.Comm") ''WinCC内部变量
IOSte = objTag.Read

If objTag.QualityCode < 192 Then
 objTagComm.Write 1 ''如果质量代码小于192则置位内部变量Device1.Comm，表示通讯异常报警
Else
 objTagComm.Write 0 ''如果质量代码小于192则复位内部变量Device1.Comm，表示无通讯异常报警
End If

不过建议你分时段读取，比如一秒钟只读取10个远程OPC变量，那么8秒钟就一个循环了。
如果一次线读取多个很容易导致其他通讯数据响应过慢。