I need to pass a DISPATCH object as a dword to a thread

[Thomas Tierney]

Any ideas how to do this?

Thanks

[José Roca]

Use OBJPTR.

[Thomas Tierney]

Thanks for responding!! However I pass the objptr but can not use the object

What I did is this

THREAD FUNCTION TestThread(BYVAL OBJECTPTR AS DWORD) AS DWORD
    LOCAL tObject AS DISPATCH
    
    
    POKE DWORD,VARPTR(tObject), OBJECTPTR
    MSGBOX "Sending Message"
    OBJECT CALL tObject.Submit()
    MSGBOX HEX$(OBJRESULT) ' fails with disp member not found


END FUNCTION

[Cliff Nichols]

Thomas,
If you can post how you access from JavaScript (and more importantly VbScript) I think I can find your answer.

From our discussion in IDispatch expose methods to other languages I am sure that once I overcome what I do not know, I can patch it into what I do actually know.

(GAWWWWD what a scarey thought that I know something )

[José Roca]

According to M$ documentation you must initialize the COM library for the thread:

CoInitializeEx must be called at least once, and is usually called only once, for each thread that uses the COM library. Multiple calls to CoInitializeEx by the same thread are allowed as long as they pass the same concurrency flag, but subsequent valid calls return S_FALSE. To close the COM library gracefully on a thread, each successful call to CoInitializeEx, including any call that returns S_FALSE, must be balanced by a corresponding call to CoUninitialize.

Also

POKE DWORD,VARPTR(tObject), OBJECTPTR

doesn't do any good to the reference count. You have to increase it using AddRef, or use

POKE DWORD,VARPTR(tObject), 0

before the variable goes out of scope.