I have an active-x dll that implements 2 interfaces which the object browser created for me by drag & drop in to the code.... But I cant get the dll itself to instatiate with a newobject

oHostScript = NEWOBJECT("SCRIPTIFACEENETLib.ScriptInterfaceENET")


LOCAL oMethods AS hostScript_Methods
oMethods = NEWOBJECT("hostScript_Methods")

LOCAL oEvents AS hostScript_Events
oEvents = NEWOBJECT("hostScript_Events")

? EVENTHANDLER( oHostScript , oMethods )
? EVENTHANDLER( oHostScript , oEvents )

The newobject line fails with a error message of
Class definition SCRIPTIFACEENETLIB.SCRIPTINTERFACEENET is not found.

The DLL is registered and in VB 6.0 VB knows about it if I add it to a project's references....

Does anyone know what I am doing wrong ?


TIA

DEFINE CLASS hostScript_Events AS SESSION OLEPUBLIC

	IMPLEMENTS _IScriptInterfaceEvents IN "C:\PROGRAM FILES\HAND HELD PRODUCTS\TT8000 SERIES SDK\HOST_TO_SCRIPT TOOLS\BIN\SCRIPTIFACEENET.DLL"

	PROCEDURE _IScriptInterfaceEvents_DeviceConnected(bstrIPAddress AS STRING) AS VOID;
			HELPSTRING "method DeviceConnected"
		* add user code here
		
		? "Device Connected Fired !"
		
	ENDPROC

	PROCEDURE _IScriptInterfaceEvents_Data(bstrData AS STRING) AS VOID;
			HELPSTRING "method Data"
		* add user code here
	ENDPROC

	PROCEDURE _IScriptInterfaceEvents_Close() AS VOID;
			HELPSTRING "method Close"
		* add user code here

		? "Closed "

	ENDPROC

ENDDEFINE




DEFINE CLASS hostScript_Methods AS SESSION OLEPUBLIC

	IMPLEMENTS IScriptInterfaceENET IN "C:\PROGRAM FILES\HAND HELD PRODUCTS\TT8000 SERIES SDK\HOST_TO_SCRIPT TOOLS\BIN\SCRIPTIFACEENET.DLL"

	PROCEDURE IScriptInterfaceENET_BmpToBin(hBitmap AS NUMBER, hPalette AS NUMBER, hSrcDC AS NUMBER, nWidth AS INTEGER, nHeight AS INTEGER, pbstrBuffer AS STRING, pnLength AS INTEGER) AS LOGICAL;
			HELPSTRING "method BmpToBin"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_PutText(x AS INTEGER, Y AS INTEGER, bstrText AS STRING) AS LOGICAL;
			HELPSTRING "method PutText"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_ClosePort() AS VOID;
			HELPSTRING "method ClosePort"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_PadIsConnect() AS LOGICAL;
			HELPSTRING "method PadIsConnect"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_ColorConvert(bstrFileName AS STRING, pchBuffer AS NUMBER, pnLength AS INTEGER) AS LOGICAL;
			HELPSTRING "method ColorConvert"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_DisplayObject(nID AS INTEGER, x AS INTEGER, Y AS INTEGER) AS LOGICAL;
			HELPSTRING "method DisplayObject"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_LoadMemBitmap(nID AS INTEGER, nType AS INTEGER, bstrFileName AS STRING) AS LOGICAL;
			HELPSTRING "method LoadMemBitmap"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_GetTextVar(bstrName AS STRING, pbstrData AS STRING @) AS LOGICAL;
			HELPSTRING "method GetTextVar"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_SetTextVar(bstrName AS STRING, bstrText AS STRING) AS LOGICAL;
			HELPSTRING "method SetTextVar"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_GotoLabel(bstrLabel AS STRING) AS LOGICAL;
			HELPSTRING "method GotoLabel"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_RunScript(bstrName AS STRING, bstrLabel AS STRING) AS LOGICAL;
			HELPSTRING "method RunScript"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_LoadScript(nPortNum AS INTEGER, bstrScriptName AS STRING, bstrFileName AS STRING, nBaud AS INTEGER) AS LOGICAL;
			HELPSTRING "method LoadScript"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_SetFont(fontid AS INTEGER) AS LOGICAL;
			HELPSTRING "method SetFont"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_SCGetIssuerData(pchAppCrypto AS NUMBER, pnAppIntPro AS INTEGER, pbstrPriAccNum AS STRING, pchTermCap AS NUMBER, pchIssAppData AS NUMBER, pwIssuerCC AS INTEGER, pbstrIfdSerialNum AS STRING, pchTVR AS NUMBER, pwTranCurCode AS INTEGER, pdwRandomNum AS NUMBER) AS LOGICAL;
			HELPSTRING "method SCGetIssuerData"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_OpenEthernetPort(bstrPadAddress AS STRING, dwMsecs AS NUMBER) AS LOGICAL;
			HELPSTRING "method OpenEthernetPort"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_ReConnectEthernet(bstrPadAddress AS STRING, dwMsecs AS NUMBER) AS LOGICAL;
			HELPSTRING "method ReConnectEthernet"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_StartServer(nPort AS INTEGER, bstrServerAddress AS STRING) AS LOGICAL;
			HELPSTRING "method StartServer"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_GetPadIPAddress(pbstrData AS STRING @) AS LOGICAL;
			HELPSTRING "method GetPadIPAddress"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_SendToCommPort(nCommPort AS INTEGER, bstrData AS STRING) AS LOGICAL;
			HELPSTRING "method SendToCommPort"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_GetFromCommPort(nCommPort AS INTEGER, dwNumBytes AS NUMBER, pbstrData AS STRING @) AS LOGICAL;
			HELPSTRING "method GetFromCommPort"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_LoadFirmware(nPortNum AS INTEGER, bstrFileName AS STRING, nBaud AS INTEGER) AS LOGICAL;
			HELPSTRING "method LoadFirmware"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_DisplayImage(nXCoordiante AS INTEGER, nYCoordiante AS INTEGER, nType AS INTEGER, bstrFileName AS STRING) AS LOGICAL;
			HELPSTRING "method DisplayImage"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_SaveSigAs(SigPointsData AS STRING, FileName AS STRING) AS LOGICAL;
			HELPSTRING "method SaveSigAs"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_PadGetModel(pbstrData AS STRING) AS LOGICAL;
			HELPSTRING "method PadGetModel"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_GetNumVar(bstrName AS STRING, plData AS NUMBER @) AS LOGICAL;
			HELPSTRING "method GetNumVar"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_SetNumVar(bstrName AS STRING, lNewData AS NUMBER) AS LOGICAL;
			HELPSTRING "method SetNumVar"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_GetBigNumVar(bstrName AS STRING, plData AS NUMBER @) AS LOGICAL;
			HELPSTRING "method GetBigNumVar"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_SetBigNumVar(bstrName AS STRING, lNewData AS NUMBER) AS LOGICAL;
			HELPSTRING "method SetBigNumVar"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_GetBinVar(bstrName AS STRING, pbstrData AS STRING @) AS LOGICAL;
			HELPSTRING "method GetBinVar"
		* add user code here
	ENDPROC

	PROCEDURE IScriptInterfaceENET_SetBinVar(bstrName AS STRING, bstrText AS STRING) AS LOGICAL;
			HELPSTRING "method SetBinVar"
		* add user code here
	ENDPROC

ENDDEFINE