select

[zenora]

Tengo este codigo, bueno la pagina no esta terminada, pero puse un response.write por ver si funciona, pero no funciona. Mi idea es:
Tengo una html con un formulario y eln él un select. Quiero que en la ASP se selecione de la db la entrada selecionada en el select, este codigo me da error.

<%
Dim oConn
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\novecento\db\base.mdb"))
vlista=Request.Form ("lista")
isql="select * from chupitos where nombre='" & vlista &"'"
set rs = oConn.Execute (isql)
Response.Write rs.fields("nombre")
%>

Me podriais decir donde esta el error, o como seria el codigo para hacer lo que quiero?
Gracias

[bakanzipp]

podrias decirnos que error te da y cual es la linea conflictiva

[bakanzipp]

a todo esto...te falta crear el objeto recordset...no si sera eso

set rs= Server.Createobject("ADODB.Recordset")

[zenora]

Buenas, graias por responderme
he cambiado el codigo y me sale un error distinto:

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'Execute'

/novecento/votos.asp, line 15

Te pongo ahora el codigo cambiado.
<%
Dim oConn
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\novecento\db\base.mdb"))
set oConn= Server.Createobject("ADODB.Recordset")
vlista=Request.Form ("lista")
isql="select * from chupitos where nombre='" & vlista &"'"
set rs = oConn.Execute (isql)
Response.Write rs.fields("nombre")%>
Esta es la pagina donde esta puesto el codigo

[bakanzipp]

parece que no viste bien el codigo que postee...debes crear el objeto recordset (rs) no el de conexion crearlo dos veces con distintas referencias

Dim oConn
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\novecento\db\base.mdb"))
set rs= Server.Createobject("ADODB.Recordset")