在wincc项目里写一个脚本(vbs)拼IP地址,用于监测网络连接状态,能拼通为绿色1 ,不通为红色,求指教,修改。
Function BackColor_Trigger(Byval Item)
If PingIP("192.168.3.1") = True Then
Dim FF
Set FF = ScreenItems("圆1")
If True.Read = True Then
aa.BackColor = RGB(0,255,127)
End If
End If
End Function