Как я могу прочитать геометрию byte() в массив точек, используя VBScript?

Question

У меня есть двоичный файл "geo.bin", который представляет некоторую геометрию (я думаю, OGR WKB). У двоичного файла есть список точек, которые составляют многоугольник. Я хотел бы прочитать двоичные данные и создать массив точек в моем скрипте VBScript.

Существуют ли уже существующие решения, которые я могу использовать? Возможно, класс.NET, такой как DbGeometry? Если так, то как бы я создал такой класс? Я пробовал следующее, но получаю ошибку "Компонент ActiveX не может создать объект:" GetObject "":

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

Dim logfile
Set logfile = fso.CreateTextFile("A:\Atoll\geotest.log")

'read binary geometry into byte array
Dim stream, bytes
Set stream = CreateObject("ADODB.Stream")
stream.Open
stream.Type = 1
stream.LoadFromFile("A:\Atoll\geo.bin")
bytes = stream.Read
stream.Close

Dim dbgeo: Set dbgeo = GetObject("C:\Windows\Microsoft.NET\Framework64\v4.0.30319\System.Data.Entity.dll", "DbGeometry")
logfile.Write(TypeName(dbgeo) & vbCrLf)

Dim poly: Set poly = dbgeo.FromBinary(bytes)

Я также пытался использовать:

Dim dbgeo: Set dbgeo = CreateObject("System.Data.Spatial.DbGeometry")

Но получите похожую ошибку.