Article ID: 224422 - Last Review: July 16, 2004 - Revision: 3.2

PRB: Returning a UDT from a VB COM Object Brings an Error

View products that this article applies to.

System TipThis article applies to a different operating system than the one you are using. Article content that may not be relevant to you is disabled.

This article was previously published under Q224422

SYMPTOMS

When you return a user-defined data type (UDT) from a Visual Basic COM object, you might get one of the following error messages:

Microsoft VBScript runtime error '800a01a8'
Object required

-or-

Response object error 'ASP 0106 : 80020005'
Type Mismatch
?
An unhandled data type was encountered

Back to the top

CAUSE

User-defined data types are not supported in the current version of Active Server Pages (ASP).

Back to the top

Active Server Pages does not support UDTs, but you can work around this by creating a new class to handle the data in place of the UDT and setting the instancing property to PublicNotCreateable. This will ensure that you can pass the necessary information to and from ASP, as well as ensuring that the class cannot be created outside of the DLL.

Back to the top

STATUS

This behavior is by design.

Back to the top

MORE INFORMATION

Steps to Reproduce Behavior

Create a Visual Basic ActiveX DLL project called VBUDTPrj.
Add class module called VBUDTObj.

Define a UDT as follows:

Public Type TestUDT
   strName as String
   strDept as String  
End Type

Implement the following method:

Public Function TestMethod() As Variant
    Dim udtTestData As TestUDT
    
    udtTestData.strDept = "TestDept"
    udtTestData.strName = "TestName"
    
    TestMethod = udtTestData    
End Function

Create an ASP page that calls this method:

<%
   Dim objTest, udtData
   Set objTest = Server.CreateObject("VBUDTPrj.VBUDTObj")
   udtData = objTest.TestMethod()

   Response.Write( "Name = " & udtData.strName & "<BR>" )
   Response.Write( "Dept = " & udtData.strDept & "<BR>" )
%>