是的,实例化对象应采用CreateObject方法,如: Dim uTemp as MyClass.DBConnect Set uTemp= CeateObject("MyClass.DBConnect") '启动本地COM+服务 Set uTemp= CeateObject("MyClass.DBConnect","SeverName")'启动服务器COM+服务
所以,尽可能的不要改变接口函数 Dim uTemp as MyClass.DBConnectSet uTemp=new MyClass.DBConnect
Dim uTemp as MyClass.DBConnect
Set uTemp= CeateObject("MyClass.DBConnect") '启动本地COM+服务
Set uTemp= CeateObject("MyClass.DBConnect","SeverName")'启动服务器COM+服务
Dim uTemp as MyClass.DBConnectSet uTemp=new MyClass.DBConnect