Obtener datos de 2 tablas - problema

[Evac12]

Hola amigos,
Tengo un problema de desconocimiento. Soy nuevo en ASP y nuevo en el foro, y lo primero que hice fué buscar en las FAQs, pero no encontré nada parecido.
El asunto es el siguiente:
Necesito extraer datos de dos tablas (juguetes y categorias) que se encuentran en una .mdb
Este es mi codigo:
<%
Dim titulo
titulo = Request.QueryString("columna")

' Viene de la pagina anterior

Set con = Server.CreateObject("ADODB.Connection")
con.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/Base de datos.mdb")

sql = "SELECT * FROM juguetes WHERE " & Request.QueryString("columna") & "=1"
sql7 = "SELECT * FROM categorias WHERE clave= titulo"

set result = con.Execute(sql)
set result7 = con.Execute(sql7)

%>

Me sale error: Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 1.

Alguien me puede ayudar?. Si la solucion ya alguien la dió y la pasé por alto pido mil disculpas.

Gracias a todos

[Adler]

Hola

Prueba así

sql = "SELECT juguetes.campo, categorias.clave FROM juguetes,categorias WHERE juguetes.campo =1 and categorias.clave = "'&titulo&"'"
con.Execute(sql)

Suerte

[Evac12]

Muchas Gracias Adler.
Desafortunadamente no me funcionó, pero creo que la culpa es mia ya que traté de adaptar tu respuesta a mi codigo. Este es el codigo completo que estoy implementando:

<%
Dim campo
campo = Request.QueryString("columna")

Set con = Server.CreateObject("ADODB.Connection")
con.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/Base de datos.mdb")

sql = "SELECT * FROM juguetes WHERE "&campo&"=1"
sql5 = "SELECT * FROM juguetes WHERE novedades= 1"
sql6 = "SELECT * FROM juguetes WHERE novedades= 2"
sql7 = "SELECT * FROM categorias WHERE clave="&campo&""

set result = con.Execute(sql)
set result5 = con.Execute(sql5)
set result6 = con.Execute(sql6)
set result7 = con.Execute(sql7)

%>

Mas adelante ubico los valores de las tablas de esta manera:

<%=result7("categoria")%>

En este momento me aparece un error en la linea 16 (set result7 = con.Execute(sql7)) diciendo: Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 1.

No se si sea neceasario publicar mas informacion, mil gracias nuevamente

[Adler]

Hola

¿Qué tipo de dato te llega por la query, numérico o texto?

numérico
"'&campo&'"

texto
"&campo&"

Por otro lado, puedes optimizar la consulta aplicando el código que te expuse en el anterior post.

Suerte

[Evac12]

Hola Adler,
Es un dato de texto el que llega por la consulta.
Ya optimicé como dijiste pero aun nada, voy a tener que enviar el parametro desde la pagina anterior.

[Adler]

Hola

¿A qué te refieres con ...?

Iniciado por Evac12

voy a tener que enviar el parametro desde la pagina anterior.

Se supone que el parámetro se obtiene, o bien de un formulario con un campo que se llame columna, o bien de un vinculo, de una función, etc... da igual que sea desde una página anterior o desde esa misma página

[Evac12]

Hola,
La idea de esta consulta:
sql7 = "SELECT * FROM categorias WHERE clave="&campo&""
Es mostrar la categoria de los juguetes, por ejemplo, Jueguetes de 0 a 4 años.
Estas categorias estan listadas en la tabla "categorias" de la base de datos.

Categorias
Clave categoria

C1 Juguetes en Promocion
C2 Control remoto
C3 Edades de 0 a 4 años
C4 Edades de 5 a 8 años
C5 Edades de 9 a 12 años

La variable "campo" viene de la pagina anterior:

<a href=intern.asp?columna="C1">Juguetes en Promoci&oacute;n</a>

y se define en:

Dim campo
campo = Request.QueryString("columna")

Cuando decia: "voy a tener que enviar el parametro desde la pagina anterior"
me referia a hacer algo asi:

<a href=intern.asp?columna="C1"?titulo="Juguetes en Promoci&oacute;n">Juguetes en Promoci&oacute;n</a>

pero seria como la solucion facil y poco elegante...

Adler, que pena ser tan obvio pero es para que no existan dudas y me puedas ayudar mejor, por favor cuenta con toda mi gratitud por tu esfuerzo e interes.

[Adler]

Hola

Creo que ya tengo la solución

Iniciado por Evac12

<a href=intern.asp?columna="C1">Juguetes en Promoci&oacute;n</a>

Cambialo por

Código:

<a href=intern.asp?columna=C1>Juguetes en Promoci&oacute;n</a>

sobran las comillas

Iniciado por Evac12

<a href=intern.asp?columna="C1"?titulo="Juguetes en Promoci&oacute;n">Juguetes en Promoci&oacute;n</a>

Eso no funcionaría ya que debería de ser

Código:

<a href=intern.asp?columna=C1&amp;titulo="Juguetes en Promoci&oacute;n">Juguetes en Promoci&oacute;n</a>

Suerte

[Evac12]

Adler, mil y mil gracias, que inmisericorde es el código. UN par de comillas me tenian del cuello. Un abrazo desde Colombia.