Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ASP
 Ayuda
 Foro Bloqueado  Tema Bloqueado


Autor Temas
jacker1307
Starting Member

Peru
6 Posts
Mensajes - 12 Jul 2007 :  20:30:04  Ver Perfil  Enviar Email
Hola a todos cuadno ejecuto este asp me sale este error y me señanal la linea debajo de la sentencia SQL: "Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 3."


<%
Option Explicit

'Definición de variables

Dim Base 'Objeto connection para acceder a la base de datos
Dim Tabla 'Objeto RecordSet para realizar consultas
Dim SQL 'String para crear la consulta SQL
Dim Cod_Producto 'Código del producto que estamos mostrando
Dim Cont 'Variable auxiliar para utilizar como contador
Dim Ruta 'Auxiliar para la creación de una ruta

'Fin de la definición de variables

Cod_Producto = Request.QueryString ("Cod_Producto")
%>

<HTML>
<HEAD>
<TITLE>NalCOM Shop – Productos</TITLE>
<HEAD>
<BODY>

<TABLE BORDER=”0” WIDTH=”80%” ALIGN=”Center”>
<TR>
<TD>
<A href ="../index.asp">Home</A>
</TD>
</TR>
</TABLE>
<BR>

<%
SET Base = Server.CreateObject ("ADODB.Connection")
SET Tabla = Server.CreateObject ("ADODB.RecordSet")
Base.Open "Tienda"

SQL = "SELECT Productos.Producto, Productos.Descripcion, Prodcutos.Precio, Secciones.Seccion, Secciones.Cod_Seccion, Categorias.Categoría, Categorías.Cod_Categoria FROM Productos, Secciones, Categorias WHERE Productos.Cod_Seccion = Secciones.Cod_Seccion AND Secciones.Cod_Categoria = Categorias.Cod_Categoria AND Cod_Producto='" & Cod_Producto & "'"

Tabla.Open SQL, Base, 3,3
Ruta = "Secciones.asp?Cod_Categoria=" & _
Server.URLEncode(Tabla("Cod_Categoria"))
%>
<H2><A HREF="<%= Ruta %>">
<%= Tabla("Categoría") %>
</A>
-
<A HREF="Productos.asp?Cod_Seccion=<%= Tabla ("Cod_Seccion") %>">
<%= Tabla("Seccion")%>
</A></H2>

<BLOCKQUOTE>
<H4>
<A HREF="javascript:history.back()">
<% IF InStr _
(LCase(Request.ServerVariables ("HTTP_REFERER")) _
, "busqueda.asp") > 0 THEN %>
Volver a la busqueda
<% ELSE %>
Volver al listado
<% END IF %>
</A>
</H4>

</BLOCKQUOTE>
<BR>

<CENTER>
<H1><%= Tabla ("Producto") %></H1>
<H2><%= FormatNumber (Tabla ("Precio"), 0) %> Nuevos Soles</H2>
<H3><%= Tabla ("Descripción") %></H3>
<BR>
<%
Tabla.Close
Base.Close
SET Tabla = Nothing
SET Base = Nothing
Ruta = " '../Compra/Comprar.asp?Cod_Producto=" & _
Server.URLEncode (Cod_Producto) & _
"&Unidades=' + Unidades.value"
%>

<INPUT TYPE="Button" VALUE="Comprar"
onClick="window.open(<%= Ruta %>, '',
'width=350, height=300, toolbar=0, scrollbars=0')" >
<SELECT ID="Unidades">
<% FOR Cont = 1 to 5 %>
<OPTION VALUE="<%= Cont %>"><%= Cont %></OPTION>
<% NEXT %>
</SELECT>
Unidades

</CENTER>
</BODY>
</HTML>


Jk.

Admin
Forum Admin

España
229 Posts
Posted - 16 Jul 2007 :  12:00:58  Ver perfil  Enviar e-mail
tienes un error en la sentencia SQL que intentas ejecutar.

Hazte un response.write de la sentencia y compruebala, puede ser de construcción o de un nombre de campo erroneoInicio Pagina

   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar