Компания ДЭП - Форумы

Visual Studio 2008
При создании ВЕБсайта с ОРС клиентом работает скрипт.
Public Sub Connect()
Dim AnOPCServer As OPCServer
AnOPCServer = New OPCServer
AnOPCServer.Connect("OPC.Dep.1")

TextBox2.Text = AnOPCServer.ServerName
'-------------------------------------------------------------------------
Dim AllOPCServers As Object
Dim i As Integer
AllOPCServers = AnOPCServer.GetOPCServers
For i = LBound(AllOPCServers) To UBound(AllOPCServers)
ListBox1.Items.Add(AllOPCServers(i))
Next i

'Dim MyGroups As Object
'MyGroups = AnOPCServer.OPCGroups

End Sub

Выдает список ОРС серверов и имя подключенного OPC.Dep.1.

При попытке создать группы
Dim MyGroups As Object
MyGroups = AnOPCServer.OPCGroups

вылезает ошибка

Unable to cast object of type 'OPCAutomation.OPCServerClass' to type 'OPCAutomation.IOPCGroups'.

Что неправильно? dll или VB?

библиотека

вероятно используется v.2.0
нужно не ниже v.2.2

Аналогичные проблемы испытывают многие.
На форуме http://social.msdn.microsoft.com/Forums ... 1c6545def5
прочитал:
I have seen VB.NET applications that make use of the OPC Automation dll. This was originally intended for VB apps, but some vendors have upgraded the automation interface to work with VB.NET You would have to ask specifically because not all versions do.

Смысл в том, что DLL OPC Automation первоначально была предназначена для приложения VB, но некоторые производители обновили интерфейс автоматизации работы с VB.NET.
Вопрос. Планируется ли обновление OPCServer DEP для работы с VB.NET?

andreym02klg писал(а):Вопрос. Планируется ли обновление OPCServer DEP для работы с VB.NET?

В ближайшие пол года не планируется. Возможно уже есть "обертка" над OPCAutomation для работы с VB.NET.

Этой обёртке уже "100 лет в обед". OPCFoundation её афтар.

Вот эта <http://gray-box.net/download_daawrapper.php> обёртка тоже рабочая - работаем с ней уже несколько лет. Основное в ней функционирует нормально.