problem med dll

jeg er ved at lave et program der skal starte op via APP_INIT DLLs
dvs jeg skal lave en dll der loader med windows og derefter starter mit program..

men jeg kan kun få min dll til at gøre noget når jeg kalder den fra et test vb app
og det nytter jo ikke når det er dll'en der skal starte mit program..

min test dll kode ser sådan her ud:

Public Sub dlltest()
Dim objCont As COMSVCSLib.ObjectContext
Set objCont = GetObjectContext
MsgBox ("test")
objCont.SetComplete
Set objCont = Nothing
End Sub