Ahh, gracias por sacarme la duda
Ahora tengo el problema de que quise implementar esto, y me tira este error:
Tipo de error:
ADODB.Recordset (0x800A0CC1)
No se encontró el elemento en la colección que corresponde con el nombre o el ordinal pedido.
En la linea marcada en
rojo:
Código:
If Request.form("subcategoria") = "" Then
Response.Write("Se encontro un error al recoger datos del formulario")
Exit Sub
End If
Dim rsProductos
Dim strSQL_Productos
Set rsProductos = Server.CreateObject("ADODB.Recordset")
strSQL_Productos = "SELECT tblproductos.id, tblproductos.nombre, tblproductos.categoria_asociada, tblproductos.subcategoria_asociada, tblcategorias.nombre_categoria, tblsubcategorias.nombre_subcategoria FROM tblproductos, tblcategorias, tblsubcategorias WHERE tblproductos.categoria_asociada = tblcategorias.id AND tblproductos.subcategoria_asociada = tblsubcategorias.id AND tblproductos.subcategoria_asociada = " & Request.form("subcategoria")
rsProductos.Open strSQL_Productos, adoCon, adOpenStatic, adLockReadOnly
If rsProductos.RecordCount > 0 Then
%>
<tr>
<td bgcolor="#FFFFFF"><p> </p>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="3%"><img src="images/flechita.gif" alt=">" width="10" height="10" /></td>
<td width="97%"><p>Imposible eliminar la Subcategoria "<%Response.Write(rsProductos("tblsubcategorias.nombre_subcategoria"))%>"</p>
<p>Todavia tiene productos asociados a ella, primero modifique dichos productos:</p>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="13%"><div align="center">ID</div></td>
<td width="35%"><div align="center">Nombre</div></td>
<td width="26%"><div align="center">Categoria</div></td>
<td width="26%"><div align="center">Subcategoria</div></td>
</tr>
<%
Dim i
For i=1 to rsProductos.RecordCount
%>
<tr>
<td><%Response.Write(rsProductos("tblproductos.id"))%></td>
<td><%Response.Write(rsProductos("tblproductos.nombre"))%></td>
<td><%Response.Write(rsProductos("tblcategorias.nombre_categoria"))%></td>
<td><%Response.Write(rsProductos("tblsubcategorias.nombre_subcategoria"))%></td>
</tr>
<%
rsProductos.MoveNext
Next 'i
%>
</table>
<p> </p></td>
</tr>
</table>
</td>
</tr>
Que puede ser? mi construccion SQL esta bien?
Yo tengo 3 tablas:
Una que tiene los productos, con su id, nombre,
la categoria a la que pertenecen (en ID),
y la subcategoria a la que pertenecen (en ID)
Una donde tengo las categorias que tiene:
Id de la categoria, Nombre
Y la ultima donde estan las subcategorias tiene:
Id de la subcategoria, nombre, Id de la categoria a la que pertenece.
La relacion que deseo establecer esta marcada con colores.
Gracias por la ayuda!