12/05/2005, 13:01
|
| | | Fecha de Ingreso: diciembre-2003 Ubicación: Santa Fe - Argentina
Mensajes: 35
Antigüedad: 21 años, 4 meses Puntos: 0 | |
| Hola, gracias por las respuestas, te cuento como hago la ejecución del RS:
Set MyConn=Server.CreateObject("ADODB.Connection")
Set RS2 = Server.CreateObject("adodb.recordset")
str="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("..\db\baseadvice.mdb") & ";"
MyConn.Open str
consulta2 = "SELECT Top 4 Productos.CodProducto, Productos.NombreProducto, Productos.Codigo, TiposProductos.Tipo, Productos.Precio, Productos.Imagenchica, Productos.Oferta, Rnd([CodProducto]) AS n FROM TiposProductos INNER JOIN Productos ON TiposProductos.Codigo=Productos.CodTipoProducto WHERE ((Productos.Oferta=True)) ORDER BY Rnd([CodProducto]) Desc"
Set RS2 = MyConn.Execute(consulta2)
y cuando termino de generar todo lo que hago es:
Myconn.Close
set rs2 = nothing
set Myconn = nothing
Saludos y Gracias!!!
Analía |