ASP Classic:VbScript函数是否可以返回对象？

我正在学习VbScript和ASP经典

VbScript函数是否可以返回对象

下面的代码在第15行显示以下错误：

对象不支持此属性或方法（'800a01b6'错误）

---

我发现了错误的原因

返回函数时，必须使用Set结构

之前（有错误）

之后

<%
Class Customer
    Public Id
    Public Name
End Class

Class CustomerFactory
    Public Function GetCustomer()
        Dim cust
        Set cust = New Customer
        cust.Id = 1
        cust.Name = "Andrew"

        ' Return
        GetCustomer = cust
    End Function
End Class

Dim factory
Dim cust_from_factory

Set factory = New CustomerFactory
Set cust_from_factory = factory.GetCustomer()
%>

' Return
GetCustomer = cust

' Return
Set GetCustomer = cust