如何从COM中返回数组到asp程序？

Question

我用VB做了个COM，返回代表数组的variant变量，
function myfunction() as variant
   Redim myarr()
   .
   .
   .
   myfunction=myarrEnd function
可是在asp中无法使用返回值。
请教该如何做？

Answer 1

Dim myarr() '注意，一定不要写成dim myarr() as string
Public Function myfunction()
    ReDim myarr(2)
    myarr(0) = "hello"
    myarr(1) = 1
    myfunction = myarr
End Function

Answer 2

ASP中
set obj=Server.Createobject("testarr.class1")
r=obj.myfunction
response.write r(0)