Fejl på kode i .dll komponent ?

Hejsa,

Jeg har følgende kode som skal starte Solid Works (et tegneprogram) op. Når koden er lavet som en exe fil virker det hele fint men prøver jeg at lave en dll fil får jeg fejl :

  Dim swApp As Object
  Dim Part As Object
  Dim boolstatus As Boolean
  Dim longstatus As Long
  Dim Annotation As Object
  Dim Gtol As Object
  Dim DatumTag As Object
  Dim FeatureData As Object
  Dim Feature As Object
  Dim Component As Object
  Dim PartTitle As String

  Sub main()
    Set swApp = CreateObject("SldWorks.Application")
    Set Part = swApp.OpenDoc2("D:\Skivetest.SLDPRT", 1, 0, 0, 0, longstatus)
    Set Part = swApp.ActiveDoc
    Part.PrintDirect
    swApp.CloseDoc "Skivetest"
    swApp.ExitApp
  End Sub

Fejlen jeg får ser således ud :

ActiveX component can't create object

/Conset/Test/DllTest.asp, line 12

og det er i denne linie på min asp side :

<%
Dim DllTest
Set DllTest = Server.CreateObject("Conset.Test")
    DllTest.Main() '--- Linie  12
Set DllTest = Nothing
%>

Håber der er en der kan klare den :o)

/Websam