Trying to write a COM accessible DLL

[Terry Olsen]

Following the instructions here:
http://www.csharpfriends.com/Articles/getArticle.aspx?articleID=113

The following is my ClassLibrary code:

Imports System

Namespace Test

Public Class Test2

Public Sub Test3()
End Sub

Private outMxRecords As String()

Public ReadOnly Property MxRecords() As String()
Get
Return outMxRecords
End Get
End Property

Public Sub GetMxRecords(ByVal Domain As String)
outMxRecords = "test1.test2".Split(".")
End Sub

End Class

End Namespace

I build the DLL, copy it to the C:\WINNT\System32 directory, then run
REGASM on it, it tells me "Types Registered Successfully"

The following is my VBScript code:

dim oDLL
set oDLL = Createobject("Test.Test2")
if err.number<>0 then
msgbox "ERROR " & err.number & " opening DLL"
else
msgbox "Success"
end if

When I run the script, I get the following error:

ActiveX component can't create object: 'Test.Test2'

Error code is 800A01AD

I can't see anything wrong with this. Hopefully someone here can help me
out.

 

[Guest]

well i see already one thingy you missed

A com creatable class must have a parameterless public sub new

here is an example i once showed in this newsgroup :

http://groups.google.com/group/micr...l+posseth+COM+VB.Net&rnum=28#ca996d74d250974e

"csharpfriends" you could have known this wouldn`t work in VB ;-)


regards

Michel Posseth [MCP]