Consulta SQL formada por variables enviadas mediante POAT

th3r0rn · #1 (**permalink**) 14/05/2010, 10:18

Hola, tengo un problema, quiero armar una consulta con datos recibidos desde un post de esta manera:

Código:

<%
dim conexion,calendar1,calendar2,registros
calendar1=request.form("calendar1")
calendar2=request.form("calendar2")
SET conexion=Server.CreateObject("ADODB.Connection")
conexion.Open "PROVIDER=SQLOLEDB; DATA SOURCE=VALP-MESSRV01;UID=sa;PWD=messrv;DATABASE=wasp "
SET registros=Server.CreateObject("ADODB,RecordSet")
registros.open"SELECT peso,tubo from pesos where fecha  between '<% response.write(calendar1)%>' AND '<%requesponse.write(calendar2)%>'",conexion



do while not registros.eof
response.write("Peso: "&registros("peso"))
response.write("tubo: "&registros("tubo"))
registros.movenext
loop
conexion.close

%>

Pero me da el siguiente error:

Código:

Microsoft VBScript compilation  error '800a0409'

Unterminated string constant

/MES/luis/show.asp, line 8

registros.open"SELECT peso,tubo from pesos where fecha  between '<% response.write(calendar1)
---------------------------------------------------------------------------------------------^

No se si me puedan hechar una manita con esto :/
Saludos

Myakire · #2 (**permalink**) 14/05/2010, 10:25

registros.open "SELECT peso,tubo from pesos where fecha between '" & calendar1 & "' AND '" & calendar2 & "'",conexion

u_goldman · #3 (**permalink**) 14/05/2010, 10:27

Hola th3r0rn

Trata asi:

Código:

registros.open"SELECT peso,tubo from pesos where fecha  between '" & calendar1) & "' AND '" & calendar2) & "', conexion

Saludos

Ups, me gano el tiguron (

)

Myakire · #4 (**permalink**) 14/05/2010, 10:28

Cita:

Iniciado por u_goldman

Hola th3r0rn

Trata asi:

Código:

registros.open"SELECT peso,tubo from pesos where fecha  between '" & calendar1) & "' AND '" & calendar2) & "', conexion

Saludos

Ups, me gano el tiguron (

)

Nunca te conectas y cuando lo haces es para aportar código erroneo

¿que ondas con ese paréntesis al final de las variables?

u_goldman · #5 (**permalink**) 14/05/2010, 10:32

Cita:

Iniciado por Myakire

Nunca te conectas y cuando lo haces es para aportar código erroneo

¿que ondas con ese paréntesis al final de las variables?

Oh es que es viernes...ustedes disculpen...

th3r0rn · #6 (**permalink**) 14/05/2010, 10:49

Holaaa ya me quedo!! me quedo asi:
http://pastebin.com/kppMur7T

Cita:

registros.open"SELECT peso,tubo from pesos where fecha between '"&response.write(calendar1)&"' AND '"&response.write(calendar2)&"'",conexion

