在ASP中调用DLL时的返回值的问题(100分)!

[Algernon]

我在ASP中调用DLL来操作数据库,DLL中的返回值应该用什么类型的?在ASP中怎么取?
我用了下面的方法，但返回值好像ＡＳＰ不认，我用的是返回一个结构
Set obj = Server.CreateObject("DLL")

请教各位有什么好点的办法，我主要是想从数据库中取出Ｎ条记录然后填到下拉框中

[ttt2]

Dim cn As ADODB.Connection
Dim rs As ADODB.recordset


Public Function abc() As ADODB.recordset
Set cn = New ADODB.Connection
cn.Open "driver={sql server};uid=sa;pwd=abc;server=zhao;database=pubs"
Set rs = New ADODB.recordset
rs.Open "select * from authors", cn, 1, 3
Set abc = rs

End Function

[Algernon]

我想知道的是反回的ＲＳ在ＡＳＰ中怎么处理？
ＲＳ我已经可以返回了，但就是返回的ＲＳ在ＡＳＰ中不认！

[Reker熊]

COM中

Public Function abc() As Variant
....
End Function

可以將RS以Variant類型返回,因為asp是弱類型檢查,所以需要返回自動識別類型

[Algernon]

dim aaa,bbb
set aaa = Server.CreateObject("myResume.clsResumeExcute")
aaa.getNameByIDWithArray("BI001")
response.write aaa.getNameByIDWithArray("BI001")("CID")
將RS以Variant類型返回是可以了，但为什么我现在只能这样取数据

如果这样
dim aaa,bbb
set aaa = Server.CreateObject("myResume.clsResumeExcute")
bbb = aaa.getNameByIDWithArray("BI001")
If not bbb.eof then
　　Do while not bbb.eof
　　　　response.write bbb("CID")
　　　　bbb.movenext
　　Loop
End if
就报是＂bbb = aaa.getNameByIDWithArray("BI001")＂的错，怎么回事？

[Algernon]

我顶一下

[Reker熊]

==>
Set bbb=Server.CreateObject("ADODB.RecordSet")
Set bbb=aaa.getNameByIDWithArray("BI001")
bbb是對象,不是變量

[huhan3]

同意楼上的