昨天看到网友需要用VB读取局域网WINCC变量,我想了一下觉得可以直接使用CreateObject创建一个远程对象,因为没有试过所以测试了一下,最后是可行的,可以创建远程对象!
首先两台电脑加入局域网家庭组,在网络中能找目标电脑并且能访问!
然后在目标电脑计算机管理\本地用户和组\组\Administrators用户组添加HomeGroupUser$用户,这个是关键!
开始在VB创建对象访问WINCC
Private Wincc As Object
Private Sub Form_Load()
Set Wincc = CreateObject("WinCC-Runtime-Project", "\\AD")' "\\AD"是目标电脑
End Sub
Private Sub Command1_Click()
Text1.Text = Wincc.getvalue("a")
End Sub
Private Sub Command2_Click()
Dim a, b
a = Text3.Text
b = Wincc.setvalue("a", a)
End Sub
刚开始一直报权限问题,后来把目标电脑的HomeGroupUser$用户添加到Administrators用户组提高权限后就能进行对象创建!两台电脑都安装了WINCC!