动态取得asp类成员

有一个类
class adc
{
dim a,b,c
}
如何在另外一个类中取得类成员及成员个数
class getmenber
{
dim menbers()
function getmenbers(resclass)
'res为一未知类
'getmenber函数要做的就是要将resclass的成员给menbers数组
'这样的函数具体应该怎么实现
end function
}

---

set a=new A
a.username    '可以取到A的属性username

取得成员的个数
re:
可以么？