Ayuda Dll Please

[Andr3s]

Bueno al final lo conseguí pero solo de la siguiente forma:


***********ARCHIVO DLL

Public Function selectencuesta() As Recordset

Dim ConnectionString As String
Dim strsql As String
Dim rs As Recordset


ConnectionString = "Driver={SQL Server};Description=***;SERVER=**;UID=**;PWD=**;DA TABASE=**"

Set rs = CreateObject("ADODB.Recordset")
strsql = "SELECT * from encuestas where activa = 0"

rs.Open strsql, ConnectionString, 3, 1
Set selectencuesta = rs

End Function


***********ARCHIVO ASP


Set objrecordsert = Server.CreateObject("DLL.CLASS")
set Rs = objrecordsert.selectencuesta(cint(poll))



Ahora estoy probando la forma de crear solo la conexion desde la dll sin ningun recorsed y crear este desde la página asp pero me da error


***********ARCHIVO DLL


Function conectar()

Set oconn = Server.CreateObject("adodb.connection")
strconn = "Driver={SQL Server};Description=***;SERVER=**;UID=**;PWD=**;DA TABASE=**"

oconn.Open strconn

conectar = oconn

End Function


***********ARCHIVO ASP

set Objeto = server.createobject("conection.conexion")
set Oconn = Objeto.conectar()



error: Object required Linea >>

set Oconn = Objeto.conectar()


donde esta mi fallo?