
26/07/2006, 10:33
|
| | Fecha de Ingreso: junio-2006
Mensajes: 104
Antigüedad: 18 años, 10 meses Puntos: 1 | |
comparacion del WHERE hola gracias por su ayuda, el problema aun continua, aqui les pongo el codigo completo de mi pagina, y lo he marcado de colores como mi manejador. <%@ Language=VBScript%>
<% Dim oConn,strSQL, objRS, var
Set oConn = Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("./Ventas.mdb"))%>
<html> <head>
<link rel="STYLESHEET" type="text/css" href="css/letras.css">
<meta http-equiv="Content-Language" content="es">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Ventas</title> </head>
<body>
<h1 align="center">Venta de productos</h1>
<form name="combo" Method=Post>
<p align="center">Seleccione el producto a comprar:
<select name="Producto"
onchange="nombreText.value = this.options[this.selectedIndex].value"> <% strSQL = "SELECT * FROM Productos ORDER BY Productos"
Set RS = oConn.Execute(strSQL)
while not Rs.EOF%>
<option value="<%=rs("Id")%>"> <%=rs("Productos")%></option> <%Rs.movenext
wend
Rs.close%> </select>
<input type="text" name="nombreText" size="5"></p>
<table border="1" width="80%" height="58" align="center">
<tr>
<td width="25%" height="1" align="center">
<p align="center"><b>PRODUCTOS</b></p>
</td><td width="13%" height="1" align="center">
<p align="center"><b>Cantidad</b></p>
</td>
<td width="12%" height="1" align="center">
<p align="center"><b>Comprar</b></p>
</td><td width="21%" height="1" align="center">
<p align="center"><b>Precio</b></p>
</td>
<td width="29%" height="1" align="center">
<p align="center"><b>Sub-Total</b></p>
</td>
</tr>
<tr>
<td width="25%" height="1">
<table width="100%" border="1">
<thead>
</thead>
<tbody> <!--webbot bot="DatabaseRegionStart" startspan
s-columnnames="Tipo_Producto" s-columntypes="202"
s-dataconnection="Base_de_datos4" b-tableformat="TRUE"
b-menuformat="FALSE" s-menuchoice s-menuvalue b-tableborder="TRUE"
b-tableexpand="TRUE" b-tableheader="TRUE" b-listlabels="TRUE"
b-listseparator="TRUE" i-ListFormat="0" b-makeform="TRUE" s-recordsource
s-displaycolumns="Tipo_Producto" s-criteria s-order
s-sql="SELECT Tipo_Producto FROM Precios WHERE id=" & Request.QueryString("nombreText")******
b-procedure="
clientside SuggestedExt=" s-DefaultFields
s-NoRecordsFound=" registro devuelto." i-MaxRecords="256"
i-GroupSize="5" BOTID="0" u-dblib="_fpclass/fpdblib.inc"
u-dbrgn1="_fpclass/fpdbrgn1.inc" u-dbrgn2="_fpclass/fpdbrgn2.inc"
tag="TBODY"
local_preview="<tr><td colspan=64 bgcolor="#FFFF00" align="left" width="100%"><font color="#000000">No se puede mostrar una vista previa de las regiones de resultados de base de datos a menos que se busque esta página desde un servidor Web con un explorador de Web. La siguiente fila de tabla se repetirá una vez por cada registro devuelto por la consulta.</font></td></tr>"
preview="<tr><td colspan=64 bgcolor="#FFFF00" align="left" width="100%"><font color="#000000">Éste es el principio de una región de resultados de base de datos. Debe buscarse en la página desde un servidor Web con un explorador de Web para que se vea correctamente; el Web actual está almacenado en su disco local o en la red.</font></td></tr>" ' nombreText")' FALSE" b-procedure Producto") asp" Producto")'" '& '&request.form("Producto")' Producto") Ningún s-DefaultFields s-NoRecordsFound &Request.Form("nombre_checkbox")&")" &Request.Form("nombre_checkbox")&")" &Producto.value 'Producto.value' &nombreText.value&"%' & --><!--#include file="_fpclass/fpdblib.inc"--> <%
fp_sQry="SELECT Tipo_Producto FROM Precios WHERE id=" ************
fp_sDefault=""
fp_sNoRecords="<tr><td colspan=1 align=left width=""100%""> registro devuelto.</td></tr>"
fp_sDataConn="Base_de_datos4"
fp_iMaxRecords=256
fp_iCommandType=1
fp_iPageSize=5
fp_fTableFormat=True
fp_fMenuFormat=False
fp_sMenuChoice=""
fp_sMenuValue=""
fp_iDisplayCols=1
fp_fCustomQuery=True
BOTID=0
fp_iRegion=BOTID
%> <!--#include file="_fpclass/fpdbrgn1.inc"-->
<!--webbot bot="DatabaseRegionStart" endspan -->
<tr>
<td><!--webbot bot="DatabaseResultColumn" startspan
s-columnnames="Tipo_Producto" s-column="Tipo_Producto"
b-tableformat="TRUE" b-hasHTML="FALSE" clientside
local_preview="<font size="-1">&lt;&lt;</font>Tipo_Producto<font size="-1">&gt;&gt;</font>"
preview="<font size="-1">&lt;&lt;</font>Tipo_Producto<font size="-1">&gt;&gt;</font>" --><%=FP_FieldVal(fp_rs,"Tipo_Producto")%><!--webbot
bot="DatabaseResultColumn" i-CheckSum="36918" endspan -->
</td>
</tr> <!--webbot bot="DatabaseRegionEnd" startspan b-tableformat="TRUE"
b-menuformat="FALSE" u-dbrgn2="_fpclass/fpdbrgn2.inc" i-groupsize="5"
clientside tag="TBODY"
local_preview="<tr><td colspan=64 bgcolor="#FFFF00" align="left" width="100%"><font color="#000000">Éste es el final de una región de resultados de base de datos.</font></td></tr><TR><TD ALIGN=LEFT VALIGN=MIDDLE COLSPAN=64><FORM><NOBR><INPUT TYPE=Button VALUE=" |< "><INPUT TYPE=Button VALUE=" < "><INPUT TYPE=Button VALUE=" > "><INPUT TYPE=Button VALUE=" >| "> [1/5]</NOBR></FORM></td></tr>"
preview="<tr><td colspan=64 bgcolor="#FFFF00" align="left" width="100%"><font color="#000000">Éste es el final de una región de resultados de base de datos.</font></td></tr><TR><TD ALIGN=LEFT VALIGN=MIDDLE COLSPAN=64><NOBR><INPUT TYPE=Button VALUE=" |< "><INPUT TYPE=Button VALUE=" < "><INPUT TYPE=Button VALUE=" > "><INPUT TYPE=Button VALUE=" >| "> [1/5]</NOBR><BR></td></tr>" --><!--#include file="_fpclass/fpdbrgn2.inc"-->
<!--webbot bot="DatabaseRegionEnd" i-CheckSum="62730" endspan -->
</tbody>
</table>
<p>
</td>
<td width="13%" height="1">
</td>
<td width="12%" height="1" align="center">
<p align="center"><input type="checkbox" name="Copolvo" value="ON"></p>
</td>
<td width="21%" height="1">
</td>
<td width="29%" height="1">
<p align="center"></td>
</tr>
</table></form></body>
los asteriscos azules marcan mis lineas donde me da problemas, solo puedo cambiar la instruccion sql de color gris, la otra parte roja se actualiza solo de acuerdo a la gris.
Este es el erro que me arroja: Database Results Error
Description: [Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis (falta operador) en la expresión de consulta 'id='. Number: -2147217900 (0x80040E14)
Source: Microsoft OLE DB Provider for ODBC Drivers
A lo mejor me estoy matando con esta forma y alguien tenga una mejor idea de como reflejar los resultados, Espero su ayuda, gracias por todo. |