VB6 Run time error '13' Type Mismatch

[rhitam30111985]

HI all ,


I am using Windows 2000 OS for out server . We use a VB tool to deploy all the COM applications. In that , this is a snippet of code that is failing :

 
Option Explicit
Dim ComAdm As New COMAdmin.COMAdminCatalog
Set ComAdm = CreateObject("COMAdmin.COMAdminCatalog")
 

At this point , the program just throws an exception "Type mismatch" and comes out .

I have searched google for this but cant seem to find the appropriate answer .

Any ideas ?

Regards ,

Rhitam

[shrimant]

@rhitam30111985
Either Use
Dim ComAdm As New COMAdmin.COMAdminCatalog
Or
Set ComAdm = CreateObject("COMAdmin.COMAdminCatalog")

You cannot use both on the same variable, the first statement is an early binding and the second statement is an late binding, since the same variable is early binded, you cannot use is for late.

[rhitam30111985]

Hi ,

Sorry to post to this thread so late but this is the way it has been instructed to use in the MSDN site :

http://msdn.microsoft.com/en-us/libr...42(VS.85).aspx

Is it because of the option explicit statement on the top or does the "new" keyword make a difference?