Muchas gracias por su ayuda, aunq ahora tengo otra duda, no se por que cuando en el formulario html donde selecciono una fecha, la mando a este archivo que les mostre y me imprime la fecha de calendar1 XD osea esto:
2010-05-14 00:00
Que estara pasando? :(
mi codigo completo es este:

Cita:

<%
dim conexion,calendar1,calendar2,registros
calendar1=request.form("calendar1")
calendar2=request.form("calendar2")
SET conexion=Server.CreateObject("ADODB.Connection")
conexion.Open "PROVIDER=SQLOLEDB; DATA SOURCE=VALP-MESSRV01;UID=sa;PWD=messrv;DATABASE=wasp "
SET registros=Server.CreateObject("ADODB.RecordSet")
registros.open"SELECT peso,tubo from pesos where fecha between '"&response.write(calendar1)&"' AND '"&response.write(calendar2)&"'",conexion

do while not registros.eof
response.write("Peso: "&registros("peso"))
response.write("tubo: "&registros("tubo"))
registros.movenext
loop
conexion.close

%>

Myakire · #7 (**permalink**) 14/05/2010, 12:34

por qué no haces lo que se te ha sugerido?, modifica la concatenación

th3r0rn · #8 (**permalink**) 14/05/2010, 12:51

La concatenacion ya esta, ya no me sale ese error de la DB ahorita el error que comento es otr, ya no marca error solo me imprime la fecha y yo quiero q me imprima el reporte que le estoy pidiendo

Myakire · #9 (**permalink**) 14/05/2010, 12:59

a veeeeeeeerrrrrrr.....

Si hicieras lo que se te ha sugerido, resolverías lo de la fecha y todo lo demás.

Supongo que no haz probado ni analizado lo que en realidad hace lo que esta haciendo tu código que ya no marca error.

Response.write manda una salida al cliente, no estas concatenando las variables así como lo tienes.

Haz un desplegado del query que según tu concatenas para comprobarlo.

Saludos

th3r0rn · #10 (**permalink**) 14/05/2010, 14:31

Hola, jaja perdon q tonto soy ya me di cuenta, pero ahora no me muestra absolutamente nada :(
y asi quedo mi code:

Cita:

<%
dim conexion,calendar1,calendar2,registros
calendar1=request.form("calendar1")
calendar2=request.form("calendar2")
SET conexion=Server.CreateObject("ADODB.Connection")
conexion.Open "PROVIDER=SQLOLEDB; DATA SOURCE=VALP-MESSRV01;UID=sa;PWD=messrv;DATABASE=wasp "
SET registros=Server.CreateObject("ADODB.RecordSet")
registros.open"SELECT peso,tubo from pesos where fecha between '"&calendar1&"' AND '"&calendar2&"'",conexion

do while not registros.eof
response.write("Peso: "&registros("peso"))
response.write("tubo: "&registros("tubo"))
registros.movenext
loop
conexion.close

%>

que sera? :(

th3r0rn · #11 (**permalink**) 14/05/2010, 14:37

Sorry ya quedo, perdon por mi gran estupides, estava mal la propiedad name del calendar 2, señor Myakire usted disculpe :(

Myakire · #12 (**permalink**) 14/05/2010, 15:20

"señor Myakire" ahora si me sentí viejo

Dont' worry, ya sabes que aquí estamos, !suerte!

th3r0rn · #13 (**permalink**) 19/05/2010, 08:23

Hola, estoy intentando consultar unos datos en sql server, envio datos por formulario pero me da un error el cual es:
Microsoft OLE DB Provider for SQL Server error '80040e14'

Line 1: Incorrect syntax near '2010'.

/MES/luis/show.asp, line 10
La Primera consulta que se ve en mi codigo comentada si funciona, pero la segunda la cual deseo utilizar me da el error, yo no veo nada mal en ella, haber si ustedes me pueden hechar una manita:

Código ASP:

Ver original<%
dim conexion,calendar1,calendar2,registros,linea
calendar1=request.form("calendar1")
calendar2=request.form("calendar2")
linea=request.form("linea")
SET conexion=Server.CreateObject("ADODB.Connection")
conexion.Open "PROVIDER=SQLOLEDB; DATA SOURCE=VALP-MESSRV01;UID=sa;PWD=messrv;DATABASE=wasp "
SET registros=Server.CreateObject("ADODB.RecordSet")
'registros.open"SELECT peso,tubo from pesos where fecha  between '"&calendar1&"' AND '"&calendar2&"'",conexion
registros.open"SELECT p.peso,p.tubo,p.fecha, o.linea FROM pesos as p, optimas as o where o.codigo = p.codOptima and o.linea = '"&linea&"'  AND p.fecha Between '"&calendar1&" AND '"&calendar2&"'",conexion
 
 
do while not registros.eof
response.write("Peso: "&registros("peso"))
response.write(" Tubo: "&registros("tubo"))
response.write("<br>")
 
registros.movenext
loop
conexion.close
'response.write(calendar2)
 
'SELECT p.peso,p.tubo,p.fecha, o.linea FROM pesos as p, optimas as o where o.codigo = p.codOptima and o.linea = 'L02N'  AND p.fecha Between '2010-05-11 09:42:34.000' AND '2010-05-11 09:42:39.000'
 
%>

Saludos

posman · #14 (**permalink**) 19/05/2010, 08:53

En la linea 10 te falta cerrar un apostrofe despues de calendar1 entre BETWEEN y AND

th3r0rn · #15 (**permalink**) 19/05/2010, 09:03

Muchas gracias amigo :D