vba и vbs

[andreym02klg]

Подскажите, скрипт на VBA:
Dim AnOPCServer As OPCServer
Set AnOPCServer = New OPCServer
AnOPCServer.Connect "OPC.Dep.1"

работает.

Этот же скрипт на VBS
Dim AnOPCServer
Set AnOPCServer = New OPCServer
AnOPCServer.Connect "OPC.Dep.1"
не работает, пишет, что переменная OPCServer не определена.

Как определить переменную AnOPCServer As OPCServer в VBS, если там все переменные Variant?

[Чеклецов Андрей]

OPC Data Access Automation Specification
глава 2, пункт 2.1, абзац 3