在ASP中调用DLL时的返回值的问题(100分)! [问题点数：100分，结帖人Algernon]
|
我用了下面的方法，但返回值好像ＡＳＰ不认，我用的是返回一个结构 Set obj = Server.CreateObject("DLL") 请教各位有什么好点的办法，我主要是想从数据库中取出Ｎ条记录然后填到下拉框中 |
|
|
|
|
|
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 |
|
|
|
我想知道的是反回的ＲＳ在ＡＳＰ中怎么处理？
ＲＳ我已经可以返回了，但就是返回的ＲＳ在ＡＳＰ中不认！ |
|
|
|
COM中
Public Function abc() As Variant .... End Function 可以將RS以Variant類型返回,因為asp是弱類型檢查,所以需要返回自動識別類型 |
|
|
|
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")＂的错，怎么回事？ |
|
|
|
我顶一下
|
|
|
|
==>
Set bbb=Server.CreateObject("ADODB.RecordSet") Set bbb=aaa.getNameByIDWithArray("BI001") bbb是對象,不是變量 |
|
|
|
同意楼上的
|
|
|
关闭