I installed Babylon translator to my PC, I looked up ProgID's to create an instance of Babylon Translator from RegEdit in HKEY_CLASSES_ROOT: where ProgID's are stored.
Set BabIEPI = CreateObject("BabylonIEPI.BabylonProxy")
Set BabOffice = CreateObject("BabylonOfficeAddin.OfficeAddin")
These are the only two ProgID's that could be created from Babylon, the rest could not be created.
Here are functions from the IE tool bar: BabylonIEToolBar.dll
//BabylonTB 1.0 Type Library
//Version: 1.0
BabylonTBLib;
GUID = {162484B8-B114-453F-A344-C0B24B0F1D99};
//BabylonTB Class
CoClass BabylonTB;
GUID = {965B54B0-71E0-4611-8DE7-F73FA0B20E26};
//disp Interface
Dispatch IBabylonTB;
GUID = {499BD1D6-2D1D-4641-8DBA-A0B07C86033A};
function QueryInterface(riid: ^GUID; out ppvObj: ^^VOID); stdcall;
function AddRef: UI4; stdcall;
function Release: UI4; stdcall;
function GetTypeInfoCount(out pctinfo: ^UINT); stdcall;
function GetTypeInfo(itinfo: UINT; lcid: UI4; out pptinfo: ^^VOID); stdcall;
function GetIDsOfNames(riid: ^GUID; rgszNames: ^^I1; cNames: UINT; lcid: UI4; out rgdispid: ^I4); stdcall;
function Invoke(dispidMember: I4; riid: ^GUID; lcid: UI4; wFlags: UI2; pdispparams: ^DISPPARAMS; out pvarResult: ^Variant; out pexcepinfo: ^EXCEPINFO; out puArgErr: ^UINT); stdcall;
//method Translate
function Translate(out word: BSTR; out windowDisp: Variant); stdcall;
//BabylonTBProxy Class
CoClass BabylonProxyObj;
GUID = {1EF5CFE5-3AD3-4300-9AAC-517715BBCA39};
//TB_Utils Class
CoClass TB_Utils;
GUID = {49320284-A785-4FBE-AD4E-30CAF313573B};
//ITB_Utils Interface
Dispatch ITB_Utils;
GUID = {9EA35643-E7D6-4259-8719-5AEB3A3816A0};
function QueryInterface(riid: ^GUID; out ppvObj: ^^VOID); stdcall;
function AddRef: UI4; stdcall;
function Release: UI4; stdcall;
function GetTypeInfoCount(out pctinfo: ^UINT); stdcall;
function GetTypeInfo(itinfo: UINT; lcid: UI4; out pptinfo: ^^VOID); stdcall;
function GetIDsOfNames(riid: ^GUID; rgszNames: ^^I1; cNames: UINT; lcid: UI4; out rgdispid: ^I4); stdcall;
function Invoke(dispidMember: I4; riid: ^GUID; lcid: UI4; wFlags: UI2; pdispparams: ^DISPPARAMS; out pvarResult: ^Variant; out pexcepinfo: ^EXCEPINFO; out puArgErr: ^UINT); stdcall;
with a little programming skill one could use the created object to use as a translator in Vbscript code.
I hilighted the important function in Red.
Jerry[8D]