-------------snip-----------------
oCOMSVR = createobject('testdll.webcls')
oRS = oCOMSVR.getrs() <-- that function return an recordset

do while NOT oRS.eof
response.write(oRS.fields('CUSTNAME'))
oRS.MOVENEXT
loop

In the GETRS function, I added a property to store the return recordset and used RETURN command to return that property. I try that COM with VFP front-end client, it work fine! I also try to build MTDLL or EXE COM, it worked with VFP client but it doesn't work on the web server.
----------------------------------
Hi Justy Chow

Try this:

oCOMSVR = createobject('testdll.webcls')
oCOMSVR.getrs() &&--- store in property loRS the ado rs
loRS = oCOMSVR.oRs

do while NOT oRS.eof
response.write(oRS.fields('CUSTNAME'))
oRS.MOVENEXT
loop

This may work... IMHO