a ver te mando un pekeño ejemplito que devuelve un recorset desde visual (dll) y los muestra en asp...llamando a un stored procedure..
ASP
Código:
Dim Objeto
Set Objeto = Server.CreateObject("tu_dll.tu_clase")
<OPTION value=0 name=reg>
Seleccione Registro
</OPTION>
<%Dim rs
Set rs = Objeto.Listar()
while not rs.eof%>
<OPTION VALUE="<%=rs.Fields("id")%>"<%if rs.Fields("Id")=cint(request("reg")) then %>SELECTED<%end if%>
<%=rs.Fields("nombre")%>
</OPTION>
<%rs.MoveNext
wend
rs.Close%>
&nbsp;&nbsp;
</select>
</font></td>
VISUAL BASIC
Código:
Public Function Listar() As Recordset
Dim ConnectionString As String
Dim strsql As String
Dim rs As Recordset
ConnectionString = "TU_DSN"
Set rs = CreateObject("ADODB.Recordset")
strsql = "exec sp_Listar"
rs.Open strsql, ConnectionString, adOpenForwardOnly
Set Listar = rs
End Function
STORED PROCEDURE
Código:
CREATE PROCEDURE sp_transBanco
As
Select id,nombre
from Tabla
return
GO
Los stored procedure cambian cuando les envias parametros de entrada y parametros de salida...se declaran con @...hay muchos ejemplos en este foros...es cosa de buscar..
ke te aproveche