Lave activeX der kan kører i egen tråd

Jeg har nogen gange lavet det således at min ActiveX har en Command buffer.
Jeg kunne derfor kalde ojbTest.Command("DoStuff")
Sub kunne se således ud: (CmdBuf er en global Collection i din ActiveX)

Dim CmdBuf As New Collection

Public Sub Command(Name As String)
CmdBuf.Add Name
End Sub

Dette gør at dit kald til ActiveX'en returnere med det samme.
Din ActiveX skal så stå og undersøge (måske 10 gange i sekundet) om der
er noget i command bufferen:

Private Sub Timer1
If CmdBuf.Count > 0 then
    If CmdBuf.Item(1) = "DoStuff" Then
        'Kald din DoStuff routine
    ElseIf CmdBuf.Item(1) = "DoNogetAndet" Then
        'Kald DoNogetAndet
    EndIf
   
    CmdBuf.Remove(1)
EndIf
End Sub

Endelig skal din ActiveX være af typen ActiveX.exe
Håber du fatter max!

Hej Shy

ActiveX'en skal være en der skal være tilgænglig for kunder, derfor syntes jeg ikke helt at løsningen holder...

jeg går og overvejer en flertrådsløsning med at wrapperklasse skrevet i dotNet..

men ville egentlig fortrække en pæn ren løsning i vb6